Changeset 6902


Ignore:
Timestamp:
2016-08-30T15:44:11+02:00 (5 years ago)
Author:
drew
Message:

UKMO CICE Ticket#68. Fix bug in delivery of sea ice increments to CICE code due to assignment of sea ice increments after call to SBC. May require additional changes to CICE code to have seaice iau code called after thermodynamics.

Location:
branches/UKMO/dev_r5518_ciceiau/NEMOGCM/NEMO/OPA_SRC
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_ciceiau/NEMOGCM/NEMO/OPA_SRC/ASM/asminc.F90

    r6299 r6902  
    766766         !   
    767767      ENDIF 
    768       ! Perhaps the following call should be in step 
    769       IF   ( ln_seaiceinc  )   CALL seaice_asm_inc ( kt )   ! apply sea ice concentration increment 
    770768      ! 
    771769   END SUBROUTINE tra_asm_inc 
  • branches/UKMO/dev_r5518_ciceiau/NEMOGCM/NEMO/OPA_SRC/step.F90

    r6298 r6902  
    105105                         CALL bdy_dta ( kstp, time_offset=+1 )   ! update dynamic & tracer data at open boundaries 
    106106      ENDIF 
     107      IF( ln_seaiceinc ) & 
     108         &               CALL seaice_asm_inc ( kstp ) ! setup sea ice concentration increment 
    107109                         CALL sbc    ( kstp )         ! Sea Boundary Condition (including sea-ice) 
    108110                                                      ! clem: moved here for bdy ice purpose 
Note: See TracChangeset for help on using the changeset viewer.