爱气象,爱气象家园! 

气象家园

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博登陆

只需一步, 快速开始

搜索
查看: 4610|回复: 0

[源代码] fortran

[复制链接]

新浪微博达人勋

发表于 2018-9-7 16:03:27 | 显示全部楼层 |阅读模式

登录后查看更多精彩内容~

您需要 登录 才可以下载或查看,没有帐号?立即注册 新浪微博登陆

x
用visual studio2010和visual Fortran composer2013,编译了以下程序
PROGRAM EXO
    INTEGER I,J,K,Q,U,T,TT,PP,SS,MM,NN
    DOUBLE PRECISION C(81,41,2),AX(81,41,2),AY(81,41,2),AZ(81,41,2),XX(81,41,2),ZZ(81,41,2),E(80,40,1),P_X(6480,1640,2),P_Y(6480,1640,2),P_Z(6480,1640,2),ZC(6480,1640,2),PP_X(6480,1640,2),PP_Y(6480,1640,2),PP_Z(6480,1640,2)
    DOUBLE PRECISION XX_(6480,1640,2),ZZ_(6480,1640,2),XXX(6480,1640,2),ZZZ(6480,1640,2),TC(80,40),SX(81,41),KK1(80,40,2),KK2(80,40,2),KK3(80,40,2),KK4(80,40,2),KK(80,40,2),AAAA(6480,1640,4)
    REAL*8 z,h,JD,JJ,DD,XYZ,SXE,TTC,ZZZ_,mmm,NNN,TJ
    PARAMETER(PI=3.1415926)
         STOP
END

中间内容省略,能生成,但运行显示not a valid win32 application ,但删掉上面AAAA(6480,1640,4)就可以运行,这是因为三维数组建立过多?
希望各个大神能帮菜鸡看看,因为确实我有需要建立那么多数组,而且未来应该数组量更多怎么办?
密码修改失败请联系微信:mofangbao
您需要登录后才可以回帖 登录 | 立即注册 新浪微博登陆

本版积分规则

Copyright ©2011-2014 bbs.06climate.com All Rights Reserved.  Powered by Discuz! (京ICP-10201084)

本站信息均由会员发表,不代表气象家园立场,禁止在本站发表与国家法律相抵触言论

快速回复 返回顶部 返回列表