Fortran里面的一些问题我有一个老程序,里面有几个部分是读数到一个数组中,以前的数组不是动态的,大致类似于这样的定义:DOUBLE PRECISION US_T1(NX,NY,NZ),US_T2(NX,NY,NZ)其中NX,NY,NZ都是提前定义好的P

来源:学生作业帮助网 编辑:六六作业网 时间:2024/12/20 08:11:44
Fortran里面的一些问题我有一个老程序,里面有几个部分是读数到一个数组中,以前的数组不是动态的,大致类似于这样的定义:DOUBLEPRECISIONUS_T1(NX,NY,NZ),US_T2(NX

Fortran里面的一些问题我有一个老程序,里面有几个部分是读数到一个数组中,以前的数组不是动态的,大致类似于这样的定义:DOUBLE PRECISION US_T1(NX,NY,NZ),US_T2(NX,NY,NZ)其中NX,NY,NZ都是提前定义好的P
Fortran里面的一些问题
我有一个老程序,里面有几个部分是读数到一个数组中,以前的数组不是动态的,大致类似于这样的定义:
DOUBLE PRECISION US_T1(NX,NY,NZ),US_T2(NX,NY,NZ)
其中NX,NY,NZ都是提前定义好的PARAMETER (NX=33,NY=56,NZ=64)
现在我想改成动态数组,于是出现问题了,我是这么修改的:
DOUBLE PRECISION,allocatable::US_T1(:,:,:),US_T2(:,:,:)
OPEN (111000,FILE='MOLD.BX')
READ (111000,*)
READ (111000,*)
READ (111000,*) NX,NZ,NY
\x05CLOSE(111000)
allocate(US_T1(NX,NY,NZ),US_T2(NX,NY,NZ))
然后出现了这样的问题:
A specification statement cannot appear in the executable section

Fortran里面的一些问题我有一个老程序,里面有几个部分是读数到一个数组中,以前的数组不是动态的,大致类似于这样的定义:DOUBLE PRECISION US_T1(NX,NY,NZ),US_T2(NX,NY,NZ)其中NX,NY,NZ都是提前定义好的P
这句话的意思是,有一个声明语句,它不能在执行语句的部分.
一段Fortran代码,应该先是全部的声明语句,然后是全部的执行语句.
比如
real ::a
integer b
real ::c
a = b * 1.0
而不能是
real ::a
integer b
a = b * 1.0
real ::c

Fortran里面的一些问题我有一个老程序,里面有几个部分是读数到一个数组中,以前的数组不是动态的,大致类似于这样的定义:DOUBLE PRECISION US_T1(NX,NY,NZ),US_T2(NX,NY,NZ)其中NX,NY,NZ都是提前定义好的P Fortran关于循环的问题我要用Fortran算一个案例,里面要算30000步,计划每算十步需要更新一下列表,这个每算十步,如何表示出来呢? fortran 某一行最小值有没有什么简单的表示方法可以表示fortran里面一个数组某一行的最小值 fortran中do循环应用问题.比如我有一组数据,2,4,6,8,10,12,能不能用fortran写一个循环程序,让第一次循环,输出的是第一个数2减半的数(也就是1),第二次循环,输出的是前面两个数据2,4,减半的数,第 求fortran大神帮我编一个Fortran程序计算无理数π的1-100的小数位, fortran里面的do循环问题do i=1,0,1...;.enddo这种循环会循环一次么?在c里面第一次循环前就要判断,所以上面一次也不会循环,在fortran里面是什么样子? 关于fortran数值计算的问题我的fortran计算中出现了11.04×10000=110399这种现象,求大侠指教这是什么原因 关于语文课文<老王> 一些问题分析老王的形象,并说说如何体现的如何理解文章最后一段话”我渐渐明白:那是一个幸运的人对一个不幸者的愧怍” 关于红细胞的一些问题.不成熟的红细胞里面有线粒体吗?成熟红细胞厌氧呼吸?厌氧呼吸产生的乳酸怎么解决?关于最后一个问题,我说的是红细胞厌氧呼吸产生的乳酸. 我又看过一个电视节目,记得里面有两个主持人,我看的时候有珍珠奶茶,口罩等地健康问题.谁知道?或者能介绍一些有教育意义的电视节目. 我是谁?一个哲学问题一个很老的哲学问题到底是什么呢? fortran 中数据续写的问题比如有5*5的数据,文件为txt格式,其中有数字有英文有汉字,我现在想在这个数据每行的末尾加上一个数据,使其变成5*6的数据,本来是可以全读出来再加上一列写成一个新 用牛顿切线法解决一个问题(fortran 语言) 求一个fortran解决线性方程的代码.补充:用高斯消元法,要求有例子的. 台湾腔里有一句“老梗”,最近看台湾电视剧,里面有台词说“我怎么会造那种老梗的事情”, Fortran矩阵输出问题 一个简单的fortran问题,关于write的,help,tks一个简单的fortran问题,为什么执行语句 write(*,‘(1x,3i4)')(j,j=1,10) 后,生成的记录是4?help 示波器的使用问题我公司里面有个充电设备.要判断可控硅的好坏需要用到示波器.我对示波器不是很了解.我用的示波器是CRT示波器,探头是一个钩子并带夹子的那种,比较老了.我在充电机充电