Parent Directory | Revision Log | Revision Graph | Patch
revision 1.21 by dfer, Mon Apr 7 20:31:16 2008 UTC | revision 1.22 by dfer, Tue Apr 8 16:18:43 2008 UTC | |
---|---|---|
# | Line 100 C freefe :: iron not bo | Line 100 C freefe :: iron not bo |
100 | INTEGER I,J,k | INTEGER I,J,k |
101 | INTEGER nCALCITEstep | INTEGER nCALCITEstep |
102 | CEOP | CEOP |
jmin=1 | ||
jmax=sNy | ||
imin=1 | ||
imax=sNx | ||
103 | ||
104 | DO k=1,Nr | DO k=1,Nr |
105 | DO j=1-OLy,sNy+OLy | DO j=1-OLy,sNy+OLy |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |