]> git.uio.no Git - u/mrichter/AliRoot.git/blobdiff - HMPID/AliHMPIDPreprocessor.cxx
cosmetics
[u/mrichter/AliRoot.git] / HMPID / AliHMPIDPreprocessor.cxx
index 22bc5592306e6ce95f9a9f24a671fd596f896d74..e74ebac87d4360206ca569f127990af0f3e0a97d 100644 (file)
@@ -19,6 +19,9 @@
 //.
 //.
 //.
+using std::hex;
+using std::ifstream;
+using std::dec;
 ClassImp(AliHMPIDPreprocessor)
 
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
@@ -42,7 +45,7 @@ UInt_t AliHMPIDPreprocessor::Process(TMap* pMap)
 
   TString runType = GetRunType();
   Log(Form(" AliHMPIDPreprocessor: RunType is %s",runType.Data()));
-  
+  Bool_t statusNoise=kFALSE, statusDcs=kFALSE;
 // start to check event type and procedures
   
   Log("HMPID - Process in Preprocessor started");
@@ -55,17 +58,53 @@ UInt_t AliHMPIDPreprocessor::Process(TMap* pMap)
     } else {
        Log("HMPID - Pedestal processing successful!!");                    return kFALSE;  // ok for pedestals
     }
-  } else if ( runType=="STANDALONE" || runType=="PHYSICS"){
-  if (!ProcDcs(pMap)){
-       Log("HMPID - ERROR - DCS processing failed!!");                     return kTRUE;   // error in DCS processing
-    } else {
-       Log("HMPID - DCS processing successful!!");                         return kFALSE;  // ok for DCS
-    }
-  } else {
+  }//CALIBRATION
+  else if ( runType=="STANDALONE" || runType=="PHYSICS"){   
+   statusDcs=ProcDcs(pMap);
+   statusNoise=ProcNoiseMap();
+   if(!statusDcs || !statusNoise) { Log(Form("HMPID - ERROR - Noise Map(%d) and/or DCS(%d) processing failed!! (0=OK, 1=FAILED)",statusNoise,statusDcs)); return kTRUE; }  // error in Noise Map or DCS processing
+   else                           { Log("HMPID - Noise Map and DCS processing successful!!");  return kFALSE;}  // ok
+  }//STANDALONE or PHYSICS run
+   else {
     Log("HMPID - Nothing to do with preprocessor for HMPID, bye!");         return kFALSE;  // ok - nothing done
   }
 }//Process()
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
+Bool_t AliHMPIDPreprocessor::ProcNoiseMap()
+{
+  //
+  // Goal: Process the Noise Map created by the HMP Physics DA to mask 
+  // noisy channels from reconstruction and follow changes in accepatnce
+  // eg. DDL turn on/off after PEDESTAL run and between PHYSICS runs.
+  // Returns kFALSE on success
+  Bool_t stProcNoise=kFALSE;
+  TFile  *fNoiseFile;
+  TH2F   *hNoiseMap = 0x0;
+  
+  TList *pNoiseSource=GetFileSources(kDAQ,"HmpPhysicsDaNoiseMap.root"); //get list of DAQ source names containing id "HmpPhysicsDaNoiseMap" --> defined in HMPIDphysda.cxx
+  if(!pNoiseSource) {Log(Form("ERROR: Retrieval of sources for noise map: HmpPhysicsDaNoiseMap.root is failed!")); return stProcNoise;}
+  if(!(TObjString*)pNoiseSource->At(0)) {Log(Form("ERROR: empty list received from DAQ Source!")); return stProcNoise;}
+    
+  TString noiseFile = GetFile(kDAQ,Form("HmpPhysicsDaNoiseMap.root"),((TObjString*)pNoiseSource->At(0))->GetName());
+  if(noiseFile.Length()==0) {Log(Form("ERROR retrieving noise map file: HmpPhysicsDaNoiseMap.root")); return stProcNoise;}
+  
+  fNoiseFile = TFile::Open(noiseFile.Data(),"read");
+  if(!fNoiseFile) {Log(Form("ERROR cannot open NoiseFile: %s!",noiseFile.Data())); return stProcNoise;}
+  hNoiseMap = (TH2F*) fNoiseFile->Get("hHmpNoiseMaps");
+  
+  AliCDBMetaData metaDataHisto;
+  metaDataHisto.SetBeamPeriod(0);
+  metaDataHisto.SetResponsible("AliHMPIDPreprocessor"); 
+  metaDataHisto.SetComment("AliHMPIDPreprocessor stores the Noise Map object as Reference Data.");
+  AliInfo("Storing Reference Data");
+  stProcNoise = Store("Calib","NoiseMap",hNoiseMap,&metaDataHisto,0,kTRUE);
+  if(!stProcNoise) {
+    Log("HMPID - failure to store Noise Map data results in OCDB");   
+  }
+  return stProcNoise;
+}//ProcNoiseMap
+//++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 Bool_t AliHMPIDPreprocessor::ProcDcs(TMap* pMap)
 {
 // Process: 1 (old). inlet and outlet C6F14 temperature, stores TObjArray of 21 TF1, where TF1 is Nmean=f(t), one per radiator
@@ -92,66 +131,83 @@ Bool_t AliHMPIDPreprocessor::ProcDcs(TMap* pMap)
   
   Double_t xP,yP;
 
-  TF1 **pTin  = new TF1*[21];
-  TF1 **pTout = new TF1*[21];
+//  TF1 **pTin  = new TF1*[21];
+//  TF1 **pTout = new TF1*[21];
+  TF1  *pTin[21];
+  TF1 *pTout[21];
 
 // evaluate Environment Pressure
   
   TObjArray *pPenv=(TObjArray*)pMap->GetValue("HMP_DET/HMP_ENV/HMP_ENV_PENV.actual.value");
-  Log(Form(" Environment Pressure data              ---> %3i entries",pPenv->GetEntries()));
-  if(pPenv->GetEntries()) {
-    TIter nextPenv(pPenv);
-    TGraph *pGrPenv=new TGraph; cnt=0;
-    while((pVal=(AliDCSValue*)nextPenv())) pGrPenv->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());        //P env
-    if( cnt==1) {
-      pGrPenv->GetPoint(0,xP,yP);
-      new TF1("Penv",Form("%f",yP),fStartTime,fEndTime);
-    } else {
-      pGrPenv->Fit(new TF1("Penv","1000+x*[0]",fStartTime,fEndTime),"Q");
-    }
-    delete pGrPenv;
-  } else {AliWarning(" No Data Points from HMP_ENV_PENV.actual.value!");return kFALSE;}
-    
+  if(!pPenv) {
+    AliWarning(" No Data Points from HMP_ENV_PENV.actual.value!");
+    return kFALSE;
+  } else {
+    Log(Form(" Environment Pressure data              ---> %3i entries",pPenv->GetEntries()));
+    if(pPenv->GetEntries()) {
+      TIter nextPenv(pPenv);
+      TGraph *pGrPenv=new TGraph; cnt=0;
+      while((pVal=(AliDCSValue*)nextPenv())) pGrPenv->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());        //P env
+      if( cnt==1) {
+        pGrPenv->GetPoint(0,xP,yP);
+        new TF1("Penv",Form("%f",yP),fStartTime,fEndTime);
+      } else {
+        pGrPenv->Fit(new TF1("Penv","1000+x*[0]",fStartTime,fEndTime),"Q");
+      }
+      delete pGrPenv;
+    } else {AliWarning(" No Data Points from HMP_ENV_PENV.actual.value!");return kFALSE;}
+  }  
 // evaluate Pressure
   
   for(Int_t iCh=0;iCh<7;iCh++){                   
     TObjArray *pP =(TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_GAS/HMP_MP%i_GAS_PMWPC.actual.value",iCh,iCh,iCh));
-      Log(Form(" Pressure for module %i data             ---> %3i entries",iCh,pP->GetEntries()));
-    if(pP->GetEntries()) {
-      TIter nextP(pP);    
-      TGraph *pGrP=new TGraph; cnt=0; 
-      while((pVal=(AliDCSValue*)nextP())) pGrP->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());            //P
-      if( cnt==1) {
-        pGrP->GetPoint(0,xP,yP);
-        new TF1(Form("P%i",iCh),Form("%f",yP),fStartTime,fEndTime);
-      } else {
-        pGrP->Fit(new TF1(Form("P%i",iCh),"[0] + x*[1]",fStartTime,fEndTime),"Q");
-      }
-      delete pGrP;
-    } else {AliWarning(" No Data Points from HMP_MP0-6_GAS_PMWPC.actual.value!");return kFALSE;}
+    if(!pP) {
+      AliWarning(Form(" No Data Points from HMP_MP%1i_GAS_PMWPC.actual.value!",iCh));
+      return kFALSE;
+    } else {
+        Log(Form(" Pressure for module %i data             ---> %3i entries",iCh,pP->GetEntries()));
+      if(pP->GetEntries()) {
+        TIter nextP(pP);    
+        TGraph *pGrP=new TGraph; cnt=0; 
+        while((pVal=(AliDCSValue*)nextP())) pGrP->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());            //P
+        if( cnt==1) {
+          pGrP->GetPoint(0,xP,yP);
+          new TF1(Form("P%i",iCh),Form("%f",yP),fStartTime,fEndTime);
+        } else {
+          pGrP->Fit(new TF1(Form("P%i",iCh),"[0] + x*[1]",fStartTime,fEndTime),"Q");
+        }
+        delete pGrP;
+      } else {AliWarning(" No Data Points from HMP_MP0-6_GAS_PMWPC.actual.value!");return kFALSE;}
+    }
     
 // evaluate High Voltage
     
