Ignore:
Timestamp:
08/31/12 15:41:37 (12 years ago)
Author:
cholod
Message:

Load NEMO_TMP into vendor/nemo/current.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • vendor/nemo/current/NEMOGCM/NEMO/OPA_SRC/SBC/sbcmod.F90

    r4 r44  
    6464   !!---------------------------------------------------------------------- 
    6565   !! NEMO/OPA 4.0 , NEMO-consortium (2011)  
    66    !! $Id: sbcmod.F90 3294 2012-01-28 16:44:18Z rblod $ 
     66   !! $Id: sbcmod.F90 3415 2012-06-15 13:29:37Z rblod $ 
    6767   !! Software governed by the CeCILL licence     (NEMOGCM/NEMO_CeCILL.txt) 
    6868   !!---------------------------------------------------------------------- 
     
    241241      !                                            ! ---------------------------------------- ! 
    242242 
    243       CALL iom_setkt( kt + nn_fsbc - 1 )                 ! in sbc, iom_put is called every nn_fsbc time step 
     243!      CALL iom_setkt( kt + nn_fsbc - 1 )                 ! in sbc, iom_put is called every nn_fsbc time step 
    244244      ! 
    245245      IF( ln_apr_dyn ) CALL sbc_apr( kt )                ! atmospheric pressure provided at kt+0.5*nn_fsbc 
     
    344344      ENDIF 
    345345      ! 
    346       CALL iom_setkt( kt )           ! iom_put outside of sbc is called at every time step 
     346!      CALL iom_setkt( kt )           ! iom_put outside of sbc is called at every time step 
    347347      ! 
    348348      CALL iom_put( "utau", utau )   ! i-wind stress   (stress can be updated at  
Note: See TracChangeset for help on using the changeset viewer.