Changeset 833 in Sophya for trunk/SophyaLib/Samba/alm.cc

Timestamp:

Apr 7, 2000, 12:28:03 PM (25 years ago)

Author:

ansari

Message:

Compil SGI-CC (Pb for(int i; i redeclare)) Reza 7/4/2000

File:

• trunk/SophyaLib/Samba/alm.cc (modified) (2 diffs)

trunk/SophyaLib/Samba/alm.cc

@@ -29 +29 @@
   //    --- smoothes the initial power spectrum ---
   TVector<T> cl=clin;
-  for (int l=0;l<n_l;l++)
+  int l;
+  for (l=0;l<n_l;l++)
     {
       r_8 gauss=exp(-l*(l+1.)*sig_smooth*sig_smooth);
@@ -39 +40 @@
   r_8 hsqrt2 = 1.0 / Rac2;
 
-  for (int l=0;l<n_l;l++)
+  for (l=0;l<n_l;l++)
     {
       T rms=sqrt(cl(l));