-    for(Int_t iSec=0;iSec<6;iSec++){
+   for(Int_t iSec=0;iSec<6;iSec++){
       TObjArray *pHV=(TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_PW/HMP_MP%i_SEC%i/HMP_MP%i_SEC%i_HV.actual.vMon",iCh,iCh,iCh,iSec,iCh,iSec));
-      Log(Form(" HV for module %i and secto %i data       ---> %3i entries",iCh,iSec,pHV->GetEntries()));
-      if(pHV->GetEntries()) {
-        TIter nextHV(pHV);
-        TGraph *pGrHV=new TGraph; cnt=0;
-        while((pVal=(AliDCSValue*)nextHV())) pGrHV->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());            //HV
-        if( cnt==1) {
-          pGrHV->GetPoint(0,xP,yP);
-          new TF1(Form("HV%i_%i",iCh,iSec),Form("%f",yP),fStartTime,fEndTime);               
-        } else {
-          pGrHV->Fit(new TF1(Form("HV%i_%i",iCh,iSec),"[0]+x*[1]",fStartTime,fEndTime),"Q");               
-        }
-        delete pGrHV;
-      } else {AliWarning(" No Data Points from HMP_MP0-6_SEC0-5_HV.actual.vMon!");return kFALSE;}
-     
+      if(!pHV) {
+        AliWarning(Form(" No Data Points from HMP_MP%1i_SEC%1i_HV.actual.vMon!",iCh,iSec));
+        return kFALSE;
+      } else {
+        Log(Form(" HV for module %i and secto %i data       ---> %3i entries",iCh,iSec,pHV->GetEntries()));
+        if(pHV->GetEntries()) {
+          TIter nextHV(pHV);
+          TGraph *pGrHV=new TGraph; cnt=0;
+          while((pVal=(AliDCSValue*)nextHV())) pGrHV->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat());            //HV
+          if( cnt==1) {
+            pGrHV->GetPoint(0,xP,yP);
+            new TF1(Form("HV%i_%i",iCh,iSec),Form("%f",yP),fStartTime,fEndTime);               
+          } else {
+            pGrHV->Fit(new TF1(Form("HV%i_%i",iCh,iSec),"[0]+x*[1]",fStartTime,fEndTime),"Q");               
+          }
+          delete pGrHV;
+        } else {AliWarning(" No Data Points from HMP_MP0-6_SEC0-5_HV.actual.vMon!");return kFALSE;}
+      }   
 // evaluate Qthre
      
       arQthre.AddAt(new TF1(Form("HMP_QthreC%iS%i",iCh,iSec),
           Form("3*10^(3.01e-3*HV%i_%i - 4.72)+170745848*exp(-(P%i+Penv)*0.0162012)",iCh,iSec,iCh),fStartTime,fEndTime),6*iCh+iSec);
+
+     //arQthre.AddAt(new TF1(Form("HMP_QthreC%iS%i",iCh,iSec),"100",fStartTime,fEndTime),6*iCh+iSec);  
     }
 // evaluate Temperatures: in and out of the radiators    
     // T in
