module中的public元素(变量和函数)应该显式列出,其他的应保留为private。最小化原则。 如下代码中module c 中 use b, only : x 不仅是合法的,而且会修改同一个 x变量 ,即a中的x moduleareal(dp)::xend modulemodulebusea,only:x! 合法,使用的是a中的x, 不推荐end modulemodulecuseb,only:x! 也合法,...
在封装好的模块(module)中,其中会有很多变量,如果申明private variable(变量名),那么这个变量只能在这一个module中使用,如果是public variable,该变量对外公开,如果不做说明,那么默认变量是public的,也就是对外公开的。 例如
public :: public_subroutine contains ! 公共过程:可在模块外部调用 subroutine public_subroutine() print *, 'This is a public subroutine.' call private_subroutine() end subroutine public_subroutine end module private_module program test_private_module use private_module implicit none ! 调用模块中的公...
module实例如下: module bank implicit none private money ! 声明这是私有的 ! 变量会被module的各个子程序/方法共享 public LoadMoney, SaveMoney, Report ! 声明这是公开的, 缺省时默认公开 integer :: money = 100 contains subroutine LoadMoney(num) implicit none integer :: num money = money - num ret...
Fortran知识 | public 和 private 在fortran中是什么意思? 在封装好的模块(module)中,其中会有很多变量,如果申明private variable(变量名),那么这个变量只能在这一个module中使用,如果是public variable,该变量对外公开,如果不做说明,那么默认变量是public的,也就是对外公开的。 例如...
Public :: myFunction Function myFunction(x) Integer, Intent(In) :: x Integer :: y y = x ** 2 myFunction = y End Function End Module 在上面的代码中,我们定义了一个包含三个整数变量(i,j,k)和一个名为myFunction的子程序的module。我们还定义了一个public关键字,以便从module之外访问myFunction...
public::function_name2 end modulemodule_name 在使用模块前需要先声明(use)模块,如上述代码中的”use module_name1”和”use module_name2”。声明模块后,可以通过”module_name%variable_name”的方式访问模块中的变量。同时,模块中的子程序和数据类型也可以按照对应的访问权限进行调用和使用。 四、模块中的变量...
意思就是该元素（变量，数组，或函数）可以被模块外的单元使用或调用。比如 Module A Integer b , c public b !// 也可以直接写为 Integer , public :: b private c End Module A Program Main Use A b = 3 !// 这一句可以，因为 b 是 public 的 c = 4 !// 这一句会出错，...
每个框都可以是一个独立的源文件:以是一个独立的源文件:Program A1Use module ACall BContains内部子程序或内部函数End Program A1Module AContains模块子程序或函数Subroutine B(外部子程序)下一页上一页停止放映 Fortran Fortran可以定义一个过程就是指它是一个函数或是一个子程序。可以定义一个过程就是指它是...
Fortran 语言里没有全局变量这个叫法。一些老的教科书习惯把 common 里的变量，称为全局变量。其实是不对的，应该叫“未命名的common 数据”。module 中定义的变量，可以在 use 了该module 的程序单元里通用，并共享同一个内存空间。前提是该变量有 public 和 save 属性。（如果没有指定save，则默认...