前言
在Fortran中,有两种不同类型的函数:内部函数和用户定义函数(函数子程序)。
内部函数是程序内置的,直接调用即可。
函数子程序FUNCTION是自定义的,用于解决内部函数无法解决的其它特性需求,同样也是一个过程(process)。
Fortran函数子程序(FUNCTION)
1) 使用方式
FUNCTION name( parameter_list )
...
(声明部分,必须声明name的类型)
type :: name
...
(执行部分)
name = expression
RETURN
END FUNCTION [name] ! []表示可选
注意事项:
- 输入参数:
parameter_list
,一个或多个值,可为空(但也有留有()
);
- 输出结果:
name
,单个数值、逻辑值、字符串或数组(多个结果则应该使用子例程);
- 在函数中,函数名
name
必须至少出现在赋值语句的左侧一次,当将函数返回调用程序单元时,赋给函数名的值就是函数的返回值,因此name
需要声明类型;
- 不同于模块MODULE的继承功能,在定义函数本身和