@@ -159,36 +215,49 @@ Bool_t AliHMPIDPreprocessor::ProcDcs(TMap* pMap)
       
       pTin[3*iCh+iRad]  = new TF1(Form("Tin%i%i" ,iCh,iRad),"[0]+[1]*x",fStartTime,fEndTime);
       pTout[3*iCh+iRad] = new TF1(Form("Tout%i%i",iCh,iRad),"[0]+[1]*x",fStartTime,fEndTime);          
-      
-      TObjArray *pT1=(TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad));  
-      Log(Form(" Temperatures for module %i inside data  ---> %3i entries",iCh,pT1->GetEntries()));
-      if(pT1->GetEntries()) {
-        TIter nextT1(pT1);//Tin
-        TGraph *pGrT1=new TGraph; cnt=0;  while((pVal=(AliDCSValue*)nextT1())) pGrT1->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat()); //T inlet
-        if(cnt==1) { 
-          pGrT1->GetPoint(0,xP,yP);
-          pTin[3*iCh+iRad]->SetParameter(0,yP);
-          pTin[3*iCh+iRad]->SetParameter(1,0);
-        } else {
-          pGrT1->Fit(pTin[3*iCh+iRad],"Q");
-        }
-        delete pGrT1;
-      } else {AliWarning(" No Data Points from HMP_MP0-6_LIQ_LOOP.actual.sensors.Rad0-2In_Temp!");return kFALSE;}
+
+      //pTin[3*iCh+iRad]  = new TF1(Form("Tin%i%i" ,iCh,iRad),"21",fStartTime,fEndTime);
+      //pTout[3*iCh+iRad] = new TF1(Form("Tout%i%i",iCh,iRad),"22",fStartTime,fEndTime);          
+                  
+    TObjArray *pT1=(TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iIn_Temp",iCh,iCh,iRad));
+      if(!pT1) {
+        AliWarning(Form(" No Data Points from HMP_MP%1i_LIQ_LOOP.actual.sensors.Rad%1iIn_Temp!",iCh,iRad));
+        return kFALSE;
+      } else {
+        Log(Form(" Temperatures for module %i inside data  ---> %3i entries",iCh,pT1->GetEntries()));
+        if(pT1->GetEntries()) {
+          TIter nextT1(pT1);//Tin
+          TGraph *pGrT1=new TGraph; cnt=0;  while((pVal=(AliDCSValue*)nextT1())) pGrT1->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat()); //T inlet
+          if(cnt==1) { 
+            pGrT1->GetPoint(0,xP,yP);
+            pTin[3*iCh+iRad]->SetParameter(0,yP);
+            pTin[3*iCh+iRad]->SetParameter(1,0);
+          } else {
+            pGrT1->Fit(pTin[3*iCh+iRad],"Q");
+          }
+          delete pGrT1;
+        } else {AliWarning(" No Data Points from HMP_MP0-6_LIQ_LOOP.actual.sensors.Rad0-2In_Temp!");return kFALSE;}
+      }
     // T out
       TObjArray *pT2=(TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_MP%i/HMP_MP%i_LIQ_LOOP.actual.sensors.Rad%iOut_Temp",iCh,iCh,iRad)); 
-      Log(Form(" Temperatures for module %i outside data ---> %3i entries",iCh,pT2->GetEntries()));
-      if(pT2->GetEntries()) {
-        TIter nextT2(pT2);//Tout      
-        TGraph *pGrT2=new TGraph; cnt=0;  while((pVal=(AliDCSValue*)nextT2())) pGrT2->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat()); //T outlet 
-        if(cnt==1) { 
-          pGrT2->GetPoint(0,xP,yP);
-          pTout[3*iCh+iRad]->SetParameter(0,yP);
-          pTout[3*iCh+iRad]->SetParameter(1,0);
-        } else {
-          pGrT2->Fit(pTout[3*iCh+iRad],"Q");
-        }
-        delete pGrT2;
-      } else {AliWarning(" No Data Points from HMP_MP0-6_LIQ_LOOP.actual.sensors.Rad0-2Out_Temp!");return kFALSE;}
+      if(!pT2) {
+        AliWarning(Form(" No Data Points from HMP_MP%1i_LIQ_LOOP.actual.sensors.Rad%1iOut_Temp!",iCh,iRad));
+        return kFALSE;
+      } else {
+        Log(Form(" Temperatures for module %i outside data ---> %3i entries",iCh,pT2->GetEntries()));
+        if(pT2->GetEntries()) {
+          TIter nextT2(pT2);//Tout      
+          TGraph *pGrT2=new TGraph; cnt=0;  while((pVal=(AliDCSValue*)nextT2())) pGrT2->SetPoint(cnt++,pVal->GetTimeStamp(),pVal->GetFloat()); //T outlet 
+          if(cnt==1) { 
+            pGrT2->GetPoint(0,xP,yP);
+            pTout[3*iCh+iRad]->SetParameter(0,yP);
+            pTout[3*iCh+iRad]->SetParameter(1,0);
+          } else {
+            pGrT2->Fit(pTout[3*iCh+iRad],"Q");
+          }
+          delete pGrT2;
+        } else {AliWarning(" No Data Points from HMP_MP0-6_LIQ_LOOP.actual.sensors.Rad0-2Out_Temp!");return kFALSE;}
+      }
        
 // evaluate Mean Refractive Index
       
