blob: ff67e3eeb423a727006eaa7737c979afcad10fca (
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
43
44
45
46
47
48
|
include "../lib/phot.h"
# AP_PERRORS -- Print the photometry task errors.
procedure ap_perrors (ap, cier, sier, pier)
pointer ap # apphot structure
int cier # centering error code
int sier # sky fitting error code
int pier # photometry error code
begin
# Print the centering error message.
call ap_cerrors (ap, cier)
# Print the sky fitting error message.
call ap_serrors (ap, sier)
# Print the photometry error message.
call ap_merrors (ap, pier)
end
# AP_MERRORS -- Print the photometry errors.
procedure ap_merrors (ap, pier)
pointer ap # pointer to the apphot structure (unused)
int pier # photometry error
begin
# Print the photometry error message.
switch (pier) {
case AP_APERT_NOAPERT:
call printf ("Photometry apertures are outside of the image.\n")
case AP_APERT_OUTOFBOUNDS:
call printf ("Photometry apertures are partially outside the image.\n")
case AP_APERT_NOSKYMODE:
call printf ("The sky value is undefined.\n")
case AP_APERT_NEGMAG:
call printf ("The total flux inside the aperture is negative.\n")
case AP_APERT_BADDATA:
call printf ("Bad data in the aperture(s).\n")
default:
call printf ("")
}
end
|