Changeset 10778


Ignore:
Timestamp:
2019-03-20T15:35:07+01:00 (21 months ago)
Author:
jenniewaters
Message:

#2140 Small bug fix to get code to compile.

Location:
branches/UKMO/dev_r5518_DMP_TOOLS/NEMOGCM/TOOLS/DMP_TOOLS/src
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • branches/UKMO/dev_r5518_DMP_TOOLS/NEMOGCM/TOOLS/DMP_TOOLS/src/utils.F90

    r10723 r10778  
    7373     CALL check_nf90( nf90_inq_varid( ncin, 'vmask', vmask_id ), 'Cannot get variable ID for vmask') 
    7474     CALL check_nf90( nf90_inq_varid( ncin, 'fmask', fmask_id ), 'Cannot get variable ID for fmask') 
    75      CALL check_nf90( nf90_inq_varid( ncin, 'gdept', gdept_id ), 'Cannot get variable ID for gdept') 
     75     CALL check_nf90( nf90_inq_varid( ncin, 'gdept_0', gdept_id ), 'Cannot get variable ID for gdept_0') 
    7676     CALL check_nf90( nf90_inq_varid( ncin, 'gphit', gphit_id ), 'Cannot get variable ID for gphit') 
    7777     CALL check_nf90( nf90_inq_varid( ncin, 'gphiu', gphiu_id ), 'Cannot get variable ID for gphiu') 
  • branches/UKMO/dev_r5518_DMP_TOOLS/NEMOGCM/TOOLS/DMP_TOOLS/src/zoom.F90

    r4739 r10778  
    3030      !!---------------------------------------------------------------------- 
    3131      ! 
    32       IF( nn_timing == 1 )  CALL timing_start( 'dtacof_zoom') 
    3332      ! 
    3433       
Note: See TracChangeset for help on using the changeset viewer.