- Timestamp:
- 2019-11-07T17:55:13+01:00 (4 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
NEMO/branches/2019/fix_sn_cfctl_ticket2328/src/OCE/ZDF/zdfgls.F90
r11869 r11872 824 824 p_avt(:,:,1) = 0._wp 825 825 ! 826 IF( ln_ctl .OR. sn_cfctl%l_mppout) THEN826 IF(sn_cfctl%l_prtctl) THEN 827 827 CALL prt_ctl( tab3d_1=en , clinfo1=' gls - e: ', tab3d_2=p_avt, clinfo2=' t: ', kdim=jpk) 828 828 CALL prt_ctl( tab3d_1=p_avm, clinfo1=' gls - m: ', kdim=jpk )
Note: See TracChangeset
for help on using the changeset viewer.