Changeset 8376


Ignore:
Timestamp:
2017-07-26T14:50:26+02:00 (4 years ago)
Author:
clem
Message:

to make the reference configuration orca2aghulas work

Location:
branches/2017/dev_r8183_ICEMODEL/NEMOGCM
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/CONFIG/ORCA2_LIM3_PISCES/EXP00/1_namelist_cfg

    r8306 r8376  
    4141!----------------------------------------------------------------------- 
    4242   ln_blk      = .true.    !  CORE bulk formulation                     (T => fill namsbc_core) 
    43    nn_ice      = 3         !  =0 no ice boundary condition   , 
     43   nn_ice      = 2         !  =0 no ice boundary condition   , 
    4444                           !  =1 use observed ice-cover      , 
    45                            !  =3 ice-model used                         ("key_lim3") 
     45                           !  =2 ice-model used                         ("key_lim3") 
    4646   ln_rnf      = .false.   !  runoffs                                   (T => fill namsbc_rnf) 
    4747   ln_ssr      = .false.   !  Sea Surface Restoring on T and/or S       (T => fill namsbc_ssr) 
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/albedoice.F90

    r8373 r8376  
    99   !!   albedo_ice    : albedo for ice (clear and overcast skies) 
    1010   !!   albedo_init   : initialisation of albedo computation 
     11   !!---------------------------------------------------------------------- 
     12#if defined key_lim3 
     13   !!---------------------------------------------------------------------- 
     14   !!   'key_lim3' :                                  LIM 3.0 sea-ice model 
    1115   !!---------------------------------------------------------------------- 
    1216   USE ice, ONLY : jpl 
     
    345349   END SUBROUTINE albedo_init 
    346350 
     351#else 
     352   !!---------------------------------------------------------------------- 
     353   !!   Default option           Dummy module      NO LIM 3.0 sea-ice model 
     354   !!---------------------------------------------------------------------- 
     355CONTAINS 
     356   ! 
     357   SUBROUTINE albedo_ice     ! Dummy routine 
     358      WRITE(*,*) 'albedo_ice: You should not have seen this print! error?' 
     359   END SUBROUTINE albedo_ice 
     360#endif 
     361 
    347362   !!====================================================================== 
    348363END MODULE albedoice 
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limadv_umx.F90

    r8373 r8376  
    1212   !!   macho         :  
    1313   !!   nonosc_2d     : compute monotonic tracer fluxes by a non-oscillatory algorithm  
     14   !!---------------------------------------------------------------------- 
     15#if defined key_lim3 
     16   !!---------------------------------------------------------------------- 
     17   !!   'key_lim3' :                                  LIM 3.0 sea-ice model 
    1418   !!---------------------------------------------------------------------- 
    1519   USE phycst         ! physical constant 
     
    562566   END SUBROUTINE nonosc_2d 
    563567 
     568#else 
     569   !!---------------------------------------------------------------------- 
     570   !!   Default option           Dummy module      NO LIM 3.0 sea-ice model 
     571   !!---------------------------------------------------------------------- 
     572CONTAINS 
     573   ! 
     574   SUBROUTINE lim_adv_umx     ! Dummy routine 
     575      WRITE(*,*) 'lim_adv_umx: You should not have seen this print! error?' 
     576   END SUBROUTINE lim_adv_umx 
     577#endif 
    564578   !!====================================================================== 
    565579END MODULE limadv_umx 
  • branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/OPA_SRC/SBC/sbc_ice.F90

    r8324 r8376  
    160160   !!   Default option                      NO LIM3 or CICE sea-ice model 
    161161   !!---------------------------------------------------------------------- 
     162   USE lib_mpp          ! MPP library 
    162163   USE in_out_manager   ! I/O manager 
     164 
     165   IMPLICIT NONE 
     166   PRIVATE 
    163167 
    164168   PUBLIC sbc_ice_alloc 
Note: See TracChangeset for help on using the changeset viewer.