implict real8 (A-H,O-Z) : this statement means that all variables with names beginning with either letter of ‘a’ to ‘h’ and ‘o’ to ‘z’ are declared real8(8 bytes,32bits),default is REAL*4, or simply REAL
20181107*****************
参考:http://fcode.cn/guide-43-1.html
1)早期的计算机资源非常稀缺,因此,早期 Fortran 遗留了一个很不好的特性,这就是 IN 规则。
IN 规则规定,假如源代码中没有对变量(或数组)进行定义,则以 I J K L M N 开头的变量为整型变量(或数组),其他变量为实型变量(或数组)。
现在的计算机资源已经非常廉价,因此,避免在程序中使用 IN 规则。
方法是:在每一个程序单元,添加 Implicit None 语句。并显式定义全部的变量和数组。
每一个程序单元,意思是:主程序,全部子例行程序和函数,全部 Module 模块。
(实际上,如果module中添加了这个语句,它 contains 下的函数无需再次添加它)。
强烈建议您书写代码时,每一个程序单元一开始添加 Implicit None 语句!
如果是修改长度较长的老代码,再去添加它会增加你的工作量。此时就需要慎重考虑,
Implicit 有其他的用法,例如:Implicit Real*8(A-H,O-Z) ,它表示 A-H 开头和 O-Z 开头的变量,为双精度实型。这种用法同样存在上述问题,因此也不建议使用,只要看到它知晓它的含义既可。