請教FORTRAN中COMMON/w2/ x,y,是定義全局變量嗎?
請教FORTRAN中COMMON/w2/ x,y,是定義全局變量嗎?
前后文如下:
PROGRAM MAIN
integer N
parameter(N=4)
REAL*8x0,y0,z0,x,y,z,ax,ay,az,vx0,vy0,vz0,epsilon
REAL*8 ax0,ay0,az0
REAL*8 funx,funy,funz,funp
EXTERNALfunx,funy,funz,funp
COMMON/w2/ x,y,z
REAL*8 a,b,c
REAL*8 gamma
COMMON /gamma/ gamma
REAL*8 a1,b1,e0,e,phi0,phi,s1,s2,s3
EXTERNAL midpnt
前后文如下:
PROGRAM MAIN
integer N
parameter(N=4)
REAL*8x0,y0,z0,x,y,z,ax,ay,az,vx0,vy0,vz0,epsilon
REAL*8 ax0,ay0,az0
REAL*8 funx,funy,funz,funp
EXTERNALfunx,funy,funz,funp
COMMON/w2/ x,y,z
REAL*8 a,b,c
REAL*8 gamma
COMMON /gamma/ gamma
REAL*8 a1,b1,e0,e,phi0,phi,s1,s2,s3
EXTERNAL midpnt
其他人氣:916 ℃時間:2020-05-26 03:39:16
優(yōu)質解答
COMMON /w2/ x,y,z表示定義一個公共塊w2, 包含變量x,y和z. 簡單說來, 就是開辟一塊公共的內存空間存放變量和值, 其他子程序也可以使用這個公共空間的變量和值.從Fortran90開始, 不再推薦co...лл~????????????C?????ж????????????????????main????????????е?????ж??????????e??對C的不熟悉, 所以不清楚二者是否是一致.是的, 定義了common 之后, program main可以用, 其他subroutine也可以用, 不過用其中值之前需要先初始化.
我來回答
類似推薦
- Fortran中common的用法 COMMON /a/b,/c/d/e ,f
- fortran中的::
- fortran 中的%
- As we all know,numbers____in e-mail English to standnfor words.
- 在一根長931米的注滿水的鑄鐵水管的一端敲一下,在另一端聽到三次聲音,為什么?
- who do these books belong to?who does these book
- Singular Number,Plural Number,Regular Plural
- which team __yesterday's match,chinese or french?A was win Bwon C did won D winning
- 請教為什么在美國或中國登月的照片上,作為背景的太空沒有一顆星星?
- 在平面直角坐標系中,一動點P從原點O出發(fā)按下面規(guī)律進行移動,
- if only the letter__there in time.
- 在探究“怎樣用滑動變阻器改變燈泡的亮度”時,閉合開關前,滑動變阻器的滑片應調到_____處.這是因為這樣電路中的電阻_____,電流_____,可以保護_____.
猜你喜歡
- 1一根長314厘米的繩子在一根管子的外壁上恰好繞了十圈,如果這根管子的管壁厚為五毫米那么這根管子的橫截面
- 2薛譚學謳于秦青,未窮青之技,自謂盡之,遂辭歸.秦青弗止,踐行于郊外.
- 3干溫24.8 濕溫21 求相對濕度與空氣溫度?
- 4、粉刷62平方米的房間墻面,若每平方米需要涂料0.5升,在實際粉刷時要多用10%的涂料,粉刷完房間墻面要用
- 5姥姥的剪紙 課文 這篇課文的中心句是什么
- 6商店運來1800千克蘋果第一天賣掉中總數(shù)的百分之二十,第二天賣掉剩余的百分之三十五,還剩多少千克蘋果
- 7用兩種正多邊形拼地板,其中的一種是正八邊形,則另一種正多邊形的邊數(shù)是( ) A.正五邊形 B.正六邊形 C.正三角形 D.正四邊形
- 8一本書售價4元.如果樂樂買了這本書,則樂樂剩下的錢與天天的錢數(shù)之比為2:5;
- 9電容器335K代表什么意思
- 10已知X,Y大于0.(1除X)+(9除Y)=1,求X+Y的最小值
- 11m為非零有理數(shù),比較m,m分之1和負m的大小
- 12一道大學物理題,