fortran使用IOAPI读取.ncf文件

kshxia

这是里面的变量。


integer*4      ::  TFLAG( 2, 124, nrec )
      real*4       NO2( 40, 44, 14, nrec )
      real*4       NO( 40, 44, 14, nrec )
      real*4       O( 40, 44, 14, nrec )
      real*4       O3( 40, 44, 14, nrec )
      real*4       NO3( 40, 44, 14, nrec )
      real*4       O1D( 40, 44, 14, nrec )
      real*4       OH( 40, 44, 14, nrec )
      real*4       HO2( 40, 44, 14, nrec )
      real*4       N2O5( 40, 44, 14, nrec )
      real*4       HNO3( 40, 44, 14, nrec )
      real*4       HONO( 40, 44, 14, nrec )
      real*4       PNA( 40, 44, 14, nrec )
      real*4       H2O2( 40, 44, 14, nrec )
      real*4       XO2( 40, 44, 14, nrec )
      real*4       XO2N( 40, 44, 14, nrec )
      real*4       NTR( 40, 44, 14, nrec )
      real*4       ROOH( 40, 44, 14, nrec )
      real*4       FORM( 40, 44, 14, nrec )
      real*4       ALD2( 40, 44, 14, nrec )
      real*4       ALDX( 40, 44, 14, nrec )
      real*4       PAR( 40, 44, 14, nrec )
      real*4       CO( 40, 44, 14, nrec )
      real*4       MEO2( 40, 44, 14, nrec )
      real*4       MEPX( 40, 44, 14, nrec )
      real*4       MEOH( 40, 44, 14, nrec )
      real*4       HCO3( 40, 44, 14, nrec )
      real*4       FACD( 40, 44, 14, nrec )
      real*4       C2O3( 40, 44, 14, nrec )
      real*4       PAN( 40, 44, 14, nrec )
      real*4       PACD( 40, 44, 14, nrec )
      real*4       AACD( 40, 44, 14, nrec )
      real*4       CXO3( 40, 44, 14, nrec )
      real*4       PANX( 40, 44, 14, nrec )
      real*4       ROR( 40, 44, 14, nrec )
      real*4       OLE( 40, 44, 14, nrec )
      real*4       ETH( 40, 44, 14, nrec )
      real*4       IOLE( 40, 44, 14, nrec )
      real*4       TOL( 40, 44, 14, nrec )
      real*4       CRES( 40, 44, 14, nrec )
      real*4       TO2( 40, 44, 14, nrec )
      real*4       TOLRO2( 40, 44, 14, nrec )
      real*4       OPEN( 40, 44, 14, nrec )
      real*4       CRO( 40, 44, 14, nrec )
      real*4       MGLY( 40, 44, 14, nrec )
      real*4       XYL( 40, 44, 14, nrec )
      real*4       XYLRO2( 40, 44, 14, nrec )
      real*4       ISOP( 40, 44, 14, nrec )
      real*4       ISPD( 40, 44, 14, nrec )
      real*4       TERP( 40, 44, 14, nrec )
      real*4       SO2( 40, 44, 14, nrec )
      real*4       SULF( 40, 44, 14, nrec )
      real*4       ETOH( 40, 44, 14, nrec )
      real*4       ETHA( 40, 44, 14, nrec )
      real*4       CL2( 40, 44, 14, nrec )
      real*4       CL( 40, 44, 14, nrec )
      real*4       HOCL( 40, 44, 14, nrec )
      real*4       CLO( 40, 44, 14, nrec )
      real*4       FMCL( 40, 44, 14, nrec )
      real*4       HCL( 40, 44, 14, nrec )
      real*4       BENZENE( 40, 44, 14, nrec )
      real*4       BENZRO2( 40, 44, 14, nrec )
      real*4       SESQ( 40, 44, 14, nrec )
      real*4       ASO4J( 40, 44, 14, nrec )
      real*4       ASO4I( 40, 44, 14, nrec )
      real*4       ANH4J( 40, 44, 14, nrec )
      real*4       ANH4I( 40, 44, 14, nrec )
      real*4       ANO3J( 40, 44, 14, nrec )
      real*4       ANO3I( 40, 44, 14, nrec )
      real*4       AALKJ( 40, 44, 14, nrec )
      real*4       AXYL1J( 40, 44, 14, nrec )
      real*4       AXYL2J( 40, 44, 14, nrec )
      real*4       AXYL3J( 40, 44, 14, nrec )
      real*4       ATOL1J( 40, 44, 14, nrec )
      real*4       ATOL2J( 40, 44, 14, nrec )
      real*4       ATOL3J( 40, 44, 14, nrec )
      real*4       ABNZ1J( 40, 44, 14, nrec )
      real*4       ABNZ2J( 40, 44, 14, nrec )
      real*4       ABNZ3J( 40, 44, 14, nrec )
      real*4       ATRP1J( 40, 44, 14, nrec )
      real*4       ATRP2J( 40, 44, 14, nrec )
      real*4       AISO1J( 40, 44, 14, nrec )
      real*4       AISO2J( 40, 44, 14, nrec )
      real*4       ASQTJ( 40, 44, 14, nrec )
      real*4       AORGCJ( 40, 44, 14, nrec )
      real*4       AORGPAJ( 40, 44, 14, nrec )
      real*4       AORGPAI( 40, 44, 14, nrec )
      real*4       AECJ( 40, 44, 14, nrec )
      real*4       AECI( 40, 44, 14, nrec )
      real*4       A25J( 40, 44, 14, nrec )
      real*4       ACORS( 40, 44, 14, nrec )
      real*4       ASOIL( 40, 44, 14, nrec )
      real*4       NUMATKN( 40, 44, 14, nrec )
      real*4       NUMACC( 40, 44, 14, nrec )
      real*4       NUMCOR( 40, 44, 14, nrec )
      real*4       SRFATKN( 40, 44, 14, nrec )
      real*4       SRFACC( 40, 44, 14, nrec )
      real*4       SRFCOR( 40, 44, 14, nrec )
      real*4       AH2OJ( 40, 44, 14, nrec )
      real*4       AH2OI( 40, 44, 14, nrec )
      real*4       ANAJ( 40, 44, 14, nrec )
      real*4       ACLJ( 40, 44, 14, nrec )
      real*4       ACLI( 40, 44, 14, nrec )
      real*4       ANAK( 40, 44, 14, nrec )
      real*4       ACLK( 40, 44, 14, nrec )
      real*4       ASO4K( 40, 44, 14, nrec )
      real*4       ANH4K( 40, 44, 14, nrec )
      real*4       ANO3K( 40, 44, 14, nrec )
      real*4       AH2OK( 40, 44, 14, nrec )
      real*4       AISO3J( 40, 44, 14, nrec )
      real*4       AOLGAJ( 40, 44, 14, nrec )
      real*4       AOLGBJ( 40, 44, 14, nrec )
      real*4       NH3( 40, 44, 14, nrec )
      real*4       SV_ALK( 40, 44, 14, nrec )
      real*4       SV_XYL1( 40, 44, 14, nrec )
      real*4       SV_XYL2( 40, 44, 14, nrec )
      real*4       SV_TOL1( 40, 44, 14, nrec )
      real*4       SV_TOL2( 40, 44, 14, nrec )
      real*4       SV_BNZ1( 40, 44, 14, nrec )
      real*4       SV_BNZ2( 40, 44, 14, nrec )
      real*4       SV_TRP1( 40, 44, 14, nrec )
      real*4       SV_TRP2( 40, 44, 14, nrec )
      real*4       SV_ISO1( 40, 44, 14, nrec )
      real*4       SV_ISO2( 40, 44, 14, nrec )
      real*4       SV_SQT( 40, 44, 14, nrec )

