aboutsummaryrefslogtreecommitdiff
path: root/noao/digiphot/apphot/fitpsf/appferrors.x
blob: 20ed8820a59e009550d33cbc2e38db9410992815 (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
include "../lib/fitpsf.h"

# AP_PFERRORS -- Print detailed fitpsf error messages on the standard output.

procedure ap_pferrors (ap, ier)

pointer	ap		# pointer to apphot structure (unused)
int	ier		# integer error code

begin
	switch (ier) {
	case AP_NOPSFAREA:
	    call printf (
	        "The psf fitting aperture is outside the image.\n")
	case AP_PSF_OUTOFBOUNDS:
	    call printf (
	        "The psf fitting aperture is partially outside the image.\n")
	case AP_NPSF_TOO_SMALL:
	    call printf (
	        "The number of data points is too few for psf fitting.\n")
	case AP_PSF_SINGULAR:
	    call printf ("The psf fitting solution is singular.\n")
	case AP_PSF_NOCONVERGE:
	    call printf ("The psf fitting solution did not converge.\n")
	}
end