![]() |
中国DOS联盟-- 联合DOS 推动DOS 发展DOS --联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum |
| 游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟 |
|
中国DOS联盟论坛 现在时间是 2026-08-04 08:10 |
共 48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行 |
| DOS开发编程 & 发展交流 (开发室) » FORTRAN编译心得 |
| 可打印版本 2,794 / 4 |
| 第1楼 kickout | 发表于 2002-10-28 00:00 |
| 高级用户 发帖 135 积分 667 | |
|
FORTRAN编译心得 在动力系机房,用得最多的语言就是FORTRAN了,但FORTRAN有时实在太 烦人,编译太多错误时看都看不清楚,咋办? 在编译时,编译程序会问你: Microsoft FORTRAN77 V3.13 8/05/83 Object filename : Source listing : Object listing : 一般大家都以回车忽略,其实应该在 Source listing : 一行中命名一个LST文件,如A.LST,打开此文件可看到以下内容: 1.FORTRAN 版本信息 2.源程序清单 行号 语句 *****出错信息 3.变量信息 4.总结 这样,就可以清楚看到出错地点,类型,可以方便地查看,然后在源程序中 修改. 附例子如下: A.LST文件: $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ Page 1 04-30-98 11:48:39 D Line# 1 7 Microsoft FORTRAN77 V3.13 8/05/83 1 PROGRAM EXAN1 2 REAL L1,L2,IA ***** Error 5 -- label in continuation line ***** Error 23 -- extra characters at end of statement 3 WRITE(*,*)'INPUT X1,X2,L1,L2,C,U,T' 4 READ(*,) X1,X2,L1,L2,C,U,T ***** Error 50 -- invalid symbol in expression ***** Error 166 -- integer variable expected 5 IA=X1*((L1+0.4)+X2*(0.5*L2+0.2) ***** Error 26 -- " " expected6 EM=57.2*C*IA*U**3.3/T 7 WRITE(*,*) 'IA=',IA ; ***** Error 17 -- invalid character in input 8 write(*,*) 'EM=', EM 9 10 11 ***** Error 91 -- missing END statement Name Type Offset P Class C REAL 18 EM REAL 34 IA INTEGER*4 30 L1 INTEGER*4 10 L2 INTEGER*4 14 T REAL 26 U REAL 22 X1 REAL 2 X2 REAL 6 Name Type Size Class EXAN1L PROGRAM Pass One 7 Errors Detected 11 Source Lines $$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$ |
|
| 第2楼 Sandy | 发表于 2002-10-30 00:00 |
| 元老会员 发帖 157 积分 608 | |
|
Fortran77不如用Basica
|
|
| 第3楼 kickout | 发表于 2002-11-02 00:00 |
| 高级用户 发帖 135 积分 667 | |
|
fortran77是强大的工程运算语言。它的计算精度是basic远远不能及的。。。
|
|
| 第4楼 yiyesong | 发表于 2002-11-02 00:00 |
| 元老会员 发帖 632 积分 1,987 | |
|
fortran没有什么实际的用处,大多数情况下只不过用于教学了。
|
|
| 第5楼 Sandy | 发表于 2002-11-03 00:00 |
| 元老会员 发帖 157 积分 608 | |
|
I use GNU bc
|
|
|
[ 联系联盟系统管理团队 -
中国DOS联盟 -
标准版 ] Sponsored by ifanr Inc | © 2001–2023 |