| 1 | mocchiut | 1.1 | c      Normalized ADC value | 
| 2 |  |  | REAL adc_c(4,12),adctof_c(4,12),tdc_c(4,12) | 
| 3 | mocchiut | 1.2 | INTEGER tofmask(4,12) | 
| 4 | mocchiut | 1.1 | REAL xtofpos(3),ytofpos(3) | 
| 5 | mocchiut | 1.4 | REAL xtr_tof(6),ytr_tof(6) | 
| 6 | mocchiut | 1.1 | REAL beta_a(13), betatof_a(13) | 
| 7 |  |  | INTEGER  tof_i_flag(6),tof_j_flag(6) | 
| 8 | mocchiut | 1.3 | INTEGER adcflagtof(4,12),tdcflagtof(4,12) | 
| 9 |  |  | INTEGER adcflag(4,12),tdcflag(4,12) | 
| 10 | mocchiut | 1.1 | common /tofoutput/beta_a,betatof_a, | 
| 11 | mocchiut | 1.4 | &  xtofpos,ytofpos,xtr_tof,ytr_tof, | 
| 12 |  |  | &  adc_c,adctof_c,tdc_c, | 
| 13 | mocchiut | 1.2 | &  tofmask, | 
| 14 | mocchiut | 1.3 | &  tof_i_flag,tof_j_flag, | 
| 15 |  |  | &  adcflagtof,tdcflagtof, | 
| 16 |  |  | &  adcflag,tdcflag | 
| 17 | mocchiut | 1.1 |  | 
| 18 |  |  | SAVE /tofoutput/ |