- Timestamp:
- Jul 1, 2022, 3:27:03 PM (2 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/LMDZ_ECRad/libf/phylmd/rrtm/readaerosolstrato1_rrtm.F90
r3438 r4192 32 32 INTEGER n_lev ! number of levels in the input data 33 33 INTEGER n_month ! number of months in the input data 34 REAL, POINTER:: latitude(:)35 REAL, POINTER:: longitude(:)36 REAL, POINTER:: time(:)37 REAL, POINTER:: lev(:)34 REAL, ALLOCATABLE:: latitude(:) 35 REAL, ALLOCATABLE:: longitude(:) 36 REAL, ALLOCATABLE:: time(:) 37 REAL, ALLOCATABLE:: lev(:) 38 38 INTEGER k, band, wave, i 39 39 INTEGER, SAVE :: mth_pre=1
Note: See TracChangeset
for help on using the changeset viewer.