Parent Directory | Revision Log | Revision Graph | Patch
revision 1.4 by heimbach, Fri Mar 7 05:20:50 2003 UTC | revision 1.5 by heimbach, Wed Nov 19 19:07:02 2003 UTC | |
---|---|---|
# | Line 75 c == local variables == | Line 75 c == local variables == |
75 | integer funit | integer funit |
76 | ||
77 | integer cbuffindex | integer cbuffindex |
78 | _RL cbuff( sNx*nSx*nPx*sNy*nSy*nPy ) | real*4 cbuff( sNx*nSx*nPx*sNy*nSy*nPy ) |
79 | ||
80 | character*(128) fname | character*(128) fname |
81 |
|
ViewVC Help | |
Powered by ViewVC 1.1.22 |