将F77普通集团更改为F90或F95

时间:2013-07-15 14:36:30

标签: fortran block fortran-common-block

我有一个旧的fortran程序,像这样

common/blc0/nxt,iwbcoe,iebcoe,iturb,icoord,n,np,npt,igwall,
+        pr,vgp,gwa,rey,cel,eta(81),up(81),deta(81),a(81),yp(81),
+        x(101),xod(101),gw(101),pw(101),ge(101),g(81,2),p(81,2)

common/blc1/ s1(81),s2(81),s3(81),r1(81),r2(81),a1(81,2),a2(81,2)
+            ,etae
common/blc2/expy0a(81),expy0b(81),y0a(81),y0b(81),prt(81),aplus,
1            ro_ks,f,rp(81),dudy(81)

我想将它转换为fortran 90或95.我不知道blc0,blc1和blc2的含义是什么。 1和ro_ks在最后一行是什么意思?任何人都可以将它改为fortran 90或95,请???

1 个答案:

答案 0 :(得分:0)