- Timestamp:
- 2015-04-20T15:27:29+02:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2015/dev_r5204_CNRS_PISCES_dcy/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90
r5225 r5226 261 261 IF( ln_ssr ) CALL sbc_ssr_init ! Sea-Surface Restoring initialisation 262 262 ! 263 IF( ln_rnf ) CALL sbc_rnf_init ! Runof initialisation 264 ! 263 265 IF( nn_ice == 3 ) CALL sbc_lim_init ! LIM3 initialisation 264 266 … … 417 419 CALL iom_put( "qns" , qns ) ! solar heat flux 418 420 CALL iom_put( "qsr" , qsr ) ! solar heat flux 421 IF( l_trcdm2dc ) CALL iom_put( "qsr_mean" , qsr_mean ) ! daily mean solar heat flux 419 422 IF( nn_ice > 0 ) CALL iom_put( "ice_cover", fr_i ) ! ice fraction 420 423 CALL iom_put( "taum" , taum ) ! wind stress module
Note: See TracChangeset
for help on using the changeset viewer.