Fortran的点点滴滴——变量

　　Fortran中变量的变量名由字母、数字和下划线符号的任意组合而成，但第一个字符必须是字母，长度方面，Fortran95中的变量名可以长达31个字符。

小贴士：在程序中，尽量使用有意义的变量名，可以大大提高程序的可读性。

　　Fortran有5个只带的变量数据类型，其中三个为数据类型：整型（INTEGER），实型（REAL）和复数类型（COMPLEX），一个字符串类型（CHARACTER），还有一个逻辑型（LOGICAL）。除去上述内置类型外，Fortran允许程序员定义派生数据类型（TYPE）。

　　Fortran 95/2003标准允许Fortran编译器支持多种长度的数据类型，对于INTEGER、REAK以及COMPLEX可以用KIND指定，CHARACTER可以用LEN指定。如：

REAL（KIND=8） AA，BB

CHARACTER（LEN=80） ：： FILENAME

　　当然，也可以把长度定义为一个常量，这样用于一个大型程序的精度控制很方便，值得使用：

INTEGER，PARAMETER  ：： DBL = 8

REAL（KIND=DBL） AA，BB

　　另外，讲一下复数的赋值，形如（0.，0.）

COMPLEX ：： AA=（1.0，36.7）

　　最后，我们讲一下派生类型，所谓派生类型，就是让程序员在内置类型的基础上构建一个特殊的类型，下面使用一段代码说明：

PROGRAM TEST

  IMPLICIT NONE

  ！首先构建一个类型

  TYPE ：： DOG

    INTEGER ：：LEGS

    REAL（KIND=8） ：： HIGH

    CHARACTER ：： NAME

  END TYPE

  ！声明该派生类型的变量

  TYPE（DOG）：： JOHN,SAM

  ！对派生类型变量的操作

  JOHN%NAME = "JOHN"

  JOHN%LEGS = 4

  JOHN%HIGH =40

  ！另外一种初始化方法

  SAN = DOG("SAN",4,37)

  WRITE(*,*) JOHN

  WRITE(*,*) SAM%NAME

END PROGRAM

小贴士：一定要明白，DOG是一个派生类型，而不是一个变量，JOHN、SAM才是DOG类型的变量。