/[MITgcm]/MITgcm/pkg/ptracers/ptracers_advection.F
ViewVC logotype

Diff of /MITgcm/pkg/ptracers/ptracers_advection.F

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

revision 1.3 by jmc, Sat Jun 26 02:39:31 2004 UTC revision 1.4 by jmc, Wed Jul 7 18:45:28 2004 UTC
# Line 50  C Loop over tracers Line 50  C Loop over tracers
50        DO iTracer=1,PTRACERS_numInUse        DO iTracer=1,PTRACERS_numInUse
51    
52         IF (         IF (
53  c    &     multiDimAdvection .AND.       &     multiDimAdvection .AND.
54       &     PTRACERS_advScheme(iTracer).NE.ENUM_CENTERED_2ND .AND.       &     PTRACERS_advScheme(iTracer).NE.ENUM_CENTERED_2ND .AND.
55       &     PTRACERS_advScheme(iTracer).NE.ENUM_UPWIND_3RD .AND.       &     PTRACERS_advScheme(iTracer).NE.ENUM_UPWIND_3RD .AND.
56       &     PTRACERS_advScheme(iTracer).NE.ENUM_CENTERED_4TH ) THEN       &     PTRACERS_advScheme(iTracer).NE.ENUM_CENTERED_4TH ) THEN
Legend:
Removed from v.1.3  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.22