#include "hdf.h" int32 ri_id, stat; intn interlace_mode = MFGR_INTERLACE_PIXEL; int32 start[2], stride[2], edge[2]; uint16 data[100]; start[0] = start[1] = 0; stride[0] = stride[1] = 1; edge[0] = edge[1] = 10; ... stat = GRreqimageil(ri_id, interlace_mode); stat = GRreadimage(ri_id, start, stride, edge, data); ...
FORTRAN
|
integer function mgrimil(ri_id, interlace_mode)
|
|
integer ri_id, interlace_mode
|