@@ -206,8 +275,10 @@ Bool_t AliHMPIDPreprocessor::ProcDcs(TMap* pMap)
   metaData.SetResponsible("AliHMPIDPreprocessor"); 
   metaData.SetComment("HMPID preprocessor fills TObjArrays.");
 
-  stDcsStore =   Store("Calib","Qthre",&arQthre,&metaData) &&    // from DCS 
-                 Store("Calib","Nmean",&arNmean,&metaData);      // from DCS
+  stDcsStore =   Store("Calib","Qthre",&arQthre,&metaData,0,kTRUE) &&    // from DCS  0,kTRUE generates the file from Run 0 to Run 99999999
+                 Store("Calib","Nmean",&arNmean,&metaData,0,kTRUE);      // from DCS
+//  stDcsStore =   Store("Calib","Qthre",&arQthre,&metaData) &&    // from DCS 
+//                 Store("Calib","Nmean",&arNmean,&metaData);      // from DCS
   if(!stDcsStore) {
     Log("HMPID - failure to store DCS data results in OCDB");    
   }
@@ -228,13 +299,15 @@ Bool_t AliHMPIDPreprocessor::ProcPed()
 // Returns: kTRUE on success
   
   Bool_t stPedStore=kFALSE;
+  Bool_t stDeadMaskedStore=kFALSE;
   AliHMPIDDigit dig;
   AliHMPIDRawStream rs;
   Int_t nSigCut,r,d,a,hard;  Float_t mean,sigma;
   Int_t  runNumber,ldcId,timeStamp,nEv,nDdlEv,nBadEv;  Char_t tName[10]; 
   Float_t nBadEvPer;
   
