Ignore:
Timestamp:
2018-09-24T11:47:08+02:00 (23 months ago)
Author:
frrh
Message:

Met Office GMED ticket 379: Merged David Ford's MEDUSA assimilation changes
using command:

svn merge -r 10054:10141 svn+ssh://forge.ipsl.jussieu.fr/ipsl/forge/projets/nemo/svn/branches/UKMO/dev_r5518_GO6_package_asm_3d_bgc_v3

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_GO6_package/NEMOGCM/NEMO/TOP_SRC/trcini.F90

    r9262 r10149  
    3636   USE sbc_oce 
    3737   USE trcice          ! tracers in sea ice 
     38# if defined key_medusa 
    3839   USE sms_medusa      ! MEDUSA   initialisation 
     40# endif 
    3941   IMPLICIT NONE 
    4042   PRIVATE 
     
    107109      !                                                              ! total volume of the ocean  
    108110      areatot = glob_sum( cvol(:,:,:) ) 
     111# if defined key_medusa && defined key_roam 
    109112      carea(:,:) = e1e2t(:,:) * tmask(:,:,1)  
     113# endif 
    110114 
    111115      IF( lk_pisces  )       CALL trc_ini_pisces       ! PISCES  bio-model 
Note: See TracChangeset for help on using the changeset viewer.