Changeset 25433 for branches/eam_branches/20090715/psphot/src/psphotPetrosianVisual.c

Timestamp:

Sep 17, 2009, 2:26:32 PM (17 years ago)

Author:

eugene

Message:

change radius for extended sources to use footprint; clean up some of the visualizations; plug some leaks

File:

• branches/eam_branches/20090715/psphot/src/psphotPetrosianVisual.c (modified) (3 diffs)

branches/eam_branches/20090715/psphot/src/psphotPetrosianVisual.c

@@ -19 +19 @@
 
 static int kapa = -1;
+static int kapa2 = -1;
 
 // if no valid data is supplied (NULL or n <- 0), leave limits as they were
@@ -53 +54 @@
 
     // return true;
-    if (!pmVisualIsVisual()) return true;
-
-    if (kapa == -1) {
-        kapa = KapaOpenNamedSocket ("kapa", "psphot:plots");
-        if (kapa == -1) {
+    // if (!pmVisualIsVisual()) return true;
+
+    if (kapa2 == -1) {
+        kapa2 = KapaOpenNamedSocket ("kapa", "psphot:plots");
+        if (kapa2 == -1) {
             fprintf (stderr, "failure to open kapa; visual mode disabled\n");
             pmVisualSetVisual(false);
@@ -64 +65 @@
     }
 
-    KapaClearPlots (kapa);
+    KapaClearPlots (kapa2);
     KapaInitGraph (&graphdata);
-    KapaSetFont (kapa, "courier", 14);
+    KapaSetFont (kapa2, "courier", 14);
 
     pmVisualLimitsFromVectors (&graphdata, radius, flux);
-    KapaSetLimits (kapa, &graphdata);
-
-    KapaBox (kapa, &graphdata);
-    KapaSendLabel (kapa, "radius", KAPA_LABEL_XM);
-    KapaSendLabel (kapa, "flux", KAPA_LABEL_YM);
-
-    graphdata.color = KapaColorByName ("black");
-    graphdata.style = 2;
-    graphdata.ptype = 0;
-    graphdata.size = 1.0;
-    KapaPrepPlot (kapa, radius->n, &graphdata);
-    KapaPlotVector (kapa, radius->n, radius->data.F32, "x");
-    KapaPlotVector (kapa, radius->n, flux->data.F32, "y");
+    KapaSetLimits (kapa2, &graphdata);
+
+    KapaBox (kapa2, &graphdata);
+    KapaSendLabel (kapa2, "radius", KAPA_LABEL_XM);
+    KapaSendLabel (kapa2, "flux", KAPA_LABEL_YM);
+
+    graphdata.color = KapaColorByName ("black");
+    graphdata.style = 2;
+    graphdata.ptype = 0;
+    graphdata.size = 1.0;
+    KapaPrepPlot (kapa2, radius->n, &graphdata);
+    KapaPlotVector (kapa2, radius->n, radius->data.F32, "x");
+    KapaPlotVector (kapa2, radius->n, flux->data.F32, "y");
 
     // pause and wait for user input: