Provide isprimary

emmt · Dec 9, 2019 · 7651610 · 7651610
1 parent d5f6ee7
commit 7651610
Showing 1 changed file with 12 additions and 0 deletions.
diff --git a/src/EasyFITS.jl b/src/EasyFITS.jl
@@ -301,6 +301,18 @@ Base.lastindex(obj::FitsImageHDU) = lastindex(get(HDU, obj))
 
 """
 
+```julia
+iprimary(hdu)
+```
+
+yields whetehr `hdu` is a primary FIT header data units (HDU).
+
+"""
+isprimary(obj::FitsHDU) = isprimary(get(HDU, obj))
+isprimary(obj::HDU) = (getfield(obj, :ext) == 1)
+
+"""
+
 An object of type `FitsHeader` stores the header part of a FITS *Header Data
 Unit* (HDU).  There are several ways to build an instance of `FitsHeader`.