| File |
Line number |
Procedure |
Code |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
13 |
MDS_RD_REC_RL |
O r4Buf, r8Buf, |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
42 |
MDS_RD_REC_RL |
Real*8 r8Buf(nArr) |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
66 |
MDS_RD_REC_RL |
READ( dUnit, rec=iRec ) r8Buf |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
68 |
MDS_RD_REC_RL |
CALL MDS_BYTESWAPR8( nArr, r8Buf ) |
|
./pkg/mdsio/mdsio_rd_rec_rl.F |
71 |
MDS_RD_REC_RL |
arr(k) = r8Buf(k) |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
13 |
MDS_RD_REC_RS |
O r4Buf, r8Buf, |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
42 |
MDS_RD_REC_RS |
Real*8 r8Buf(nArr) |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
66 |
MDS_RD_REC_RS |
READ( dUnit, rec=iRec ) r8Buf |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
68 |
MDS_RD_REC_RS |
CALL MDS_BYTESWAPR8( nArr, r8Buf ) |
|
./pkg/mdsio/mdsio_rd_rec_rs.F |
71 |
MDS_RD_REC_RS |
arr(k) = r8Buf(k) |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
13 |
MDS_WR_REC_RL |
O r4Buf, r8Buf, |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
42 |
MDS_WR_REC_RL |
Real*8 r8Buf(nArr) |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
67 |
MDS_WR_REC_RL |
r8Buf(k) = arr(k) |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
70 |
MDS_WR_REC_RL |
CALL MDS_BYTESWAPR8( nArr, r8Buf ) |
|
./pkg/mdsio/mdsio_wr_rec_rl.F |
72 |
MDS_WR_REC_RL |
WRITE( dUnit, rec=iRec ) r8Buf |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
13 |
MDS_WR_REC_RS |
O r4Buf, r8Buf, |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
42 |
MDS_WR_REC_RS |
Real*8 r8Buf(nArr) |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
67 |
MDS_WR_REC_RS |
r8Buf(k) = arr(k) |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
70 |
MDS_WR_REC_RS |
CALL MDS_BYTESWAPR8( nArr, r8Buf ) |
|
./pkg/mdsio/mdsio_wr_rec_rs.F |
72 |
MDS_WR_REC_RS |
WRITE( dUnit, rec=iRec ) r8Buf |