资源描述
6.2 外 部 函 数 子 程 序 外 部 函 数 子 程 序外 部 函 数 子 程 序 类 型 :普 通 、 递 归 、 并 行 。形 式 一 :type function 函 数 名 (d1,dn)函 数 名 =表 达 式returnend function 函 数 名 函 数 子 程 序 开 始 的 关 键 字函 数 过 程 返 回 值 的 类 型命 名 规 则 与 一 般 的 变 量 相 同哑 元 表 , 可 为 变 量 名 、 数组 名 、 哑 过 程 名 或 *或 无 6.2 外 部 函 数 子 程 序program ex0807implicit none real : a=1 real : b=2 real, external : add write(*,*) add(a,b) stopend function add(a,b)implicit none real : a,b ! 传 入 的 参 数 real : add ! add跟 函 数 名 称 一 样 , 这 边 不 是 用 来 声 明 变 量 , ! 是 声 明 这 个 函 数 会 返 回 的 数 值 类 型 add = a+b returnend 6.2 外 部 函 数 子 程 序形 式 二 :type function 函 数 名 (d1,dn) result(结 果 变 量 )函 数 名 =表 达 式returnend function 函 数 名 注 : 函 数 名 与 结 果 变 量 不 能 重 名 ; 函 数 体 内 不 允许 出 现 对 函 数 名 的 任 何 说 明 ; 结 果 变 量 名 可 表 示 单个 变 量 或 一 个 数 组 名 。函 数 过 程 返 回 值 的 类 型 (result的 类 型 ) 6.2 外 部 函 数 子 程 序 外 部 函 数 子 程 序 的 调 用外 部 函 数 子 程 序 的 调 用 (引 用 )方 法 和 语 句 函 数 、内 在 函 数 一 样 , 只 能 出 现 在 表 达 式 或 输 出 语 句 中 。 调 用 形 式 :fun(a1,a2,an)被 调 用 的 外 部 函 数 子 程 序 的 名 字
展开阅读全文