Fortran基本知识

行的定义。在自由格式中每行可以书写132个字符。程序语句的位置没有了只能从第7列后开始书写的固定约定，可以在任意一列开始书写。同一行中可以顺序书写多条程序语句，语句之间用分号“;”进行分隔。
•注释行的定义。在自由格式中，惊叹号“!”后的字符均被视为注释。但是，字符串中的“!”出外，如“PRINT *, ‘Hello! Fortran 90/95’”中，“Fortran 90/95’”不会被认为是注释。
•续行的定义。在Fortran 90/95标准中规定，当程序代码中的一行超过132个字符时，至多可以有39个续行。续行标志固定为“&”。当一行代码的最后一个字符为“&”时，则表示下一行与本行接续；当一行代码的第一个字符为“&”时，则表示本行与上一行接续。

在不同的类型之间进行转换是有限制条件的：数值型以及逻辑型数据之间允许相互赋值转换；数值型数据与字符型数据之间则不允许进行直接赋值转换，需要使用专用的字符函数；逻辑型数据不允许与字符型数据之间进行直接或间接的转换。

整型数据与实型数据的相互转换遵循如下规则：整形向实型转换时，保持数值的大小不变；实型向整型转换时，直接将实型的小数部分截去。
•在由整型数据向逻辑型数据转换时，逻辑型数据的值由整型数据的奇偶来决定：当整型数据为奇数时，转换成的逻辑型数据的值为TRUE；当整型数据为偶数（包括0）时，转换成的逻辑型数据的值为FALSE。
•在由实型数据向逻辑型数据转换时，实型数据会首先转换成整型，然后再由整型向逻辑型转换。

5.3.1 非字符型常数的种别说明

•对于数值型或逻辑型常数这类非字符型常数来说，可以使用后辍法来表示数据所属的种别。后缀法在常数数值后面加上一道下划线“_”，然后再跟上具体的种别值。
•对于实型常数，如果数据指数部分的字母是D时，禁止使用种别值进行说明。因为字母D表示该数据已经是实型数据的最高种别，种别值为8，即双精度实数。
•对于复型常数，如果数据的实部和虚部都是用整数的形式来表示的，那么它的精度和范围都会被默认为与缺省的实型常数相同；如果实部和虚部都是用实数的形式来表示，那么它的精度和范围会视具体的情况来确定：如果实部和虚部具有相同的种别说明，则复数的种别就是该种别；如果实部和虚部具有不同的种别说明，则复数的种别由较大的种别值确定。

 

6.2.1 绝对值函数

•绝对值函数用于求出数据的绝对值，函数的原型如下：

•C = ABS(X)
•其中，ABS是Fortran中绝对值函数的通用名。除了这个通用名外，绝对值函数还有4个专用名，它们是：
•IABS，专用于求默认种别的整型数据的绝对值，返回值也为默认种别的整型数据。
•ABS，专用于求默认种别的实型数据的绝对值，返回值也为默认种别的实型数据。
•DABS，专用于求双精度实型数据的绝对值，返回值也为双精度的实型数据。
•CABS，专用于默认种别的复型数据的绝对值，返回值也为默认种别的复型数据。

 

6.2.2 指数函数

•指数函数用于求出数据的指数值，函数的原型如下：
•C = EXP(X)
•其中，EXP是Fortran中指数函数的通用名。除了这个通用名外，指数函数还有3个专用名，它们是：
•EXP，专用于求默认种别的实型数据的指数值，返回值也为默认种别的整型数据。
•DEXP，专用于求双精度的实型数据的指数值，返回值也为双精度的实型数据。
•CEXP，专用于默认种别的复型数据的指数值，返回值也为默认种别的复型数据。

 

6.2.3 正弦函数

•正弦函数用于求出数据的正弦值，函数的原型如下：
•C = SIN(X)
•其中，SIN是Fortran中正弦函数的通用名。除了这个通用名外，正弦函数还有3个专用名，它们是：
•SIN，专用于求默认种别的实型数据的正弦值，返回值也为默认种别的整型数据。
•DSIN，专用于求双精度的实型数据的正弦值，返回值也为双精度的实型数据。
•CSIN，专用于默认种别的复型数据的正弦值，返回值也为默认种别的复型数据。
•函数在数学上等价于。函数中参数的单位是弧度而不是度，在使用时需要注意这一点。

 

6.2.4 余弦函数

•余弦函数用于求出数据的余弦值，函数的原型如下：
•C = COS(X)
•其中，COS是Fortran中余弦函数的通用名。除了这个通用名外，余弦函数还有3个专用名，它们是：
•COS，专用于求默认种别的实型数据的余弦值，返回值也为默认种别的整型数据。
•DCOS，专用于求双精度的实型数据的余弦值，返回值也为双精度的实型数据。
•CCOS，专用于默认种别的复型数据的余弦值，返回值也为默认种别的复型数据。

 

6.2.5 反正弦函数

•反正弦函数用于求出数据的反正弦值，函数的原型如下：
•C = ASIN(X)
•其中，ASIN是Fortran中反正弦函数的通用名。除了这个通用名外，反正弦函数还有2个专用名，它们是：
•ASIN，专用于求默认种别的实型数据的反正弦值，返回值也为默认种别的整型数据。
•DASIN，专用于求双精度的实型数据的反正弦值，返回值也为双精度的实型数据。

 

6.2.6 反余弦函数

