Changeset 3867 for dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/phyetat0.F90
- Timestamp:
- Jan 8, 2016, 9:52:14 AM (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
dynamico_lmdz/aquaplanet/LMDZ5/libf/phylmd/phyetat0.F90
r3838 r3867 28 28 USE ocean_slab_mod, ONLY: tslab, seaice, tice, ocean_slab_init 29 29 USE time_phylmdz_mod, ONLY: init_iteration, pdtphys, itau_phy 30 USE create_etat0_unstruct_mod 31 USE wxios 30 32 31 33 IMPLICIT none … … 74 76 75 77 REAL :: lon_startphy(klon), lat_startphy(klon) 76 78 77 79 ! FH1D 78 80 ! real iolat(jjm+1) … … 879 881 ENDIF 880 882 881 CALL init_iophy_new(lat_degrees,lon_degrees)883 ! CALL init_iophy_new(lat_degrees,lon_degrees) 882 884 883 885 ! Initilialize module fonte_neige_mod
Note: See TracChangeset
for help on using the changeset viewer.