diff options
Diffstat (limited to 'noao/digiphot/apphot/fitsky/apserrors.x')
| -rw-r--r-- | noao/digiphot/apphot/fitsky/apserrors.x | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/noao/digiphot/apphot/fitsky/apserrors.x b/noao/digiphot/apphot/fitsky/apserrors.x new file mode 100644 index 00000000..80c8f0a7 --- /dev/null +++ b/noao/digiphot/apphot/fitsky/apserrors.x @@ -0,0 +1,42 @@ +include "../lib/fitsky.h" + +# AP_SERRORS -- Program to print out detailed fitsky error messages when the +# program is run in interactive mode. + +procedure ap_serrors (ap, ier) + +pointer ap # pointer to apphot structure (not used) +int ier # integer error code + +begin + switch (ier) { + case AP_NOSKYAREA: + call printf ("The are no pixels in the sky annulus.\n") + case AP_SKY_OUTOFBOUNDS: + call printf ("The sky annulus is outside of the image.\n") + case AP_NOHISTOGRAM: + call printf ("The sky histogram has no width.\n") + case AP_FLAT_HIST: + call printf ("The sky histogram is flat or concave.\n") + case AP_NSKY_TOO_SMALL: + call printf ("The number of sky points is too small.\n") + case AP_SKY_SINGULAR: + call printf ("The sky fit is singular.\n") + case AP_SKY_NOCONVERGE: + call printf ("The sky fit did not converge.\n") + case AP_NOGRAPHICS: + call printf ("Interactive graphics are not available.\n") + case AP_NOSKYFILE: + call printf ( + "The text file containing sky values does not exist.\n") + case AP_EOFSKYFILE: + call printf ("The sky file is at EOF.\n") + case AP_BADSKYSCAN: + call printf ( + "An error occurred in decoding the current line in the sky file.\n") + case AP_BADPARAMS: + call printf ("Out of range mode or -ve sigma in Gaussian fit.\n") + default: + call printf ("") + } +end |