Changeset 5591 for branches/UKMO/dev_r5107_hadgem3_cplseq
- Timestamp:
- 2015-07-10T18:07:27+02:00 (9 years ago)
- Location:
- branches/UKMO/dev_r5107_hadgem3_cplseq/NEMOGCM/NEMO/OPA_SRC
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/dev_r5107_hadgem3_cplseq/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90
r5572 r5591 286 286 ! In coupled mode get extra fields from CICE for passing back to atmosphere 287 287 288 IF ( ksbc == jp_ cpl ) CALL cice_sbc_hadgam(nit000)288 IF ( ksbc == jp_purecpl ) CALL cice_sbc_hadgam(nit000) 289 289 ! 290 290 IF( nn_timing == 1 ) CALL timing_stop('cice_sbc_init') -
branches/UKMO/dev_r5107_hadgem3_cplseq/NEMOGCM/NEMO/OPA_SRC/nemogcm.F90
r5572 r5591 166 166 CALL Agrif_Step( stp ) ! AGRIF: time stepping 167 167 #else 168 IF (lk_ cpl) CALL sbc_cpl_snd( istp ) ! Coupling to atmos168 IF (lk_oasis) CALL sbc_cpl_snd( istp ) ! Coupling to atmos 169 169 CALL stp( istp ) 170 170 ! We don't couple on the final timestep because
Note: See TracChangeset
for help on using the changeset viewer.