-  TObjArray aDaqSig(7); aDaqSig.SetOwner(kTRUE); for(Int_t i=0;i<7;i++) aDaqSig.AddAt(new TMatrix(160,144),i); //TObjArray of 7 TMatrixF, m(padx,pady)=sigma
+  TObjArray aDaqSig(7);     aDaqSig.SetOwner(kTRUE);     for(Int_t i=0;i<7;i++) aDaqSig.AddAt(new TMatrix(160,144),i);         //TObjArray of 7 TMatrixF, m(padx,pady)=sigma
+  TObjArray aDeadMasked(7); aDeadMasked.SetOwner(kTRUE); for(Int_t i=0;i<7;i++) aDeadMasked.AddAt(new TMatrix(160,144),i);     //TObjArray of 7 TMatrixF, m(padx,pady)=pedestal
   
   for(Int_t iddl=0;iddl<AliHMPIDRawStream::kNDDL;iddl++)            //retrieve the files from LDCs independently the DDL<->LDC connection
   {
@@ -251,7 +324,7 @@ Bool_t AliHMPIDPreprocessor::ProcPed()
     
     if(!infile.is_open()) {Log("No pedestal file found for HMPID,bye!");continue;}
     TMatrix *pM=(TMatrixF*)aDaqSig.At(iddl/2);
-  
+    TMatrix *pDM=(TMatrixF*)aDeadMasked.At(iddl/2);
     infile>>tName>>runNumber;Printf("Xcheck: reading run %i",runNumber);
     infile>>tName>>ldcId;
     infile>>tName>>timeStamp;
@@ -266,11 +339,16 @@ Bool_t AliHMPIDPreprocessor::ProcPed()
       dig.SetPad(rs.GetPad(iddl,r,d,a));
       dig.SetQ((Int_t)mean);
       (*pM)(dig.PadChX(),dig.PadChY()) = sigma;
+      if( (mean == AliHMPIDParam::kPadMeanZeroCharge && sigma == AliHMPIDParam::kPadSigmaZeroCharge) || 
+          (mean == AliHMPIDParam::kPadMeanMasked     && sigma == AliHMPIDParam::kPadSigmaMasked)     ) 
+        {(*pDM)(dig.PadChX(),dig.PadChY()) = mean;} 
       }
     }
     infile.close();
     Log(Form("Pedestal file for DDL %i read successfully",iddl));
   
