/[MITgcm]/MITgcm/model/src/do_oceanic_phys.F
ViewVC logotype

Diff of /MITgcm/model/src/do_oceanic_phys.F

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

revision 1.85 by dimitri, Wed Jan 20 23:33:45 2010 UTC revision 1.86 by jmc, Tue Mar 16 00:08:27 2010 UTC
# Line 697  C--     Compute GGL90 mixing coefficient Line 697  C--     Compute GGL90 mixing coefficient
697  cph storing here is needed only for one GMREDI_OPTIONS:  cph storing here is needed only for one GMREDI_OPTIONS:
698  cph define GM_BOLUS_ADVEC  cph define GM_BOLUS_ADVEC
699  cph keep it although TAF says you dont need to.  cph keep it although TAF says you dont need to.
700  cph but I've avoided the #ifdef for now, in case more things change  cph but I have avoided the #ifdef for now, in case more things change
701  CADJ STORE sigmaX(:,:,:)        = comlev1_bibj, key=itdkey,  CADJ STORE sigmaX(:,:,:)        = comlev1_bibj, key=itdkey,
702  CADJ &     kind = isbyte  CADJ &     kind = isbyte
703  CADJ STORE sigmaY(:,:,:)        = comlev1_bibj, key=itdkey,  CADJ STORE sigmaY(:,:,:)        = comlev1_bibj, key=itdkey,

Legend:
Removed from v.1.85  
changed lines
  Added in v.1.86

  ViewVC Help
Powered by ViewVC 1.1.22