Changeset 3792 in Sophya for trunk/Cosmo/RadioBeam/calcpk2.cc

Timestamp:

Jun 28, 2010, 6:06:00 PM (15 years ago)

Author:

ansari

Message:

Ajout du programme de calcul et sauvegarde reponse interfero, Reza 28/06/2010

File:

• trunk/Cosmo/RadioBeam/calcpk2.cc (modified) (2 diffs)

trunk/Cosmo/RadioBeam/calcpk2.cc

@@ -65 +65 @@
     
     bool fgcorrbeam=true;
-    double tbeamarcmin=15.;
+    double tbeamDoL=135;
     if (narg>7) {
-      tbeamarcmin=atof(arg[7]);
-      if (tbeamarcmin<1.e-6)  fgcorrbeam=false;
+      tbeamDoL=atof(arg[7]);
+      if (tbeamDoL<1.)  fgcorrbeam=false;
     }
     bool fgclnsrc=true;
@@ -120 +120 @@
     double lambda = conv.getLambda();
     Four2DResponse arep(2, InterfArrayDiametre/lambda, InterfArrayDiametre/lambda, lambda);
-    double DoL = 1.22/ArcminToRadian(tbeamarcmin);
+    double DoL = tbeamDoL;
+    double tbeamarcmin = RadianToDegree(1.22/DoL)*60.;
     Four2DResponse tbeam(2, DoL, DoL );
     ForegroundCleaner  cleaner(arep, tbeam, skycube); 
     if (fgcorrbeam) {
-      cout << "calcpk2[3.a] : calling cleaner.BeamCorrections() for target beam (" << tbeamarcmin << " arcmin)" 
-           << " Diam/Lambda=" << DoL << endl;
+      cout << "calcpk2[3.a] : calling cleaner.BeamCorrections() for target beam D/Lambda=" << DoL 
+           << "  -> arcmin " << tbeamarcmin << endl;
       cleaner.BeamCorrections();
     }