Changeset 4489 for LMDZ6/trunk/libf/phylmd/readaerosolstrato.F90
- Timestamp:
- Mar 31, 2023, 8:42:57 PM (15 months ago)
- Location:
- LMDZ6/trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/trunk
- Property svn:mergeinfo changed
/LMDZ6/branches/LMDZ_ECRad (added) merged: 4175,4177-4183,4188,4192,4200-4203,4355,4366,4387-4388,4390,4444,4482,4486,4488
- Property svn:mergeinfo changed
-
LMDZ6/trunk/libf/phylmd/readaerosolstrato.F90
r3531 r4489 31 31 integer n_lev ! number of levels in the input data 32 32 integer n_month ! number of months in the input data 33 real, pointer:: latitude(:)34 real, pointer:: longitude(:)35 real, pointer:: time(:)36 real, pointer:: lev(:)33 real, allocatable:: latitude(:) 34 real, allocatable:: longitude(:) 35 real, allocatable:: time(:) 36 real, allocatable:: lev(:) 37 37 integer i, k, band, wave 38 38 integer, save :: mth_pre=1
Note: See TracChangeset
for help on using the changeset viewer.