Changeset 3074
- Timestamp:
- Oct 6, 2023, 4:37:23 PM (14 months ago)
- Location:
- trunk/LMDZ.MARS
- Files:
-
- 2 edited
- 1 moved
-
changelog.txt (modified) (1 diff)
-
libf/phymars/dyn1d/testphys1d.F90 (modified) (1 diff)
-
libf/phymars/dyn1d/writerestart1D_mod.F90 (moved) (moved from trunk/LMDZ.MARS/libf/phymars/dyn1d/writerestart1D.F90) (2 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/LMDZ.MARS/changelog.txt
r3072 r3074 4242 4242 == 05/10/2023 == JBC 4243 4243 Correction of a bug introduced in commit r3069 when compiling with ifort. 4244 4245 == 06/10/2023 == JBC 4246 Transformation of 'writerestart1D' into module. -
trunk/LMDZ.MARS/libf/phymars/dyn1d/testphys1d.F90
r3069 r3074 16 16 use write_output_mod, only: write_output 17 17 use init_testphys1d_mod, only: init_testphys1d 18 use writerestart1D_mod, only: writerestart1D 18 19 ! Mostly for XIOS outputs: 19 20 use mod_const_mpi, only: init_const_mpi -
trunk/LMDZ.MARS/libf/phymars/dyn1d/writerestart1D_mod.F90
r3073 r3074 1 MODULE writerestart1D_mod 2 3 implicit none 4 5 contains 6 1 7 SUBROUTINE writerestart1D(filename,psurf,tsurf,nlayer,nslope,temp,u,v,nq,qnames,qsurf,q) 2 8 … … 28 34 29 35 END SUBROUTINE writerestart1D 36 37 END MODULE writerestart1D_mod
Note: See TracChangeset
for help on using the changeset viewer.
