Changeset 1545 in Sophya for trunk/SophyaProg/PrgMap/extrapsph.cc

Timestamp:

Jun 18, 2001, 6:07:04 PM (24 years ago)

Author:

ansari

Message:

compil/portage SGI-CC , Reza 18/6/2001

File:

• trunk/SophyaProg/PrgMap/extrapsph.cc (modified) (3 diffs)

trunk/SophyaProg/PrgMap/extrapsph.cc

@@ -95 +95 @@
 cout<<"...Filling Reducted Spheres"<<endl;
 uint_4 n=0;
-for(int_4 i=0;i<sphin.NbPixels();i++) {
+int_4 i, ir;
+for(i=0;i<sphin.NbPixels();i++) {
   if(sphinw(i)<=0.) continue;
   double theta,phi;
   sphin.PixThetaPhi(i,theta,phi);
-  int_4 ir = sphred.PixIndexSph(theta,phi);
+  ir = sphred.PixIndexSph(theta,phi);
   sphred(ir)  += sphin(i)*sphinw(i);
   sphredw(ir) += sphinw(i);
@@ -107 +108 @@
 cout<<"...Computing Reducted Spheres"<<endl;
 n=0;
-for(int_4 ir=0;ir<sphred.NbPixels();ir++)
+for(ir=0;ir<sphred.NbPixels();ir++)
   if(sphredw(ir) > 0.) {sphred(ir) /= sphredw(ir); n++;}
 cout<<"      Reducted Sphere: Number of pixels filled "<<n<<endl;
@@ -114 +115 @@
 cout<<"...Filling hole for Output Spheres"<<endl;
 n=0;
-for(int_4 i=0;i<sphin.NbPixels();i++) {
+for(i=0;i<sphin.NbPixels();i++) {
   if(sphinw(i)>0.) continue;
   double theta,phi;