Changeset 2601 in Sophya for trunk/SophyaExt/XAstroPack/tstxastro.cc

Timestamp:

Aug 16, 2004, 6:14:00 PM (21 years ago)

Author:

cmv

Message:

add routine arguments by reference cmv 16/08/04

File:

• trunk/SophyaExt/XAstroPack/tstxastro.cc (modified) (3 diffs)

trunk/SophyaExt/XAstroPack/tstxastro.cc

@@ -24 +24 @@
   sscanf(arg[2],"%lf,%c",&val0,&unite);
 
-  val = val0; InRange(&val,range);
+  val = val0; InRange(val,range);
   printf("InRange(%.9f, %.2f) = %.9f\n",val0,range,val);
-  val = val0; InRange(&val,range,vmax);
+  val = val0; InRange(val,range,vmax);
   printf("InRange(%.9f, %.2f, %.2f) = %.9f\n",val0,range,vmax,val);
 
@@ -33 +33 @@
     else if(unite=='d') un = TypUniteD;
       else un = TypUniteR;
-  val = val0; InRangeCoLat(&val,un);
+  val = val0; InRangeCoLat(val,un);
   printf("InRangeCoLat(%.9f %c) = %.9f\n",val0,unite,val);
-  val = val0; InRangeLat(&val,un);
+  val = val0; InRangeLat(val,un);
   printf("InRangeLat(%.9f %c) = %.9f\n",val0,unite,val);
   
@@ -106 +106 @@
 
   double coord1 = coord1_ini, coord2 = coord2_ini;
-  unsigned long newtyp = CoordConvertToStd(typ,&coord1,&coord2);
+  unsigned long newtyp = CoordConvertToStd(typ,coord1,coord2);
   string newstr = DecodeTypAstro(newtyp);