New URL for NEMO forge!   http://forge.nemo-ocean.eu

Since March 2022 along with NEMO 4.2 release, the code development moved to a self-hosted GitLab.
This present forge is now archived and remained online for history.
Changeset 3545 for branches/2012/dev_r3385_NOCS04_HAMF/NEMOGCM/NEMO/LIM_SRC_3/limsbc.F90 – NEMO

Ignore:
Timestamp:
2012-11-14T10:04:08+01:00 (11 years ago)
Author:
gm
Message:

branch: dev_r3385_NOCS04_HAMF; #665. bug correction in LIM3

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/2012/dev_r3385_NOCS04_HAMF/NEMOGCM/NEMO/LIM_SRC_3/limsbc.F90

    r3524 r3545  
    103103      INTEGER  ::   iflt, ial , iadv , ifral, ifrdv   !   -      - 
    104104      REAL(wp) ::   zinda, zemp, zemp_snow, zfmm      ! local scalars 
     105      REAL(wp) ::   zemp_snw                          !   -      - 
    105106      REAL(wp) ::   zfcm1 , zfcm2                     !   -      - 
    106107      REAL(wp), POINTER, DIMENSION(:,:,:) ::   zalb, zalbp     ! 2D/3D workspace 
Note: See TracChangeset for help on using the changeset viewer.