integer writenohits, showersincol, driftclusters, runtime_geom real tgtwidth integer get_next_evt, runno_ff real trigger_time_sigma_ns common /controlparams/ writenohits, showersincol, driftclusters + ,tgtwidth(2),runtime_geom,get_next_evt + ,trigger_time_sigma_ns,runno_ff