Ignore:
Timestamp:
2018-06-01T12:29:45+02:00 (2 years ago)
Author:
dancopsey
Message:

Removed call top cice_sbc_hadgam is this is being done in the dev_merge_2017_CICE_interface branch. This means that we must always use the dev_merge_2017_CICE_interface branch with this branch.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_merge_2017_GC_couple_pkg/NEMOGCM/NEMO/OPA_SRC/SBC/sbcice_cice.F90

    r9679 r9723  
    269269      ENDIF 
    270270      ! 
    271       ! 
    272       ! In coupled mode get extra fields from CICE for passing back to atmosphere 
    273   
    274       IF ( ksbc == jp_purecpl ) CALL cice_sbc_hadgam(nit000) 
    275       !  
    276271   END SUBROUTINE cice_sbc_init 
    277272 
     
    674669      ENDIF 
    675670 
    676       IF( kt == nit000 )  THEN 
    677          IF(lwp) WRITE(numout,*)'cice_sbc_hadgam' 
    678          IF( sbc_cpl_alloc() /= 0 )   CALL ctl_stop( 'STOP', 'sbc_cpl_alloc : unable to allocate arrays' ) 
    679       ENDIF 
    680  
    681671      !                                         ! =========================== ! 
    682672      !                                         !   Prepare Coupling fields   ! 
Note: See TracChangeset for help on using the changeset viewer.