$retval = check_status($status);
Checks the CFITSIO status variable. If it indicates an error, the corresponding CFITSIO error message is carp()ed, and a false value is returned. If the passed status does not indicate an error, then a true value is returned and nothing else is done
