function [retval]=readIntHeightWidthData(filename, computation_t="double", fd=-2)
	if (0 <= fd)
		inptr=fd;
	else
		inptr=fopen(filename, 'r');
	endif
	
	h=fread(inptr,1,"int32");
	w=fread(inptr,1,"int32");
	retval=fread(inptr,[w,h],computation_t);
	
	if (0 < fd)
		fclose(outptr);
	endif
endfunction

