Changeset 2827


Ignore:
Timestamp:
2011-08-11T18:50:46+02:00 (9 years ago)
Author:
acc
Message:

Branch: dev_r2802_NOCS_vvlfix, minor correction to allow domvvl.F90 to be compiled without key_vvl

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2011/dev_r2802_NOCS_vvlfix/NEMOGCM/NEMO/OPA_SRC/DOM/domvvl.F90

    r2807 r2827  
    234234   SUBROUTINE dom_vvl 
    235235   END SUBROUTINE dom_vvl 
    236    SUBROUTINE dom_vvl_2 
     236   SUBROUTINE dom_vvl_2(kdum, pudum, pvdum ) 
     237      USE par_kind 
     238      INTEGER                   , INTENT(in   ) ::   kdum        
     239      REAL(wp), DIMENSION(:,:,:), INTENT(inout) ::   pudum, pvdum 
    237240   END SUBROUTINE dom_vvl_2 
    238241#endif 
Note: See TracChangeset for help on using the changeset viewer.