- Timestamp:
- 2019-06-11T16:10:28+02:00 (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/OPA_SRC/ASM/asmbgc.F90
r10477 r11101 767 767 & TRIM( c_asmbal ) // ' at timestep = ', kt 768 768 ENDIF 769 770 IF(lwp .AND. lflush) CALL flush(numout) 769 771 770 772 END SUBROUTINE asm_bgc_bal_wri … … 1140 1142 ENDIF 1141 1143 ! 1144 IF(lwp .AND. lflush) CALL flush(numout) 1142 1145 END SUBROUTINE phyto2d_asm_inc 1143 1146 … … 1327 1330 ENDIF 1328 1331 ! 1332 IF(lwp .AND. lflush) CALL flush(numout) 1329 1333 END SUBROUTINE phyto3d_asm_inc 1330 1334 … … 1598 1602 ENDIF 1599 1603 ! 1604 IF(lwp .AND. lflush) CALL flush(numout) 1600 1605 END SUBROUTINE pco2_asm_inc 1601 1606 … … 1821 1826 #endif 1822 1827 ! 1828 IF(lwp .AND. lflush) CALL flush(numout) 1829 1823 1830 END SUBROUTINE ph_asm_inc 1824 1831 … … 2186 2193 ENDIF 2187 2194 ! 2195 IF(lwp .AND. lflush) CALL flush(numout) 2188 2196 END SUBROUTINE bgc3d_asm_inc 2189 2197
Note: See TracChangeset
for help on using the changeset viewer.