Changeset 8376 for branches/2017/dev_r8183_ICEMODEL
- Timestamp:
- 2017-07-26T14:50:26+02:00 (7 years ago)
- Location:
- branches/2017/dev_r8183_ICEMODEL/NEMOGCM
- Files:
-
- 4 edited
-
CONFIG/ORCA2_LIM3_PISCES/EXP00/1_namelist_cfg (modified) (1 diff)
-
NEMO/LIM_SRC_3/albedoice.F90 (modified) (2 diffs)
-
NEMO/LIM_SRC_3/limadv_umx.F90 (modified) (2 diffs)
-
NEMO/OPA_SRC/SBC/sbc_ice.F90 (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/CONFIG/ORCA2_LIM3_PISCES/EXP00/1_namelist_cfg
r8306 r8376 41 41 !----------------------------------------------------------------------- 42 42 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 , 44 44 ! =1 use observed ice-cover , 45 ! = 3ice-model used ("key_lim3")45 ! =2 ice-model used ("key_lim3") 46 46 ln_rnf = .false. ! runoffs (T => fill namsbc_rnf) 47 47 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 9 9 !! albedo_ice : albedo for ice (clear and overcast skies) 10 10 !! albedo_init : initialisation of albedo computation 11 !!---------------------------------------------------------------------- 12 #if defined key_lim3 13 !!---------------------------------------------------------------------- 14 !! 'key_lim3' : LIM 3.0 sea-ice model 11 15 !!---------------------------------------------------------------------- 12 16 USE ice, ONLY : jpl … … 345 349 END SUBROUTINE albedo_init 346 350 351 #else 352 !!---------------------------------------------------------------------- 353 !! Default option Dummy module NO LIM 3.0 sea-ice model 354 !!---------------------------------------------------------------------- 355 CONTAINS 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 347 362 !!====================================================================== 348 363 END MODULE albedoice -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/LIM_SRC_3/limadv_umx.F90
r8373 r8376 12 12 !! macho : 13 13 !! 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 14 18 !!---------------------------------------------------------------------- 15 19 USE phycst ! physical constant … … 562 566 END SUBROUTINE nonosc_2d 563 567 568 #else 569 !!---------------------------------------------------------------------- 570 !! Default option Dummy module NO LIM 3.0 sea-ice model 571 !!---------------------------------------------------------------------- 572 CONTAINS 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 564 578 !!====================================================================== 565 579 END MODULE limadv_umx -
branches/2017/dev_r8183_ICEMODEL/NEMOGCM/NEMO/OPA_SRC/SBC/sbc_ice.F90
r8324 r8376 160 160 !! Default option NO LIM3 or CICE sea-ice model 161 161 !!---------------------------------------------------------------------- 162 USE lib_mpp ! MPP library 162 163 USE in_out_manager ! I/O manager 164 165 IMPLICIT NONE 166 PRIVATE 163 167 164 168 PUBLIC sbc_ice_alloc
Note: See TracChangeset
for help on using the changeset viewer.
