{
  TFile *rfout=new TFile("AGO3-20200217-20210216.root","recreate");
  Int_t ihr, iyr;
  Float_t mintm,min0,min,sec,WT_amp,PV1_amp,PV2_amp,PV1_volt,PV2_volt,Inst_volt,TC7t_c;
  TNtuple *NAGO3=new TNtuple("NAGO3","NAGO3","yr:doy:hr:min:sec:WT_amp:PV1_amp:PV2_amp:PV1_volt:PV2_volt:Inst_volt:TC7t_c");
  ifstream ifin("AGO3-20200217-20210216.csv");
  ihr=0;
  min0=60;
  iyr=2020;
  Float_t doy=48;
  while(ifin>>mintm>>sec>>WT_amp>>PV1_amp>>PV2_amp>>PV1_volt>>PV2_volt>>Inst_volt>>TC7t_c){
    min0=min;
    if(min0>mintm){
      ihr++;
      if(ihr%24==0){
	doy++;
	if(doy==366){
	  doy=1;
	  iyr++;
	}
      }
    }
    min=mintm;
    NAGO3->Fill(iyr,doy,ihr,min,sec,WT_amp,PV1_amp,PV2_amp,PV1_volt,PV2_volt,Inst_volt,TC7t_c);
  }
  rfout->Write();
}