/[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.47 by heimbach, Tue Jul 31 16:05:57 2012 UTC revision 1.48 by heimbach, Tue Jul 31 17:43:52 2012 UTC
# Line 448  c-- Line 448  c--
448    
449  c----------------------------------------------------------------------  c----------------------------------------------------------------------
450  c--  c--
451  #ifdef ALLOW_BOTTOMDRAG_CONTROL  #ifdef ALLOW_BOTTOMDRAG_CONTROL_NONGENERIC
452          call ctrl_init_ctrlvar (          call ctrl_init_ctrlvar (
453       &       xx_bottomdrag_file, 23, 123, 1, 1, 1,       &       xx_bottomdrag_file, 23, 123, 1, 1, 1,
454       &       snx, sny, 1, 'c', 'xy', mythid )       &       snx, sny, 1, 'c', 'xy', mythid )

Legend:
Removed from v.1.47  
changed lines
  Added in v.1.48

  ViewVC Help
Powered by ViewVC 1.1.22