COMMON.FREE

   1       integer nT
   2       double precision beta_h(maxT),prob_limit
   3       common /free/ beta_h,prob_limit,nT