Parent Directory | Revision Log | Revision Graph | Patch
revision 1.6 by jmc, Wed Aug 23 15:20:37 2006 UTC | revision 1.7 by heimbach, Fri Nov 17 22:35:03 2006 UTC | |
---|---|---|
# | Line 47 CEOP | Line 47 CEOP |
47 | #ifdef ALLOW_EXCH2 | #ifdef ALLOW_EXCH2 |
48 | CALL EXCH2_3D_RX( phi, Nr, myThid ) | CALL EXCH2_3D_RX( phi, Nr, myThid ) |
49 | RETURN | RETURN |
50 | #endif | #else |
51 | ||
52 | OLw = OLx | OLw = OLx |
53 | OLe = OLx | OLe = OLx |
# | Line 75 C begine. | Line 75 C begine. |
75 | ENDIF | ENDIF |
76 | ||
77 | RETURN | RETURN |
78 | #endif | |
79 | END | END |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |