如何从Fortran函数访问全局变量
从Fortran函数访问全局变量可以通过使用MODULE模块来实现。MODULE模块是Fortran中用于定义全局变量和子程序的一种机制。
首先，我们需要创建一个MODULE模块，在其中定义全局变量。例如，我们创建一个名为"globals"的MODULE模块：
MODULE globals
INTEGER :: global_var
END MODULE globals在上述代码中，我们定义了一个名为"global_var"的全局变量。
接下来，在需要访问全局变量的Fortran函数中，我们需要使用USE语句引入该MODULE模块。例如，我们创建一个名为"access_global"的Fortran函数：
SUBROUTINE access_global()
USE globals
! 在这里可以访问和修改global_var全局变量
global_var = 10
PRINT *, global_var
END SUBROUTINE access_global在上述代码中，我们使用USE语句引入了"globals"模块，并可以直接访问和修改其中定义的全局变量"global_var"。
需要注意的是，为了能够正确访问全局变量，我们需要确保在调用"access_global"函数之前，先调用了一个设置全局变量的函数或语句。
这样，通过使用MODULE模块，我们可以在Fortran函数中访问全局变量。这种方法可以方便地共享数据，并在不同的函数之间传递信息。
腾讯云相关产品和产品介绍链接地址：
- 腾讯云云服务器（CVM）：https://cloud.tencent.com/product/cvm
- 腾讯云云函数（SCF）：https://cloud.tencent.com/product/scf
- 腾讯云云数据库MySQL版（TencentDB for MySQL）：https://cloud.tencent.com/product/cdb_mysql
- 腾讯云对象存储（COS）：https://cloud.tencent.com/product/cos
- 腾讯云人工智能（AI）：https://cloud.tencent.com/product/ai
相关·内容
我有一个涉及访问外部库的类实例的问题，这个库本身使用全局变量，并且意味着作为单例访问。因此，我想/必须为每个swift类实例加载dylib的一个实例。我已经成功地实现并测试了dylib对象的c头文件，用它们创建了一个模块映射，并且我能够访问fortran函数并在我的swift类中使用它们(到处传递不安全的指针)。方式实现的-它使用全局变量和嵌套函数调用，因此从多个myClass实例调用它是完全不安全的。当我创建第二个myCl
浏览 1提问于2015-07-16得票数 1
具体地说，我正在尝试在Fortran中模拟。为了做到这一点，我需要从一组硬币中读取。因为函数是递归的，因为函数会被调用很多次，所以我不想每次都把列表作为参数传递进来，因为如果我有列表副本的加载，代码就会有大量的内存开销。此外，在前面的问题中，比如简化小数的函数，我需要通过一个非常大的列表。所以我的问题是:在Fortran中，如何从函数访问主程序中定义的变量。
浏览 9提问于2018-09-07得票数 2
回答已采纳
我有一个fortran (非托管代码)动态链接库作为计算引擎，一个C#表单作为图形用户界面。你知道如何做到这一点吗？
浏览 2提问于2010-04-16得票数 1
回答已采纳
2回答
我有一个项目，一半是C语言，另一半是Fortran 77语言。不，不是Fortran 90或03，是Fortran 77。如果我可以将在C端生成的指针传递回Fortran，然后Fortran会根据需要在其他C函数中处理它们，那么代码就会干净得多。实际上，C代码充满了不应该是全局变量的全局变量，否则就会变得一团糟。那么，在C和Fortran之间传递不透明的指针有什么合理可靠的方法吗？
浏览 1提问于2009-10-16得票数 1
回答已采纳
1回答
我学习了如何在Fortran代码中使用C全局变量，如下例所示。但是如何在相反的方向上这样做，即在Fortran中定义(并初始化)一个变量，并使C可以访问它？Fortran binding code USE ISO_C_BINDING !
浏览 5提问于2014-03-21得票数 3
回答已采纳
3回答
我可以在Fortran ( 77标准)中创建和使用动态二维数组。现在，我想用Fortran程序中的C函数(假设使用'malloc')创建我的动态二维数组，并能够通过Fortran程序访问它。在Fortran中，我还希望能够像(1:n，2)或a(1,2)那样执行smth，并且还能够从Fortran子例程中传递和检索数组。请您给我举个例子，并花点时间解释一下(如果可能的话，我真的很感激)记忆将如何对齐？非常感谢！另外，
浏览 0提问于2012-06-30得票数 4
回答已采纳
由于某些原因，我需要使用一个仅能找到Fortran 90子例程的ODE求解器，而且代码太大，无法简单地将其转换为C。第二个问题归结为: Fortran如何、何时为变量分配和释放内存，以及(如何)从函数参数中重用内存？到目前为止，我已经发现COMMON部分对应于C中的全局变量，但是可以使用Fortran的OpenMP指令!$OMP THREADPRIVATE(/…/)使线程本地化。这是正确的吗？其他局部变量呢？gfortran的-fr
浏览 3提问于2014-03-13得票数 2
回答已采纳
2回答
现在，由于我没有访问Intel编译器的权限，所以需要使用GNU Fortran编译器使其工作。我很抱歉，由于我的大学的IP限制，我无法从代码结构或终端输出中输入任何东西。尽管如此，我将尽力最好地描述的问题。GNU Fortran无法读取太长的行，而且我在编译过程中会出错。因此，我不得不使用'&‘符号将它拆分成多行。
模块D.f90包含声明的所有全
浏览 1提问于2016-07-26得票数 0
--我的问题是，是如何(以及它是否)对编译为外部模块(通过f2py)并由f2py脚本使用的Fortran模块进行垃圾收集的？背景Fortran模块的结构如下所示，不同的子程序使用模块中定义的一些全局变量以及它们自己的虚拟变量。全局变量被直接<e
浏览 3提问于2019-11-04得票数 0
回答已采纳
与f90相比，为什么Fortran2003中的变量不能初始化为零？
我有一个来自文件的函数中的变量。它已初始化为0。我想使用另一个函数，然后它会显示一个无用的值。即使对于全局变量也是如此。是否需要为fortran 2003编译器设置任何选项？
浏览 0提问于2009-07-21得票数 5
如何从Fortran调用void *function(...)？void add(int *csum, int *ca, int *cb) { *csum = *ca + *cb; }INTEGER :: fsum, fa现在有几个函数，大致类似于：v
浏览 2提问于2012-06-13得票数 3
回答已采纳
代码使用了用GCC 4.5编译的C++和用最新版本的ifort编译的fortran。我们可能需要支持一个旧的嵌入式linux平台与一个几年前的版本的GCC (仍在等待客户的规格)。
浏览 1提问于2011-02-11得票数 1
有没有办法在FORTRAN中使用python函数？我得到了一个包含一些函数的python脚本，我需要从FORTRAN代码访问这个函数。我见过“f2py”和py2exe，前者允许从Python访问FORTRAN子例程，后者将python脚本编译为可执行文件。有没有关于'py2f‘的东西？Python脚本可以编译成目标文件吗？然后我就可以把它和FORTRAN代码联系起来。例如，假设'mypython_
浏览 1提问于2010-03-02得票数 4
1回答
此外，我应该如何编写以便可以更改x和y__的值，这些值也可以从其他文件中访问？回到我的问题，我猜想numpy.ndarray只是指针，我们不改变指针的值，所以z已经改变了。但是即使这样，z的行为似乎也非常危险，因为我不能相信z是一个全局变量，而且它的值在所有文件中都
浏览 0提问于2018-03-22得票数 3
我想知道如何在Fortran模块中设置全局变量，我在omp parallel部分调用该模块。我知道THREADPRIVATE可以将变量列表设置为私有，但我有太多的全局变量需要设置。有没有办法将全局变量的默认值更改为private？
浏览 25提问于2017-08-15得票数 0
1回答
我已经将Fortran PowerStation(4.0)中的一些Fortran代码移植到Fortran11(2003)编译器中。为了保持新旧编译器之间的double和real值，我将properties>fortran>data>"Default Read Kind"从4改为8。现在的问题是，全局变量不能维护从一个文件到另一个文件的数据。
假设我在一个文件中创建了一个名为abc的real*8变量作为全局变量(COMMON/
浏览 1提问于2009-10-09得票数 0
然而，许多科学代码都是用Fortran语言编写的。如何在Fortran程序中调用经过训练的网络？
浏览 0提问于2021-02-09得票数 2
4回答
在Fortran中，是否可以将函数放在公共块中，如: common /myblock/ func (其中x是某个变量，func是一个函数)。我的问题是，我想创建一个函数s(x)，它调用外部函数func(x)，但不在s(x)中传递func。对于我的项目，s(x)只能是一个变量的函数，也就是说，我不想这样做:函数s(x，func) s=func(x)
相反，我希望我可以这样做:函数s(x) common /myblock&#x
浏览 16提问于2011-05-22得票数 0
3回答
我从Fortran 90程序调用一个C函数(，我必须使用Fortran 90)。这个C函数接受两个参数，并返回一个浮点指针。我似乎无法在Fortran代码中正确地打印返回的数据。我成功地将真正的Fortran变量作为参数传递，让C函数设置它们(正如Fortran通过引用传递的那样)，然后访问数据。但是，我必须将指针作为返回变量返回，因为这是一个遗留函数使用的方法(我正在重新实现该方法)。
在
浏览 5提问于2013-03-22得票数 2
回答已采纳
我正在使用ctype库从Python访问一个dll。dll中的函数可以按序号访问，而不是按名称访问。我可以使用Dependency检查dll，并将序数与函数名关联起来。我希望访问的dll中有一个全局错误号变量。Dependency显示它的序数值为13。error_value = c_int.in_dll(my_dll_han
浏览 4提问于2017-03-22得票数 0
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
