Wake.F90 : Reading some population dynamic parameters from .def files
19 lines of code changed in 1 file:
Ajoute un deuxiement emplacement ou le librarie IOIPSL sera recherche. Cela est deja fait dans les arch pour IRENE et JEAN-ZAY. C'est necessaire quand on compile IOIPSL avec le script makeioipsl_fcm comme fait dans les configurations v6.2 et v6.3.
4 lines of code changed in 3 files:
Bug fix: missing declaration. (This bug could not be seen in
compilation without `CPP_COUPLE`.)
1 lines of code changed in 1 file:
Change name of fields exchanged with the ocean, following choices of C. Eth\'e.
3 lines of code changed in 1 file:
Revert to trunk changes that should not have been done in revision 3605.
822 lines of code changed in 5 files:
Revert to trunk changes that should not have been done in revision 3605.
2 lines of code changed in 1 file:
Revert to trunk changes that should not have been done in revision 3605.
13 lines of code changed in 6 files:
bug fix in mod_1D_cases_read_std.F90
1 lines of code changed in 1 file:
merge with rev 3632 on LMDZ6/trunk
2 lines of code changed in 1 file:
Add new arguments to Inca (to calcul hybrid coordinates)
2 lines of code changed in 1 file:
Parameter new_aod is not needed anymore as it is assumed to be true
all the time. This means that we cannot replay AR4 simulations with new
LMDZ sources (we probably couldn't anyway)
LF, OB
142 lines of code changed in 10 files:
If the ocean skin parameterization is working actively
(`activate_ocean_skin == 2`) and we are coupled to the ocean then send
ocean-air interface salinity to the ocean. New dummy argument `s_int`
of procedures `ocean_cpl_noice` and `cpl_send_ocean_fields`. We can
only send interface salinity from the previous time-step since
communication with the ocean is before the call to bulk_flux. So make
`s_int` a state variable: move `s_int` from `phys_output_var_mod` to
`phys_state_var_mod`. Still, we only read `s_int` from startphy,
define it before the call to `surf_ocean` and write it to restartphy
if `activate_ocean_skin == 2` and `type_ocean == 'couple'`. In
procedure `pbl_surface`, for clarity, move the definition of output
variables `t_int`, dter, dser, tkt, tks, rf, taur to `missing_val` to
after the call to `surf_ocean`, with the definition of `s_int`,
`ds_ns`, `dt_ns` to `missing_val`. This does not change anything for
`t_int`, dter, dser, tkt, tks, rf, taur. In `pbl_surface_newfrac`, we
choose to set `s_int` to 35 for an appearing ocean point, this is
questionable. In `surf_ocean`, change the intent of `s_int` from out
to inout.
82 lines of code changed in 10 files:
If the ocean skin parameterization is working (passively or actively,
`activate_ocean_skin >= 1`) and we are coupled to the ocean then
receive bulk salinity of the surface layer of the ocean from the ocean
and feed it to procedure `bulk_flux` instead of the constant
value 35. If the ocean skin parameterization is working actively
(`activate_ocean_skin == 2`) and we are coupled to the ocean then send
ocean-air interface temperature to the ocean. We can only send
interface temperature from the previous time-step since communication
with the ocean is before the call to `bulk_flux`. In module `cpl_mod`,
define `cpl_t_int` with rank 1: no dimension for `cpl_index` because
`t_int` is only defined over ocean. New dummy argument sss of
procedures `cpl_receive_ocean_fields` and `ocean_cpl_noice`. New dummy
argument `t_int` of `cpl_send_ocean_fields`. In procedure
`surf_ocean`, rename local variable s1 to sss and give it the size
klon, which is required by the coupling machinery.
111 lines of code changed in 4 files: