- Timestamp:
- 2014-12-02T10:38:20+01:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/2014/dev_MERGE_2014/NEMOGCM/NEMO/OPA_SRC/SBC/sbc_oce.F90
r4666 r4946 35 35 LOGICAL , PUBLIC :: ln_blk_core !: CORE bulk formulation 36 36 LOGICAL , PUBLIC :: ln_blk_mfs !: MFS bulk formulation 37 LOGICAL , PUBLIC :: ln_cpl !: coupled formulation (overwritten by key_sbc_coupled ) 37 #if defined key_oasis3 38 LOGICAL , PUBLIC :: lk_cpl = .TRUE. !: coupled formulation 39 #else 40 LOGICAL , PUBLIC :: lk_cpl = .FALSE. !: coupled formulation 41 #endif 38 42 LOGICAL , PUBLIC :: ln_dm2dc !: Daily mean to Diurnal Cycle short wave (qsr) 39 43 LOGICAL , PUBLIC :: ln_rnf !: runoffs / runoff mouths … … 46 50 ! !: =1 levitating ice with mass and salt exchange but no presure effect 47 51 ! !: =2 embedded sea-ice (full salt and mass exchanges and pressure) 52 INTEGER , PUBLIC :: nn_limflx !: LIM3 Multi-category heat flux formulation 53 ! !: =-1 Use of per-category fluxes 54 ! !: = 0 Average per-category fluxes 55 ! !: = 1 Average then redistribute per-category fluxes 56 ! !: = 2 Redistribute a single flux over categories 48 57 INTEGER , PUBLIC :: nn_fwb !: FreshWater Budget: 49 58 ! !: = 0 unchecked … … 56 65 LOGICAL , PUBLIC :: ln_icebergs !: Icebergs 57 66 ! 58 CHARACTER (len=8), PUBLIC :: cn_iceflx !: Flux handling over ice categories 59 LOGICAL, PUBLIC :: ln_iceflx_ave ! Average heat fluxes over all ice categories 60 LOGICAL, PUBLIC :: ln_iceflx_linear ! Redistribute mean heat fluxes over all ice categories, using ice temperature and albedo 61 ! 62 INTEGER , PUBLIC :: nn_lsm !: Number of iteration if seaoverland is applied 67 INTEGER , PUBLIC :: nn_lsm !: Number of iteration if seaoverland is applied 68 !!---------------------------------------------------------------------- 69 !! switch definition (improve readability) 70 !!---------------------------------------------------------------------- 71 INTEGER , PUBLIC, PARAMETER :: jp_gyre = 0 !: GYRE analytical formulation 72 INTEGER , PUBLIC, PARAMETER :: jp_ana = 1 !: analytical formulation 73 INTEGER , PUBLIC, PARAMETER :: jp_flx = 2 !: flux formulation 74 INTEGER , PUBLIC, PARAMETER :: jp_clio = 3 !: CLIO bulk formulation 75 INTEGER , PUBLIC, PARAMETER :: jp_core = 4 !: CORE bulk formulation 76 INTEGER , PUBLIC, PARAMETER :: jp_cpl = 5 !: Coupled formulation 77 INTEGER , PUBLIC, PARAMETER :: jp_mfs = 6 !: MFS bulk formulation 78 INTEGER , PUBLIC, PARAMETER :: jp_esopa = -1 !: esopa test, ALL formulations 79 63 80 !!---------------------------------------------------------------------- 64 81 !! Ocean Surface Boundary Condition fields
Note: See TracChangeset
for help on using the changeset viewer.