Changeset 4368 for LMDZ6/branches/Ocean_skin/libf/dyn3d_common/inithist.F
- Timestamp:
- Dec 6, 2022, 12:01:16 AM (22 months ago)
- Location:
- LMDZ6/branches/Ocean_skin
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ6/branches/Ocean_skin
- Property svn:mergeinfo changed
-
LMDZ6/branches/Ocean_skin/libf/dyn3d_common/inithist.F
r2622 r4368 7 7 USE IOIPSL 8 8 #endif 9 USE infotrac, ONLY : nqtot , ttext9 USE infotrac, ONLY : nqtot 10 10 use com_io_dyn_mod, only : histid,histvid,histuid, & 11 11 & dynhist_file,dynhistv_file,dynhistu_file … … 157 157 ! 158 158 ! DO iq=1,nqtot 159 ! call histdef(histid, ttext(iq), ttext(iq), '-', 159 ! call histdef(histid, tracers(iq)%name, 160 ! tracers(iq)%longName, '-', 160 161 ! . iip1, jjp1, thoriid, llm, 1, llm, zvertiid, 161 162 ! . 32, 'inst(X)', t_ops, t_wrt)
Note: See TracChangeset
for help on using the changeset viewer.