- Timestamp:
- 2018-03-27T15:52:54+02:00 (6 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/ZDF/zdfgls.F90
r9367 r9440 816 816 ! 817 817 IF(ln_ctl) THEN 818 CALL prt_ctl( tab3d_1=en , clinfo1=' gls - e: ', tab3d_2=p_avt, clinfo2=' t: ', ovlap=1,kdim=jpk)819 CALL prt_ctl( tab3d_1=p_avm, clinfo1=' gls - m: ', ovlap=1,kdim=jpk )818 CALL prt_ctl( tab3d_1=en , clinfo1=' gls - e: ', tab3d_2=p_avt, clinfo2=' t: ', kdim=jpk) 819 CALL prt_ctl( tab3d_1=p_avm, clinfo1=' gls - m: ', kdim=jpk ) 820 820 ENDIF 821 821 !
Note: See TracChangeset
for help on using the changeset viewer.