這句話的意思是,有一個(gè)聲明語(yǔ)句,它不能在執(zhí)行語(yǔ)句的部分.
一段Fortran代碼,應(yīng)該先是全部的聲明語(yǔ)句,然后是全部的執(zhí)行語(yǔ)句.
比如
real ::a
integer b
real ::c
a = b * 1.0
而不能是
real ::a
integer b
a = b * 1.0
real ::c嗯,我最開(kāi)始那一堆都放在‘common.inc’里面,然后 INCLUDE 'COMMON.INC' INTEGER I,J,K本來(lái)‘common.inc’里面都是定義的變量,后來(lái)我加了OPEN (111000,FILE='MOLD.BX')就不行了,是這個(gè)原因吧。
Fortran里面的一些問(wèn)題
Fortran里面的一些問(wèn)題
我有一個(gè)老程序,里面有幾個(gè)部分是讀數(shù)到一個(gè)數(shù)組中,以前的數(shù)組不是動(dòng)態(tài)的,大致類(lèi)似于這樣的定義:
DOUBLE PRECISION US_T1(NX,NY,NZ),US_T2(NX,NY,NZ)
其中NX,NY,NZ都是提前定義好的PARAMETER (NX=33,NY=56,NZ=64)
現(xiàn)在我想改成動(dòng)態(tài)數(shù)組,于是出現(xiàn)問(wèn)題了,我是這么修改的:
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))
然后出現(xiàn)了這樣的問(wèn)題:
A specification statement cannot appear in the executable section
我有一個(gè)老程序,里面有幾個(gè)部分是讀數(shù)到一個(gè)數(shù)組中,以前的數(shù)組不是動(dòng)態(tài)的,大致類(lèi)似于這樣的定義:
DOUBLE PRECISION US_T1(NX,NY,NZ),US_T2(NX,NY,NZ)
其中NX,NY,NZ都是提前定義好的PARAMETER (NX=33,NY=56,NZ=64)
現(xiàn)在我想改成動(dòng)態(tài)數(shù)組,于是出現(xiàn)問(wèn)題了,我是這么修改的:
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))
然后出現(xiàn)了這樣的問(wèn)題:
A specification statement cannot appear in the executable section
其他人氣:594 ℃時(shí)間:2020-06-19 10:03:38
優(yōu)質(zhì)解答
我來(lái)回答
類(lèi)似推薦
- 大家?guī)兔纯碏ortran中這個(gè)錯(cuò)誤是什么?怎么改?
- fortran移動(dòng)數(shù)據(jù)問(wèn)題
- 大柏地的“柏”應(yīng)讀什么讀音
- 哪些藻類(lèi)是原核生物?
- 把下面這些動(dòng)物和象征次連起來(lái)
- 八上科學(xué)(電阻)
- 9個(gè)600相加怎么算
- 小明在計(jì)算有余數(shù)的除法時(shí),把被除數(shù)115錯(cuò)寫(xiě)成151,結(jié)果商比正確的結(jié)果大了3,但余數(shù)恰好相同,寫(xiě)出這個(gè)除法算式:_.
- 在他們的業(yè)余時(shí)間 英語(yǔ)怎么說(shuō)
- 運(yùn)動(dòng)員拉弓射箭時(shí),弓的_能轉(zhuǎn)化為箭的_能.
- 形容人很渺小的成語(yǔ)
- 二次根式坡比運(yùn)算
猜你喜歡
- 1如何理解矛盾的兩種基本屬性在事物發(fā)展中的作用
- 2以《冬天來(lái)了 ,春天還會(huì)遠(yuǎn)嗎?》為題 主要是寫(xiě)不怕困難,就離成功不遠(yuǎn)了
- 3英語(yǔ)17.-Are you going to have a holiday this year?
- 4橢圓C方程為(x^2)/8 +(Y^2)/4=1,若直線y=x+m與橢圓C交于不同的兩點(diǎn)A,B,且線段AB的中點(diǎn)M關(guān)于直線y=x+1的對(duì)稱(chēng)點(diǎn)在圓X^2+Y^2=1上,求m的值
- 5用愿意.就.,愿意.就.造句
- 6下列說(shuō)法中屬于控制噪音聲源的是 ( )屬于阻擋噪音傳播的措施是( )屬于防止噪聲進(jìn)入人耳的措施是
- 7仿寫(xiě)句子,用上草長(zhǎng)鶯飛
- 8Here is a ticket to the movie for you.You are____(luck).填什么?為什么添這個(gè)?
- 9某元素的一種粒子的結(jié)構(gòu)示意圖為,下列說(shuō)法錯(cuò)誤的是( ?。?A.該粒子屬于原子 B.該元素在化合物中顯+1價(jià) C.該元素的一個(gè)離子含有11個(gè)電子 D.該元素的原子在化學(xué)反應(yīng)中容易失去電子
- 10中國(guó)地球有多大?
- 11幾個(gè)關(guān)于餐廳英語(yǔ)用法的問(wèn)題
- 12圓圓的爸爸去銀行取款,第一次取了存款的一半還多5元,第二次取了余下的一半還少10元,還剩135元,一共多少