Changeset 607 in Sophya for trunk/SophyaLib/SkyT/radspec.cc

Timestamp:

Nov 20, 1999, 10:00:54 PM (26 years ago)

Author:

ansari

Message:

Modifs preparatoire pour Garching MAP , Reza 20/11/99

File:

• trunk/SophyaLib/SkyT/radspec.cc (modified) (4 diffs)

trunk/SophyaLib/SkyT/radspec.cc

@@ -1 +1 @@
 //--------------------------------------------------------------------------
 // File and Version Information:
-//      $Id: radspec.cc,v 1.1.1.1 1999-11-19 16:34:32 ansari Exp $
+//      $Id: radspec.cc,v 1.2 1999-11-20 21:00:50 ansari Exp $
 //
 // Description:
@@ -106 +106 @@
     _raypourfinteg = const_cast<RadSpectra *>(this);
     TrpzInteg I(RadSpectra_fluxFunction , f1, f2);  
-    _raypourfinteg = NULL;
-    return((double)I);        
+    double val = (double)I;
+    _raypourfinteg = NULL;  // On ne peut pas faire ca avant la destruction de I
+    return(val);        
 }
 double 
@@ -160 +161 @@
   _raypourfinteg = const_cast<RadSpectra *>(this);
   _filter = const_cast<SpectralResponse *>(&filter);
-  TrpzInteg I(RadSpectra_filteredFlux,f1,f2);  
+  TrpzInteg I(RadSpectra_filteredFlux,f1,f2);
+  double val = (double)I;
   _raypourfinteg = NULL;
   _filter = NULL;
-  return((double)I);        
+  return(val);        
 }
 
@@ -210 +212 @@
    _filter = const_cast<SpectralResponse *>(&filter);
    TrpzInteg I(RadSpectra_logFilteredFlux,f1Log,f2Log);  
+   double val = (double)I;
    _raypourfinteg = NULL;
    _filter = NULL;
-   return((double)I* log(10.));        
+   return(val* log(10.));        
 }