Changeset 5680


Ignore:
Timestamp:
2015-08-11T14:26:17+02:00 (5 years ago)
Author:
dancopsey
Message:

Fixed typo in initialtion of jpr_grnm variable.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_coupling_GSI7_GSI8_landice/NEMOGCM/NEMO/OPA_SRC/SBC/sbccpl.F90

    r5678 r5680  
    103103   INTEGER, PARAMETER ::   jpr_fraqsr = 42            ! fraction of solar net radiation absorbed in the first ocean level 
    104104   INTEGER, PARAMETER ::   jpr_ts_ice = 43            ! skin temperature of sea-ice (used for melt-ponds) 
    105    INTEGER, PARAMETER ::   jpr_ts_ice = 44            ! Greenland ice mass 
     105   INTEGER, PARAMETER ::   jpr_grnm  = 44            ! Greenland ice mass 
    106106   INTEGER, PARAMETER ::   jpr_antm   = 45            ! Antarctic ice mass 
    107107   INTEGER, PARAMETER ::   jprcv      = 45            ! total number of fields received 
Note: See TracChangeset for help on using the changeset viewer.