TCut En_Cut[nuclei][2], Energy[nuclei], Ene_cont[nuclei], Tot_filt[nuclei], Phase;
En_Cut[n][l] = Form("E_SDRSI > %g", En_Lim[ind_nuc[n]][l]); 
sprintf(thecut, "CUT[%d]",n);
cut[n] = (TCutG *) gPad->GetPrimitive(thecut);
Ene_cont[n]=Energy[n] && thecut;  
Tot_filt[n]=Ene_cont[n] && Phase;
tv__tree->Draw("cal_f_cyclo:TSIHF", Tot_filt[n], "col")