Parent Directory | Revision Log | Revision Graph | Patch
revision 1.14 by cnh, Wed Oct 28 03:11:36 1998 UTC | revision 1.15 by cnh, Mon Nov 2 03:34:11 1998 UTC | |
---|---|---|
# | Line 86 CcnhDebugEnds | Line 86 CcnhDebugEnds |
86 | ||
87 | ||
88 | C-- Initialise inverter | C-- Initialise inverter |
89 | etaNBuf(1,myThid) = 0. D0 | etaNBuf(1,myThid) = 0. _d 0 |
90 | errBuf(1,myThid) = 0. D0 | errBuf(1,myThid) = 0. _d 0 |
91 | sumRHSBuf(1,myThid) = 0. D0 | sumRHSBuf(1,myThid) = 0. _d 0 |
92 | etaNM1 = 1. D0 | etaNM1 = 1. _d 0 |
93 | ||
94 | CcnhDebugStarts | CcnhDebugStarts |
95 | C _EXCH_XY_R8( cg2d_b, myThid ) | C _EXCH_XY_R8( cg2d_b, myThid ) |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |