/[MITgcm]/MITgcm/pkg/mnc/mnc_test_002.T
ViewVC logotype

Diff of /MITgcm/pkg/mnc/mnc_test_002.T

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph | View Patch Patch

revision 1.2 by edhill, Thu Jan 29 05:30:37 2004 UTC revision 1.3 by edhill, Sat Jan 31 04:13:09 2004 UTC
# Line 21  C     Local Variables Line 21  C     Local Variables
21        CALL MNC_CW_INIT( 0,        CALL MNC_CW_INIT( 0,
22       &     20,16, 4,4, 1,1, 1,1, 13 )       &     20,16, 4,4, 1,1, 1,1, 13 )
23    
24          CALL MNC_CW_ADD_VNAME(0, 'v_vel', 'V_xy_Hn__C__t')
25          CALL MNC_CW_ADD_VATTR_TEXT(0, 'v_vel', 1,
26         &     'long_name', 'meridional_velocity')
27          CALL MNC_CW_ADD_VATTR_TEXT(0, 'v_vel', 1,
28         &     'units', 'cm/s')
29          CALL MNC_CW_ADD_VATTR_INT(0, 'v_vel', 1,
30         &     'grid_type', -1 )
31          CALL MNC_CW_ADD_VATTR_DBL(0, 'v_vel', 1,
32         &     'MITgcm_grid_ver', 0.1D0 )
33    
34        CALL MNC_CW_DUMP()        CALL MNC_CW_DUMP()
35    
36        print*, '=== Ending Program:    mnc_test_002 ==='        print*, '=== Ending Program:    mnc_test_002 ==='
Legend:
Removed from v.1.2  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22