blob: 80c8f0a7ce852923759decc710ddfb7defe5bdb8 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
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
|
