Changeset 1011 for trunk/NEMO/TOP_SRC/oce_trc.F90

Timestamp:

2008-05-30T11:57:12+02:00 (16 years ago)

Author:

cetlod

Message:

re-organization of TOP initialization and outputs phases see ticket 171

File:

• trunk/NEMO/TOP_SRC/oce_trc.F90 (modified) (1 diff)

trunk/NEMO/TOP_SRC/oce_trc.F90

@@ -166 +166 @@
    USE dom_oce , ONLY :   n_cla     =>   n_cla         !: flag (0/1) for cross land advection 
 
-
-
    !* surface fluxes *
    USE sbc_oce , ONLY :   utau       =>    utau       !: i-surface stress component
    USE sbc_oce , ONLY :   vtau       =>    vtau       !: j-surface stress component
+   USE sbc_oce , ONLY :   wndm       =>    wndm       !: 10m wind speed 
    USE sbc_oce , ONLY :   qsr        =>    qsr        !: penetrative solar radiation (w m-2)  
    USE sbc_oce , ONLY :   emp        =>    emp        !: evaporation minus precipitation (kg m-2 s-2)