Changeset 1168
- Timestamp:
- 2008-08-11T12:21:06+02:00 (16 years ago)
- Location:
- trunk
- Files:
-
- 6 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/CONFIG/GYRE/EXP00/namelist
r1151 r1168 115 115 ln_ssr = .false. ! Sea Surface Restoring on T and/or S (T => fill namsbc_ssr) 116 116 nn_fwb = 0 ! FreshWater Budget: =0 unchecked , 117 ! =1 annual global mean of e-p-r set to zero,118 ! =2 global mean of e-p-r set to zero at each nn_fsbc time step117 ! =1 global mean of e-p-r set to zero at each nn_fsbc time step , 118 ! =2 annual global mean of e-p-r set to zero 119 119 / 120 120 !----------------------------------------------------------------------- -
trunk/CONFIG/GYRE_LOBSTER/EXP00/namelist
r1151 r1168 115 115 ln_ssr = .false. ! Sea Surface Restoring on T and/or S (T => fill namsbc_ssr) 116 116 nn_fwb = 0 ! FreshWater Budget: =0 unchecked , 117 ! =1 annual global mean of e-p-r set to zero,118 ! =2 global mean of e-p-r set to zero at each nn_fsbc time step117 ! =1 global mean of e-p-r set to zero at each nn_fsbc time step , 118 ! =2 annual global mean of e-p-r set to zero 119 119 / 120 120 !----------------------------------------------------------------------- -
trunk/CONFIG/ORCA2_LIM/EXP00/1_namelist
r1149 r1168 115 115 ln_ssr = .false. ! Sea Surface Restoring on T and/or S (T => fill namsbc_ssr) 116 116 nn_fwb = 0 ! FreshWater Budget: =0 unchecked , 117 ! =1 annual global mean of e-p-r set to zero,118 ! =2 global mean of e-p-r set to zero at each nn_fsbc time step117 ! =1 global mean of e-p-r set to zero at each nn_fsbc time step , 118 ! =2 annual global mean of e-p-r set to zero 119 119 / 120 120 !----------------------------------------------------------------------- -
trunk/CONFIG/ORCA2_LIM/EXP00/namelist
r1151 r1168 115 115 ln_ssr = .true. ! Sea Surface Restoring on T and/or S (T => fill namsbc_ssr) 116 116 nn_fwb = 0 ! FreshWater Budget: =0 unchecked , 117 ! =1 annual global mean of e-p-r set to zero,118 ! =2 global mean of e-p-r set to zero at each nn_fsbc time step117 ! =1 global mean of e-p-r set to zero at each nn_fsbc time step , 118 ! =2 annual global mean of e-p-r set to zero 119 119 / 120 120 !----------------------------------------------------------------------- -
trunk/CONFIG/ORCA2_LIM_PISCES/EXP00/namelist
r1151 r1168 115 115 ln_ssr = .true. ! Sea Surface Restoring on T and/or S (T => fill namsbc_ssr) 116 116 nn_fwb = 0 ! FreshWater Budget: =0 unchecked , 117 ! =1 annual global mean of e-p-r set to zero,118 ! =2 global mean of e-p-r set to zero at each nn_fsbc time step117 ! =1 global mean of e-p-r set to zero at each nn_fsbc time step , 118 ! =2 annual global mean of e-p-r set to zero 119 119 / 120 120 !----------------------------------------------------------------------- -
trunk/NEMO/OPA_SRC/SBC/sbcfwb.F90
r1156 r1168 53 53 !! ** Method : several ways depending on kn_fwb 54 54 !! =0 no control 55 !! =1 annual global mean corrected from previous year56 !! =2 global mean of emp set to zero at each nn_fsbc time step55 !! =1 global mean of emp set to zero at each nn_fsbc time step 56 !! =2 annual global mean corrected from previous year 57 57 !!---------------------------------------------------------------------- 58 58 INTEGER, INTENT( in ) :: kt ! ocean time-step index … … 125 125 ! correct the freshwater fluxes 126 126 IF( MOD( kt-1, kn_fsbc ) == 0 ) THEN 127 emp (:,:) = emp (:,:) -empold128 emps(:,:) = emps(:,:) -empold127 emp (:,:) = emp (:,:) + empold 128 emps(:,:) = emps(:,:) + empold 129 129 ENDIF 130 130 !
Note: See TracChangeset
for help on using the changeset viewer.