Index: /trunk/Mars/mcorsika/MCorsikaEvtHeader.cc
===================================================================
--- /trunk/Mars/mcorsika/MCorsikaEvtHeader.cc	(revision 18568)
+++ /trunk/Mars/mcorsika/MCorsikaEvtHeader.cc	(revision 18569)
@@ -44,4 +44,6 @@
 #include <fstream>
 
+#include "fits.h"
+
 #include <TMath.h>
 
@@ -196,2 +198,22 @@
     return fInFormat->Eof() ? kERROR : kTRUE;
 }
+
+Bool_t MCorsikaEvtHeader::SetupFits(fits &fin)
+{
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fEvtNumber",              fEvtNumber              ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fNumReuse",               fNumReuse               ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fTotalEnergy",            fTotalEnergy            ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fStartAltitude",          fStartAltitude          ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fFirstTargetNum",         fFirstTargetNum         ))  return kFALSE;
+    if (!fin.SetRefAddress( "CorsikaEvtHeader.fFirstInteractionHeight", fFirstInteractionHeight ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fMomentumX",              fMomentumX              ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fMomentumY",              fMomentumY              ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fMomentumZ",              fMomentumZ              ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fZd",                     fZd                     ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fAz",                     fAz                     ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fX",                      fX                      ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fY",                      fY                      ))  return kFALSE;
+    if (!fin.SetRefAddress("MCorsikaEvtHeader.fWeightedNumPhotons",     fWeightedNumPhotons     ))  return kFALSE;
+
+    return kTRUE;
+}
Index: /trunk/Mars/mcorsika/MCorsikaEvtHeader.h
===================================================================
--- /trunk/Mars/mcorsika/MCorsikaEvtHeader.h	(revision 18568)
+++ /trunk/Mars/mcorsika/MCorsikaEvtHeader.h	(revision 18569)
@@ -83,4 +83,6 @@
     Int_t ReadEvtEnd(MCorsikaFormat *informat); // read in event end block
 
+    Bool_t SetupFits(fits &fin);
+
     ClassDef(MCorsikaEvtHeader, 3) // Parameter Conatiner for raw EVENT HEADER
 };