integer iscode,indpdb,outpdb,outmol2,icomparfunc,pdbint,
     & symetr,shield_mode,tor_mode,ifreq_MD,istart_MD,iend_MD
      logical refstr,pdbref,punch_dist,print_rms,verbose,out_newe,
     & out_forces,unres_pdb,geom_and_wham_weights,with_dihed_constr,
     & with_theta_constr,energy_dec,mdbox
      common /cntrl/ iscode,indpdb,refstr,pdbref,outpdb,outmol2,
     & punch_dist,print_rms,verbose,out_newe,out_forces,icomparfunc,
     & pdbint,unres_pdb,geom_and_wham_weights,with_dihed_constr,
     & with_theta_constr,energy_dec,symetr,shield_mode,tor_mode,
     & ifreq_MD(maxprot),istart_MD(maxprot),iend_MD(maxprot),
     & mdbox(maxprot)