•反余弦函数用于求出数据的反余弦值，函数的原型如下：
•C = ACOS(X)
•其中，ACOS是Fortran中反余弦函数的通用名。除了这个通用名外，反余弦函数还有2个专用名，它们是：
•ACOS，专用于求默认种别的实型数据的反余弦值，返回值也为默认种别的整型数据。
•DACOS，专用于求双精度的实型数据的反余弦值，返回值也为双精度的实型数据。

 

6.2.7 正切函数

•正切函数用于求出数据的正切值，函数的原型如下：
•C = TAN(X)
•其中，TAN是Fortran中正切函数的通用名。除了这个通用名外，正切函数还有2个专用名，它们是：
•TAN，专用于求默认种别的实型数据的正切值，返回值也为默认种别的整型数据。
•DTAN，专用于求双精度的实型数据的正切值，返回值也为双精度的实型数据。

 

6.2.8 反正切函数

•反正切函数用于求出数据的反正切值，函数的原型如下：
•C = ATAN(X)
•其中，ATAN是Fortran中反正切函数的通用名。除了这个通用名外，反正切函数还有2个专用名，它们是：
•ATAN，专用于求默认种别的实型数据的反正切值，返回值也为默认种别的整型数据。
•DATAN，专用于求双精度的实型数据的反正切值，返回值也为双精度的实型数据。

 

6.2.9 自然对数函数

•自然对数函数用于求数据的自然对数值，函数的原型如下：
•C = LOG(X)
•其中，LOG是Fortran中自然对数函数的通用名。除了这个通用名外，自然对数函数还有3个专用名，它们是：
•ALOG，专用于求默认种别的实型数据的自然对数值，返回值也为默认种别的整型数据。
•DLOG，专用于求双精度的实型数据的自然对数值，返回值也为双精度的实型数据。

 

6.2.10 常用对数函数

•常用对数函数用于求数据的常用对数值，函数的原型如下：
•C = LOG10(X)
•其中，LOG10是Fortran中常用对数函数的通用名。除了这个通用名外，常用对数函数还有2个专用名，它们是：
•ALOG10，专用于求默认种别的实型数据的常用对数值，返回值也为默认种别的整型数据。
•DLOG10，专用于求双精度的实型数据的常用对数值，返回值也为双精度的实型数据。
•CLOG，专用于求默认种别的复型数据的自然对数值，返回值也为默认种别的复型数据。

 

6.2.11 取整函数

•取整函数用于将数据转换为整型，函数的原型如下：
•C = INT(X)
•其中，INT是Fortran中取整函数的通用名。除了这个通用名外，取整函数还有3个专用名，它们是：
•IFIX，专用于将默认种别的实型数据转换为整数，返回值为默认种别的整型数据。
•INT，专用于将默认种别的实型数据转换为整数，返回值为默认种别的整型数据。
•IDINT，专用于将双精度的实型数据转换为整数，返回值为默认种别的整型数据。
•函数的执行结果同数学上的取整有所不同，Fortran中的取整函数只是将数据的小数部分截去，不使用四舍五入规则。函数的参数可以是实型、整型和复型。

 

6.2.12 求余函数

•求余函数用于求第一个变量被第二个变量所除后的余数，函数的原型如下：
•C = MOD(X1, X2)
•其中，MOD是Fortran中求余函数的通用名。除了这个通用名外，求余函数还有2个专用名，它们是：
•MOD，适用于默认种别的整型数据，返回值为默认种别的整型数据。
•AMOD，适用于默认种别的实型数据，返回值为默认种别的实型数据。

 

6.2.13 取符号函数

•取符号函数返回第一个参数的绝对值与第二个参数的符号的乘积，函数的原型如下：
•C = SIGN(X1, X2)
•其中，SIGN是Fortran中取符号函数的通用名。除了这个通用名外，取符号函数还有3个专用名，它们是：
•ISIGN，适用于默认种别的整型数据，返回值为默认种别的整型数据。
•SIGN，适用于默认种别的实型数据，返回值为默认种别的实型数据。
•DSIGN，适用于双精度的实型数据，返回值为双精度的实型数据。

 

6.2.14 最大值函数

•最大值函数用于找出一系列数据中的最大值，函数的原型为：
•C = MAX(X1, X2[, X3]…)
•其中，MAX是Fortran中最大值函数的通用名。除了这个通用名外，最大值函数还有5个专用名，它们是：
•MAX0，适用于默认种别的整型数据，返回值为默认种别的整型数据。
•AMAX0，适用于默认种别的整型数据，返回值为默认种别的实型数据。
•MAX1，适用于默认种别的实型数据，返回值为默认种别的整型数据。
•AMAX1，适用于默认种别的实型数据，返回值为默认种别的实型数据。
•DMAX1，适用于双精度的实型数据，返回值为双精度的实型数据。

 

6.2.15 最小值函数

•最小值函数用于找出一系列数据中的最小值，函数的原型为：
•C = MIN(X1, X2[, X3]…)
•其中，MIN是Fortran中最小值函数的通用名。除了这个通用名外，最小值函数还有5个专用名，它们是：
•MIN0，适用于默认种别的整型数据，返回值为默认种别的整型数据。
•AMIN0，适用于默认种别的整型数据，返回值为默认种别的实型数据。
•MIN1，适用于默认种别的实型数据，返回值为默认种别的整型数据。
•AMIN1，适用于默认种别的实型数据，返回值为默认种别的实型数据。
•DMIN1，适用于双精度的实型数据，返回值为双精度的实型数据。