Ignore:
Timestamp:
2017-12-18T15:06:42+01:00 (3 years ago)
Author:
acc
Message:

Branch 2017/dev_merge_2017. Tidier version of sbcwave.F90 with associated changes in modules. References and schemes for Stokes drift parameterisations have been updated. Choices now are the original Breivik 2014 scheme and the latest Li et al 2017 scheme (which is based on the Breivik et al 2016 Phillips spectrum but with a depth averaged profile). This has been compiled but not yet tested. Also removed trailing spaces in lbc_lnk_multi_generic.h90

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2017/dev_merge_2017/NEMOGCM/NEMO/OPA_SRC/LBC/lbc_lnk_multi_generic.h90

    r9093 r9115  
    1 #if defined DIM_2d  
    2 #   define ARRAY_TYPE(i,j,k,l)   REAL(wp), DIMENSION(i,j)  
    3 #   define PTR_TYPE              TYPE(PTR_2D)  
    4 #   define PTR_ptab              pt2d  
     1#if defined DIM_2d 
     2#   define ARRAY_TYPE(i,j,k,l)   REAL(wp), DIMENSION(i,j) 
     3#   define PTR_TYPE              TYPE(PTR_2D) 
     4#   define PTR_ptab              pt2d 
    55#endif 
    66#if defined DIM_3d 
Note: See TracChangeset for help on using the changeset viewer.