- Timestamp:
- Jan 20, 2010, 3:27:21 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/branches/LMDZ4V5.0-dev/libf/phylmd/phys_state_var_mod.F90
r1279 r1299 289 289 SUBROUTINE phys_state_var_init(read_climoz) 290 290 use dimphy 291 USE control_mod 291 292 use aero_mod 292 293 IMPLICIT NONE … … 301 302 302 303 #include "indicesol.h" 303 #include "control.h"304 304 ALLOCATE(rlat(klon), rlon(klon)) 305 305 ALLOCATE(pctsrf(klon,nbsrf)) … … 411 411 SUBROUTINE phys_state_var_end 412 412 use dimphy 413 use control_mod 413 414 IMPLICIT NONE 414 415 #include "indicesol.h" 415 #include "control.h"416 416 417 417 deallocate(rlat, rlon, pctsrf, ftsol, falb1, falb2)
Note: See TracChangeset
for help on using the changeset viewer.