File |
Line number |
Procedure |
Code |
./pkg/mdsio/mdsio_facef_read.F |
100 |
MDS_FACEF_READ_RS |
CALL MDS_BYTESWAPR8( (dNx+1), ioBuf8 ) |
./pkg/mdsio/mdsio_facef_read.F |
104 |
MDS_FACEF_READ_RS |
array(i,j,bi,bj) = ioBuf8(i+tBx) |
./pkg/mdsio/mdsio_facef_read.F |
132 |
MDS_FACEF_READ_RS |
READ(dUnit, rec=irec) ioBuf8 |
./pkg/mdsio/mdsio_facef_read.F |
134 |
MDS_FACEF_READ_RS |
CALL MDS_BYTESWAPR8( (sNx+1)*(sNy+1), ioBuf8 ) |
./pkg/mdsio/mdsio_facef_read.F |
138 |
MDS_FACEF_READ_RS |
array(i,j,bi,bj) = ioBuf8(i,j) |
./pkg/mdsio/mdsio_facef_read.F |
62 |
MDS_FACEF_READ_RS |
Real*8 ioBuf8(1:sNx*nSx*nPx+1) |
./pkg/mdsio/mdsio_facef_read.F |
65 |
MDS_FACEF_READ_RS |
Real*8 ioBuf8(1:sNx+1,1:sNy+1) |
./pkg/mdsio/mdsio_facef_read.F |
98 |
MDS_FACEF_READ_RS |
READ(dUnit,rec=jj+jBase) (ioBuf8(i),i=1,dNx+1) |