F第7章子程序.ppt

文档介绍：本章主要内容:
程序单位:子程序、模块方法
模块化结构程序
子程序
语句函数
Module模块
第七章函数与子程序
FORTRAN 程序结构的模块化
子程序概述
主程序
子程序A
子程序B
子程序c
子程序F
子程序E
子程序H
子程序G
子程序E
程序的模块化、结构化、易读性、易维护性
可以用来独立出某一段具有特定意义的程序代码.
可供其他程序调用.
自定义的子程序或函数可以用来自由扩充出FORTRAN库函数中原来不存在的函数.
函数与子程序功能和作用
(a)函数子程序结构
(b)子例行程序结构
(c)数据块子程序结构
(d) MODULE 模块
Fortran 模块和过程:
FUNCTION 函数名[(a1,a2,…,an)]
说明语句
……
可执行语句
RETURN
……
可执行语句
END
(a)函数子程序结构
SUBROUTINE 子程序名[(a1,a2,…,an)]
说明语句
……
可执行语句
RETURN
……
可执行语句
……
END [END SUBROUTINE子程序名]
(b)子例行程序结构
BLOCK DATA 名字
说明语句
END
(c)数据块子程序结构
Block data AA
Integer x
Dimension num(10)
…..
Data num/1,2,3,4,5,6,7,8,9,10/
Data x//
End
函数子程序
结构形式:
[Real] Function Vf(X,Y,N)
Vf=X+1
If() Then
Vf=X**N+Y**N
Endif
RETURN
End
调用时:
[Progran main]
……
W=Vf(A,Sin(B),2)
…….
End
例题1
编写程序计算下列

这里