Changeset 8882 for trunk/psModules/src/objects/pmSourceIO_OBJ.c

Timestamp:

Sep 22, 2006, 2:29:31 AM (20 years ago)

Author:

rhl

Message:

[Start to] provide symbolic names for parameters

File:

• trunk/psModules/src/objects/pmSourceIO_OBJ.c (modified) (3 diffs)

trunk/psModules/src/objects/pmSourceIO_OBJ.c

@@ -3 +3 @@
  *  @author EAM, IfA
  *
- *  @version $Revision: 1.4 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2006-09-15 09:49:01 $
+ *  @version $Revision: 1.5 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2006-09-22 12:24:38 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -62 +62 @@
         dPAR = model->dparams->data.F32;
 
-        dmag = dPAR[1] / PAR[1];
+        dmag = dPAR[PM_PAR_FLUX] / PAR[PM_PAR_FLUX];
         type = pmSourceDophotType (source);
         if ((source->apMag < 99.0) && (source->psfMag < 99.0)) {
@@ -70 +70 @@
         }
 
-        shape.sx  = PAR[4];
-        shape.sy  = PAR[5];
-        shape.sxy = PAR[6];
+        shape.sx  = PAR[PM_PAR_SXX];
+        shape.sy  = PAR[PM_PAR_SYY];
+        shape.sxy = PAR[PM_PAR_SXY];
         axes = psEllipseShapeToAxes (shape);
 
         psLineInit (line);
         psLineAdd (line, "%3d",   type);
-        psLineAdd (line, "%8.2f", PAR[2]);
-        psLineAdd (line, "%8.2f", PAR[3]);
+        psLineAdd (line, "%8.2f", PAR[PM_PAR_XPOS]);
+        psLineAdd (line, "%8.2f", PAR[PM_PAR_YPOS]);
         psLineAdd (line, "%8.3f", source->psfMag);
         psLineAdd (line, "%6.3f", dmag);
-        psLineAdd (line, "%9.2f", PAR[0]);
+        psLineAdd (line, "%9.2f", PAR[PM_PAR_SKY]);
         psLineAdd (line, "%9.3f", axes.major);
         psLineAdd (line, "%9.3f", axes.minor);