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

Timestamp:

2008-05-30T16:48:16+02:00 (16 years ago)

Author:

cetlod

Message:

the variable freeze is rename to fr_i, see ticket 176

File:

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

trunk/NEMO/TOP_SRC/oce_trc.F90

@@ -173 +173 @@
    USE sbc_oce , ONLY :   emp        =>    emp        !: evaporation minus precipitation (kg m-2 s-2) 
    USE sbc_oce , ONLY :   emps       =>    emps       !: evaporation minus precipitation (kg m-2 s-2)
+   USE sbc_oce , ONLY :   fr_i       =>    fr_i       !: ice fraction (between 0 to 1)
    USE traqsr  , ONLY :   xsi1       =>    xsi1       !: first depth of extinction
    USE traqsr  , ONLY :   ln_qsr_sms =>    ln_qsr_sms !: flag to use or not the biological fluxes for light
    USE sbcrnf  , ONLY :   rnfmsk     =>    rnfmsk     !: mixed adv scheme in runoffs vicinity (hori.) 
    USE sbcrnf  , ONLY :   rnfmsk_z   =>    rnfmsk_z   !: mixed adv scheme in runoffs vicinity (vert.)
-
-   !* freezing area *
-   USE ocfzpt , ONLY :   freeze      =>    freeze     !: ice mask (0 or 1)  
-   USE ocfzpt , ONLY :   fzptn       =>    fzptn      !: now freezing temperature at ocean surface  
 
    !* bottom boundary layer *