Fortran 引入

目录

1. Fortran 语言架构

首先来看一段Fortran代码，你不必知道代码中各部分的详细含义，只需要简单了解一下Fortran代码的语言结构。

!> Program 1-1
program view_of_fortran
    use ios_fortran_env, only: int32, real32
    implicit none
    integer(int32) :: high
    real(real32)   :: weight, bmi

    write(*, *) "Please enter your high(cm) >>>"
    read(*, *) heigh

    write(*, *) "Please enter your weight(kg) >>>"
    read(*, *) weight

    bmi   = weight / (height / 100 * height / 100)
    write(*, *) "Your bmi is:", bmi

end program

1. 1行为注释(Comments), 注释是由 ! 开头的语段, 计算机在编译fortran程序时会自动将每一行 由 !开头的语句略去。

2. 2行及最后一行为程序 入口声明 及 出口声明, 该语句为 fortran 程序运行必不可少的语句。

3. 3行引用了 ios_fortran_env 模块中的 int32 及 real32

4. 6-7行为 变量声明语句, 在此声明程序运行时需要申请的内存空间及变量名称。

5. 9、12、16行 为输入语句, 从指定的通道中读取数据， 10、13行为输出语句，将数据输出指指定通道。

6. 15行为赋值语句，该语句将右侧语句值赋予左侧变量。

Fortran 程序常规的书写框架如下:

program xxxx
    use xxx, only: xxx
    (implicit none)

    ! 变量声明
    xxx, xxx  :: xxx

    ! 主程序
    ...

end program (xxxx)

2. Fortran 书写格式

2.1 Fortran 字符集

Fortran 中能使用的字符包括:

1. 英文字符: a~z, A~Z
2. 数字字符: 0~9,
3. 22个特殊符号: :=±*/(),.’"!%&;<>?$_(space)

Note: fortran 程序对大小写不敏感，也就是说, 在fortran代码中
Integer == INteGer == integer

2.2 固定格式 (Fixed)

固定格式是为了方便老式穿孔卡片进行运作的程序书写格式，现在一般不推荐使用，
固定格式的书写有如下要求

1. 1 字符如果为 C, c, * 则改行被当作注释
2. 1 ~ 5 个字符只能是数字用于编号，否则是空格
3. 6字符, 如果是 “0” 以外的任何字符，则改行会续接上一行
4. 7~72 字符为编写区域
5. 73 字符以后，被废弃，有些编译器在检查时会报错。

C     !program 1-2: Fixed demo
      program hello
100       write(*, *) "hello, world!"
      end program

2.3 自由格式 (Free)

对每一行的具体字符没有要求，只有如下的几点注意

1. ! 后为注释
2. 每行只能编写 132 个字
3. 一行代码如果最后是 &, 表示下一行代码与这一行续接。