- Timestamp:
- Mar 11, 2009, 4:25:24 PM (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4-dev/libf/dyn3d/read_reanalyse.F
r1046 r1120 46 46 save varidpl,ncidQ,varidQ 47 47 48 real *4unc(iip1,jjp1,nlevnc),vnc(iip1,jjm,nlevnc)49 real *4tnc(iip1,jjp1,nlevnc),psnc(iip1,jjp1)50 real *4Qnc(iip1,jjp1,nlevnc)51 real *4plnc(iip1,jjp1,nlevnc)52 real *4apnc(nlevnc),bpnc(nlevnc)48 real unc(iip1,jjp1,nlevnc),vnc(iip1,jjm,nlevnc) 49 real tnc(iip1,jjp1,nlevnc),psnc(iip1,jjp1) 50 real Qnc(iip1,jjp1,nlevnc) 51 real plnc(iip1,jjp1,nlevnc) 52 real apnc(nlevnc),bpnc(nlevnc) 53 53 54 54 integer start(4),count(4),status
Note: See TracChangeset
for help on using the changeset viewer.