Parent Directory | Revision Log | Revision Graph | Patch
revision 1.47 by jmc, Sat Jul 11 22:00:40 2009 UTC | revision 1.48 by mlosch, Mon Nov 23 16:15:54 2009 UTC | |
---|---|---|
# | Line 74 C but safer when EXCH do not fill al | Line 74 C but safer when EXCH do not fill al |
74 | #ifdef ALLOW_CG2D_NSA | #ifdef ALLOW_CG2D_NSA |
75 | cg2d_z(I,J,bi,bj) = 0. _d 0 | cg2d_z(I,J,bi,bj) = 0. _d 0 |
76 | #endif /* ALLOW_CG2D_NSA */ | #endif /* ALLOW_CG2D_NSA */ |
77 | #ifdef ALLOW_SRCG | |
78 | cg2d_y(I,J,bi,bj) = 0. _d 0 | |
79 | cg2d_v(I,J,bi,bj) = 0. _d 0 | |
80 | #endif /* ALLOW_SRCG */ | |
81 | ENDDO | ENDDO |
82 | ENDDO | ENDDO |
83 | ENDDO | ENDDO |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |