Changeset 1334 for trunk/NEMO/C1D_SRC/step_c1d.F90
- Timestamp:
- 2009-03-03T15:07:48+01:00 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/NEMO/C1D_SRC/step_c1d.F90
r1221 r1334 113 113 114 114 IF( ninist == 1 ) THEN ! Output the initial state and forcings 115 CALL dia_wri_state( 'output.init' ) ; ninist = 0115 CALL dia_wri_state( 'output.init', kstp ) ; ninist = 0 116 116 ENDIF 117 117
Note: See TracChangeset
for help on using the changeset viewer.