From fa080de7afc95aa1c19a6e6fc0e0708ced2eadc4 Mon Sep 17 00:00:00 2001 From: Joseph Hunkeler Date: Wed, 8 Jul 2015 20:46:52 -0400 Subject: Initial commit --- noao/digiphot/apphot/center/apgcpars.x | 27 +++++++++++++++++++++++++++ 1 file changed, 27 insertions(+) create mode 100644 noao/digiphot/apphot/center/apgcpars.x (limited to 'noao/digiphot/apphot/center/apgcpars.x') diff --git a/noao/digiphot/apphot/center/apgcpars.x b/noao/digiphot/apphot/center/apgcpars.x new file mode 100644 index 00000000..e40db12e --- /dev/null +++ b/noao/digiphot/apphot/center/apgcpars.x @@ -0,0 +1,27 @@ +include "../lib/display.h" +include "../lib/noise.h" +include "../lib/center.h" + +# AP_GCPARS -- Procedure to read in the centering parameters from the +# appropriate parameters files. + +procedure ap_gcpars (ap) + +pointer ap # pointer to the apphot structure + +bool clgetb() +int btoi() + +begin + # Initialize the structure. + call apcinit (ap, AP_CENTROID1D, 2.5, 2.0, AP_NPOISSON) + + # Get the data dependent parameters. + call ap_gdapars (ap) + + # Get the centering algorithm parameters. + call ap_gcepars (ap) + + # Make radial plots on stdgraph. + call apseti (ap, RADPLOTS, btoi (clgetb ("radplots"))) +end -- cgit