+    
   }//LDCs reading entries
 
  }//DDL 
@@ -280,74 +358,110 @@ Bool_t AliHMPIDPreprocessor::ProcPed()
   metaData.SetResponsible("AliHMPIDPreprocessor"); 
   metaData.SetComment("HMPID processor fills TObjArrays.");  
   stPedStore = Store("Calib","DaqSig",&aDaqSig,&metaData,0,kTRUE);
-  if(!stPedStore) {
-    Log("HMPID - failure to store PEDESTAL data results in OCDB");    
-  }
-  return stPedStore;
+  if(!stPedStore) {     Log("HMPID - failure to store PEDESTAL data results in OCDB");      }
+  stDeadMaskedStore = Store("Calib","Masked",&aDeadMasked,&metaData,0,kTRUE);
+  if(!stDeadMaskedStore) {     Log("HMPID - failure to store DEAD & MASKED channel map  in OCDB");      }
+  Bool_t pedRes=stPedStore*stDeadMaskedStore;
+  return pedRes;
   
 }//ProcPed()  
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 Double_t AliHMPIDPreprocessor::ProcTrans(TMap* pMap)
 {
   //  Process transparency monitoring data and calculates Emean  
-
   
   Double_t sEnergProb=0, sProb=0;
 
-  Double_t tRefCR5 = 19. ;                                      // mean temperature of CR5 where the system is in place
// Double_t tRefCR5 = 19. ;                                      // mean temperature of CR5 where the system is in place
 
   Double_t eMean = 0;
       
   AliDCSValue *pVal;
+  
+  Double_t aCorrFactor[] = {0.937575212,0.93805688,0.938527113,0.938986068,0.939433897,0.939870746,0.940296755,0.94071206,0.941116795,0.941511085,0.941895054,0.942268821,0.942632502,
+                            0.942986208,0.943330047,0.943664126,0.943988544,0.944303401,0.944608794,0.944904814,0.945191552,0.945469097,0.945737533,0.945996945,0.946247412,
+                            0.946489015,0.94672183,0.946945933,0.947161396,0.947368291}; 
 
   for(Int_t i=0; i<30; i++){
 
     // evaluate wavelenght 
-    TObjArray *pWaveLenght  = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.measure[%i].waveLenght",i));
-    TIter NextWl(pWaveLenght); pVal=(AliDCSValue*)NextWl();
+    TObjArray *pWaveLenght = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.waveLenght",i));
+    if(!pWaveLenght){ 
+        AliWarning(Form("No Data Point values for HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.waveLenght  -----> Default E mean used!!!!!",i));
+        return DefaultEMean(); // to be checked
+      } 
+        
+    pVal=(AliDCSValue*)pWaveLenght->At(0);
     Double_t lambda = pVal->GetFloat();
 
+    if(lambda<150. || lambda>230.){ 
+        AliWarning(Form("Wrong value for HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.waveLenght  -----> Default E mean used!!!!!",i));
+        return DefaultEMean(); // to be checked
+      } 
+
     Double_t photEn = 1239.842609/lambda;     // 1239.842609 from nm to eV
     
     if(photEn<AliHMPIDParam::EPhotMin() || photEn>AliHMPIDParam::EPhotMax()) continue;
     
     // evaluate phototube current for argon reference
-    TObjArray *pArgonRef  = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.measure[%i].argonReference",i));
-    TIter NextArRef(pArgonRef); pVal=(AliDCSValue*)NextArRef();
+    TObjArray *pArgonRef  = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.argonReference",i));
+    if(!pArgonRef){ 
+        AliWarning(Form("No Data Point values for HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.argonReference  -----> Default E mean used!!!!!",i));
+        return DefaultEMean(); // to be checked
+      } 
+
+    pVal=(AliDCSValue*)pArgonRef->At(0);    
     Double_t aRefArgon = pVal->GetFloat();
 
     // evaluate phototube current for argon cell
-    TObjArray *pArgonCell = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.measure[%i].argonCell",i));
-    TIter NextArCell(pArgonCell); pVal=(AliDCSValue*)NextArCell();
+    TObjArray *pArgonCell = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.argonCell",i));
+    if(!pArgonCell){ 
+        AliWarning(Form("No Data Point values for HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.argonCell  -----> Default E mean used!!!!!",i));
+        return DefaultEMean(); // to be checked
+      } 
+      
+    pVal=(AliDCSValue*)pArgonRef->At(0);
     Double_t aCellArgon = pVal->GetFloat();
 
     //evaluate phototube current for freon reference
-    TObjArray *pFreonRef  = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.measure[%i].c6f14Reference",i));
-    TIter NextFrRef(pFreonRef); pVal=(AliDCSValue*)NextFrRef();
+    TObjArray *pFreonRef  = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.c6f14Reference",i));
+    if(!pFreonRef){ 
+        AliWarning(Form("No Data Point values for HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.c6f14Reference  -----> Default E mean used!!!!!",i));
+        return DefaultEMean(); // to be checked
+      } 
+        
+    pVal=(AliDCSValue*)pFreonRef->At(0);
     Double_t aRefFreon = pVal->GetFloat();
 
     //evaluate phototube current for freon cell
-    TObjArray *pFreonCell = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.measure[%i].c6f14Cell",i));
-    TIter NextFrCell(pFreonCell); pVal=(AliDCSValue*)NextFrCell();
+    TObjArray *pFreonCell = (TObjArray*)pMap->GetValue(Form("HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.c6f14Cell",i));
+    if(!pFreonCell){
+        AliWarning(Form("No Data Point values for HMP_DET/HMP_INFR/HMP_INFR_TRANPLANT/HMP_INFR_TRANPLANT_MEASURE.mesure%i.c6f14Cell  -----> Default E mean used!!!!!",i));
+        return DefaultEMean(); // to be checked
+      }
+
+    pVal=(AliDCSValue*)pFreonCell->At(0);
     Double_t aCellFreon = pVal->GetFloat();
  
    //evaluate correction factor to calculate trasparency (Ref. NIMA 486 (2002) 590-609)
     
-    Double_t aN1 = AliHMPIDParam::NIdxRad(photEn,tRefCR5);
-    Double_t aN2 = AliHMPIDParam::NMgF2Idx(photEn);
-    Double_t aN3 = 1;                              // Argon Idx
+    //Double_t aN1 = AliHMPIDParam::NIdxRad(photEn,tRefCR5);
+    //Double_t aN2 = AliHMPIDParam::NMgF2Idx(photEn);
+    //Double_t aN3 = 1;                              // Argon Idx
 
-    Double_t aR1               = ((aN1 - aN2)*(aN1 - aN2))/((aN1 + aN2)*(aN1 + aN2));
-    Double_t aR2               = ((aN2 - aN3)*(aN2 - aN3))/((aN2 + aN3)*(aN2 + aN3));
-    Double_t aT1               = (1 - aR1);
-    Double_t aT2               = (1 - aR2);
-    Double_t aCorrFactor       = (aT1*aT1)/(aT2*aT2);
+   // Double_t aR1               = ((aN1 - aN2)*(aN1 - aN2))/((aN1 + aN2)*(aN1 + aN2));
+  //  Double_t aR2               = ((aN2 - aN3)*(aN2 - aN3))/((aN2 + aN3)*(aN2 + aN3));
+   // Double_t aT1               = (1 - aR1);
+   // Double_t aT2               = (1 - aR2);
+   // Double_t aCorrFactor       = (aT1*aT1)/(aT2*aT2);
 
     // evaluate 15 mm of thickness C6F14 Trans
     Double_t aTransRad;
     
+    Double_t aConvFactor = 1.0 - 0.3/1.8;         
+        
     if(aRefFreon*aRefArgon>0) {
-      aTransRad  = TMath::Power((aCellFreon/aRefFreon)/(aCellArgon/aRefArgon)*aCorrFactor,1.5);
+      aTransRad  = TMath::Power((aCellFreon/aRefFreon)/(aCellArgon/aRefArgon)*aCorrFactor[i],aConvFactor);
     } else {
       return DefaultEMean();
     }
@@ -368,19 +482,16 @@ Double_t AliHMPIDPreprocessor::ProcTrans(TMap* pMap)
   
     sProb+=aTotConvolution;  
 }
-
   if(sProb>0) {
     eMean = sEnergProb/sProb;
   } else {
     return DefaultEMean();
   }
-
   Log(Form(" Mean energy photon calculated ---> %f eV ",eMean));
 
   if(eMean<AliHMPIDParam::EPhotMin() || eMean>AliHMPIDParam::EPhotMax()) return DefaultEMean();
   
   return eMean;
-
 }   
 //++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 Double_t AliHMPIDPreprocessor::DefaultEMean()