fortran经典课件-chp6 函数.pdf

第六章函数 2007-10-26 1 第六章函数 子程序（SUBROUTINE ）的使用 自定义函数（FUNCTION） 全局变量（COMMON ） 函数中的变量 特殊参数的使用方法 特殊的函数类型 MODULE 使用多个文件 函数的应用 2007-10-26 2 6.1子程序（SUBROUTINE ）的 使用 程序当中，常常在不同的地方需要重复某一 功能和重复使用某一段程序代码，这个时候 就可以使用”函数” 函数是自定义函数和子程序的的统称 子程序可以用来独立出一段具有特定功能的程序 代码，供其他地方调用 自定义函数可以用来自由扩充出Fortran库函数中 原来不存在的函数 2007-10-26 3 写程序时，可以把某一段经常使用，具有特定功能的程序代 码独立出来，封装成子程序，以后只要通过调用的CALL命令 来执行这段代码 子程序中包含可执行的程 序代码，内容可以是任何 Fortran命令描述，可以声 明变量，做流程控制，执 行循环，甚至调用其他子 2007-10-26 程序 4 子程序和主程序的不同 主程序的程序代码，在程序一开始就自动会被执行，而于 程序则不会自动执行，它需要被别人‘调用’才会执行 子程序的代码以SUBROUTINE开头，它同样要取一个名 字字，以END或END SUBROUTEINE来结束 主程序以PROGRAM开头，END来结束 主程序的名字可以随时更改， 在改名时只需更动程序个PROGRAM后的那几个字就行了， 子程序的名字是用来给别人调用时所要使用的，在取名时 最好能配合这个子程序的功能来给予适当的称呼 改变子程序的名字时，还要把在程序中所有CALL它旧名字的部分 2007-10-26 全部改成CALL它新的名字 5 包含子程序的Fortran程序的结 构 主程序并不一定要放 在程序代码的最开 头，它可以安排在程 序中的任意位置 2007-10-26 6 RETURN命令 子程序最后一个命令通常是“RETURN”，表示 程序要“返回”原来调用它的地方来继续执行程 序 如果像主程序一样写成了STOP，会导致子程序 执行完后，整个程序就跟着全部结束,这通常不是 使用子程序时所想要看到的现象 RE