This function returns the dataType (see dal) of a given FITS-image
or table-column.
For the input FITS filename, the form of `ABC.fits:TABNAME' is allowed,
where the TABNAME is the name of the FITS extention of interest.
The priority order for the table-name (tabName) in given setTabName,
extention number (extNum) and extention name (extName) explicitly given is
interface getDataType
function getDataTypeFromName(setTabName, extNum, extName, colName) result(iType)
integer :: iType
character(*), intent(in) :: setTabName
integer, intent(in), optional :: extNum
character(*), intent(in), optional :: extName, colName
end function getDataTypeFromName
function getDataTypeFromSet(set, extNum, extName, colName) result(iType)
integer :: iType
type(DataSetT), intent(in) :: set
integer, intent(in), optional :: extNum
character(*), intent(in), optional :: extName, colName
end function getDataTypeFromSet
function getDataTypeFromTab(tab, colName) result(iType)
integer :: iType
type(TableT), intent(in) :: tab
character(*), intent(in) :: colName
end function getDataTypeFromTab
end interface