Parent Directory | Revision Log | Revision Graph | Patch
revision 1.39 by heimbach, Fri Jul 13 14:26:57 2001 UTC | revision 1.40 by heimbach, Mon Jul 30 20:39:18 2001 UTC | |
---|---|---|
# | Line 67 C-- Set model configuration (fixed arr | Line 67 C-- Set model configuration (fixed arr |
67 | myCurrentTime = startTime | myCurrentTime = startTime |
68 | myCurrentIter = nIter0 | myCurrentIter = nIter0 |
69 | ||
70 | #ifdef ALLOW_ADJOINT_RUN | #if ( defined (ALLOW_ADJOINT_RUN) || \ |
71 | defined (ALLOW_GRADIENT_CHECK) || \ | |
72 | defined (ALLOW_ECCO_OPTIMIZATION) ) | |
73 | ||
74 | _BEGIN_MASTER( mythid ) | _BEGIN_MASTER( mythid ) |
75 | IF (myProcId .eq. 0) THEN | IF (myProcId .eq. 0) THEN |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |