Fortran：常量

声明：本博文翻译自：https://www.tutorialspoint.com/fortran/fortran_constants.htm

fortran程序中的常量指的是固定的数据类型保存有固定值，在程序执行的过程中保持不变。
常量可以是任何基本的数据类型，包括整型常量、浮点数常量、字符型常量、复数型常量或者字符串常量。有两种逻辑型常量：.true.和.false.
这些常量在程序中与其他变量的操作并没有区别，除了它们的值不能在程序中被修改。

constants和literals的声明
常量分为两种：一种是Literal常量，另一种是Named常量。
Literal常量有数值，但无名字
例如下面的就是Literal常量：
Integer constants  0 1 2 3 4 567
Real constants  0.1 0.2 0.3 0.1234
Complex constants  (0.,0.) (3.,4.)
Logical constants  .true. .false.
Character constants  "QQ"  "luk"  "123"  "123'4"

Named常量不仅有变量名，而且也有数值。例如
real, parameter :: pi = 3.1415
integer, parameter :: a = 123
character, parameter :: s = 'A'
character(len=50), parameter :: str = "hi"
complex, parameter :: c = (3.,4.)

下面的代码展示了在重力作用下，有一初速度的物体在某一时间段内的位移
Program gravitationalDisp
  implicit none
  real, parameter :: g = 9.81  !.. Named constant
  real :: s !.. displacement
  real :: t !.. time
  real :: v !.. initial speed

  t = 5.0
  v = 50
  s = v * t - g * (t*t) / 2

  write(*,'(1x,a,g0)') "Time = ", t
  write(*,'(1x,a,g0)') "Dispalcement = ", s
End program gravitationalDisp

用ivf编译器，结果如下：
Time = 5.000000
Dispalcement = 127.3750