/[MITgcm]/MITgcm/pkg/ctrl/ctrl_init.F
ViewVC logotype

Diff of /MITgcm/pkg/ctrl/ctrl_init.F

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

revision 1.26 by heimbach, Thu Jun 21 04:06:21 2007 UTC revision 1.27 by heimbach, Thu Sep 6 14:04:28 2007 UTC
# Line 1023  c-- Line 1023  c--
1023          endrec   = 1          endrec   = 1
1024          diffrec  = endrec - startrec + 1          diffrec  = endrec - startrec + 1
1025          call ctrl_init_ctrlvar (          call ctrl_init_ctrlvar (
1026       &       xx_sihsnow_file, 42, 142, diffrec, startrec, endrec,       &       xx_sihsnow_file, 43, 143, diffrec, startrec, endrec,
1027       &       snx, sny, 1, 'c', 'xy', mythid )       &       snx, sny, 1, 'c', 'xy', mythid )
1028  #endif /* ALLOW_sihsnow_CONTROL */  #endif /* ALLOW_sihsnow_CONTROL */
1029    
Legend:
Removed from v.1.26  
changed lines
  Added in v.1.27
  ViewVC Help
Powered by ViewVC 1.1.22