sub _rfits_image($$$$) { print "Reading IMAGE data...\n" if($PDL::verbose);