Changeset 1275 for trunk/NEMO/OPA_SRC/SBC/sbcrnf.F90

Timestamp:

2009-01-19T20:22:55+01:00 (15 years ago)

Author:

rblod

Message:

First introduction off interpolation off the fly, see ticket #279

File:

• trunk/NEMO/OPA_SRC/SBC/sbcrnf.F90 (modified) (1 diff)

trunk/NEMO/OPA_SRC/SBC/sbcrnf.F90

@@ -128 +128 @@
       !                                   ! ============
       ! (NB: frequency positive => hours, negative => months)
-      !            !   file    ! frequency !  variable  ! time intep !  clim  ! 'yearly' or !
-      !            !   name    !  (hours)  !   name     !   (T/F)    !  (T/F) !  'monthly'  !
-      sn_rnf = FLD_N( 'runoffs',    -1.    , 'sorunoff' ,  .TRUE.    , .true. ,   'yearly'  )
-      sn_cnf = FLD_N( 'runoffs',     0.    , 'sorunoff' ,  .FALSE.   , .true. ,   'yearly'  )
+      !            !   file    ! frequency !  variable  ! time intep !  clim  ! 'yearly' or ! weights  ! rotation   !
+      !            !   name    !  (hours)  !   name     !   (T/F)    !  (T/F) !  'monthly'  ! filename ! pairs      !
+      sn_rnf = FLD_N( 'runoffs',    -1.    , 'sorunoff' ,  .TRUE.    , .true. ,   'yearly'  , ''       , ''         )
+      sn_cnf = FLD_N( 'runoffs',     0.    , 'sorunoff' ,  .FALSE.   , .true. ,   'yearly'  , ''       , ''         )
 
       !