shangbn305

kshxia 发表于 2012-6-14 11:35

                               
登录/注册后可看大图

这是里面的变量。

真的是大神呀！ 可以告诉我是如何读出的这些变量么？ ncdump? 我要是想读出NO2的第一层，第一个网格，第一个小时的变量值，怎么读呢？ 直接write出来么？    real*4       NO2( 40, 44, 14, nrec )表示NO2这个变量的维数是40*44*14*nrec, 40个行，44个列，14层，nrec是？

shangbn305

kshxia 发表于 2012-6-14 11:35

                               
登录/注册后可看大图

这是里面的变量。

可以告诉我这个文件内的变量是如何读出来么？ ncdump?   还有就是，我想要的是NO2第一层第一个网格点第一小时的变量的值，这里定义的real*4       NO2( 40, 44, 14, nrec ) 内的nrec表示什么呢，直接用write函数可以读出来么？write(*,*) 文件名.NO2(1,1,1.?) ，应该不是这样写。。。烦请大神指导一下，谢谢！

shangbn305

kshxia 发表于 2012-6-14 11:35

                               
登录/注册后可看大图

这是里面的变量。

我用ncdump读出文件的变量了，但是具体读出某个变量的值应该怎么做呢？

shangbn305

kshxia 发表于 2012-6-14 15:37

                               
登录/注册后可看大图

我完全可以把程序给你，但是最好还是自己搜搜论坛里的帖子，这样你自己才有收货。
其实论坛里有好多读取 ...

谢谢O(∩_∩)O~ 那我好好学习学习，明天是最后期限了，因此我心里还挺着急的，实在是弄不出来的话还是得请教您O(∩_∩)O~

shangbn305

shangbn305 发表于 2012-6-14 15:50

                               
登录/注册后可看大图

谢谢O(∩_∩)O~ 那我好好学习学习，明天是最后期限了，因此我心里还挺着急的，实在是弄不出来的话还是得请 ...

我是用大服务器远程跑程序的，为啥找不到netcdf.inc文件捏。。。

shangbn305

kshxia 发表于 2012-6-14 15:37

                               
登录/注册后可看大图

我完全可以把程序给你，但是最好还是自己搜搜论坛里的帖子，这样你自己才有收货。
其实论坛里有好多读取 ...

我是用大服务器远程跑程序的，为啥找不到netcdf.inc文件捏。。。

kshxia

shangbn305 发表于 2012-6-14 16:19

                               
登录/注册后可看大图

我是用大服务器远程跑程序的，为啥找不到netcdf.inc文件捏。。。

这个是netcdf相关的库文件和说明。需要用到netcdf.lib，netcdf.inc（或者netcdf.h），和netcdf.dll。

kshxia

shangbn305 发表于 2012-6-14 16:19

                               
登录/注册后可看大图

我是用大服务器远程跑程序的，为啥找不到netcdf.inc文件捏。。。

请参考：http://www.06climate.com/view/1047.html

shangbn305

kshxia 发表于 2012-6-14 16:27

                               
登录/注册后可看大图

请参考：http://www.06climate.com/view/1047.html

[img]file:///C:/Documents%20and%20Settings/Administrator/Application%20Data/Tencent/Users/274372265/QQ/WinTemp/RichOle/%257WVHU~01O%25H([FG[$591G0.jpg[/img]