FORTRAN学习中的一些小心得

FORTRAN 心得 第一部分：一些小心得 1 Fortran 不区分大小写 2 Fortran 有5 种基本数据类型，integer，real, character, logical, complex 3 fortran fixed format 格式中的变量赋初值一般用DATA，因为它不能用:: 4 real(kind=8) a 这种格式只使用于Fortran90，Fortran77 中要使用real*8 或real(8) 5 FORTRAN 中FREE 与FIXED 两种格式do 循环的区别： Fortran 95 使用end do 来结束循环。 Fortran 77 使用DO 循环要麻烦一点，它不使用END DO 来结束循环，而是使用行号来结束循环，程序代码要在 DO 的后面写清楚这个循环到哪一行程序代码结束。 Fortran 77 中，经常会使用CONTINUE 这个命令来结束循环。因为CONTINUE 这个命令没有实际的用途，刚好可以拿来做封装使用。 6 循环的流程控制： 循环中的cycle 命令相当于c++里的continue 命令，用于结束一次循环 循环中的exit 命令好比 c 里面的break，用于结束循环 7 不使用do 循环，单纯用GOTO 语句也能设计循环程序，但不推荐使用GOTO 语句 7 fortran 有等价声明：即用equivalence(a,b),这样使得a,b 使用同一块内存，这样可以节省内存，有时可精简代码。 8 fortran77 中只能用单引号。（还有疑问，因为fixed format 能用双引号） 9 逻辑运算符 == /= > >= < <= !Fortran90 用法 .EQ. .NE. .GT. GE. .LT. .LE. !Fortran77 用法 9 PAUSE,CONTINUE，STOP pause 暂停程序执行，按 enter 可继续执行 continue 貌似没什么用处，可用作封装程序的标志 STOP 命令用来结束程序，要谨慎使用 10 数组元素之间要用逗号分隔，而不能像 matlab 一样既可以用逗号也可以用空格，fortran的数组元素之间不能用空格。 11 数组的声明： Fortran 77 中数组的声明，必须使用DIMENSION 命令 Integer a; !先声明 a 是整型 Dimension a(10) !再声明 a 是大小为10 的数组 Fortran 95 中可以用简单的方法： Integer a(10) !最简单的方法 Integer,dimension(10):: a !另一种方法 12 数组的赋值： Fortran 77 中数组的声明，可以使用DATA 命令 或隐含式循环来赋初值； Fortran 95 中可以直接设置初值；如：integer ::a(5)=(/1,2,3,4,5/);此时，括号和除号之间不能有空格； 13 与 C 不同，Fortran 数组索引值默认从 1 开始，而且可以在声明时改变该规则，如 integer a(-3:1)...