Changes between Version 39 and Version 40 of ticket/0663_MLF

Timestamp:

2010-09-14T22:26:08+02:00 (14 years ago)

Author:

mlelod

Comment:

--

ticket/0663_MLF

@@ -50 +50 @@
    [[BR]]
 
-   '''sbc_oce.F90 :''' add "before" forcing fields (denoted by a '_b' sufix) 
+   '''sbc_oce.F90 :'''
+      
+      Add "before" forcing fields (denoted by a '_b' sufix) 
+      
       All ocean forcing components are involved, i.e.  utau_b, vtau_b, qns_b, qsr_b, emp_b,and  emps_b
 
@@ -57 +60 @@
    [[BR]]
    
-   '''sbcmod.F90 :''' add the swap of surface fields and the read/write in the restart file, except for sbc_hc_(n/b), sbc_sc_(n/b) ans qsr_hc_(n/b). Note: when writing restart files, the utau_b, vtau_b, qns_b variables etc... contain utau, vtau, qns etc...
+   '''sbcmod.F90 :'''
+      Add the swap of surface fields and the read/write in the restart file, except for sbc_hc_(n/b), sbc_sc_(n/b) ans qsr_hc_(n/b). Note: when writing restart files, the utau_b, vtau_b, qns_b variables etc... contain utau, vtau, qns etc...
 
       Beginning of sbs routine, introduce the swap, but only for kt >= nit000+1. If no restart, the '_b' fields is known only at the end of the sbc calculation. Therefore we have choosen to regroup the setting of '_b' fields at nit000 at the end of sbc routine. 
@@ -66 +70 @@
    [[BR]]
 
-   '''trasbc.F90''' : change in the heat and freshwater/salt fluxes 
+   '''trasbc.F90''' : Change in the heat and freshwater/salt fluxes 
+      
       The thermohalin fluxes (qns, emp, emps) are now applied as the mean of 2 consecutive time-steps (kt+1/2 and kt-1/2). This involes the following changes : (1) incorporate the time mean of the forcing ; (2) put the IF-ELSE-ENDIF outside the DO-loop for vector optimisation ; (3) remove the key_zco optimisation (increase readability) as zco is less and less used ; (4) correct a bug in vvl case, where salt flux associated with freezing/melting were not taken into account.