Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.4 by jmc, Thu Jul 11 16:22:30 2002 UTC | revision 1.5 by heimbach, Mon Sep 20 23:22:58 2004 UTC | |
|---|---|---|
| # | Line 76 C == Routine arguments == | Line 76 C == Routine arguments == |
| 76 | INTEGER myThid | INTEGER myThid |
| 77 | ||
| 78 | #ifdef ALLOW_ORLANSKI | #ifdef ALLOW_ORLANSKI |
| 79 | #ifdef ALLOW_OBCS_NORTH | |
| 80 | ||
| 81 | C == Local variables == | C == Local variables == |
| 82 | INTEGER I, K, J_obc | INTEGER I, K, J_obc |
| # | Line 244 C copy (current time) t to | Line 245 C copy (current time) t to |
| 245 | ENDDO | ENDDO |
| 246 | ENDDO | ENDDO |
| 247 | ||
| 248 | #endif /* ALLOW_OBCS_NORTH */ | |
| 249 | #endif /* ALLOW_ORLANSKI */ | #endif /* ALLOW_ORLANSKI */ |
| 250 | RETURN | RETURN |
| 251 | END | END |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |