Parent Directory
| 
Revision Log
| 
Revision Graph
| 
Patch
| revision 1.3 by heimbach, Fri Jul 18 21:10:16 2003 UTC | revision 1.4 by heimbach, Mon Oct 27 22:32:55 2003 UTC | |
|---|---|---|
| # | Line 31 c == routine arguments == | Line 31 c == routine arguments == |
| 31 | ||
| 32 | integer mythid | integer mythid |
| 33 | ||
| 34 | #if (defined (ALLOW_GRADIENT_CHECK) && defined (ALLOW_OBCS_CONTROL)) | #if (defined (ALLOW_GRDCHK) && defined (ALLOW_OBCS_CONTROL)) |
| 35 | c == local variables == | c == local variables == |
| 36 | ||
| 37 | integer bi,bj | integer bi,bj |
| # | Line 161 c | Line 161 c |
| 161 | ||
| 162 | _BARRIER | _BARRIER |
| 163 | ||
| 164 | #endif /* ALLOW_GRADIENT_CHECK */ | #endif /* ALLOW_GRDCHK */ |
| 165 | ||
| 166 | end | end |
| 167 |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.22 |