common /back_constr/ uconst_back,utheta,ugamma,uscdiff,
& dutheta,dugamma,duscdiff,duscdiffx,
& wfrag_back,nfrag_back,ifrag_back
common /homrestr/ odl,dih,sigma_dih,sigma_odl,
& lim_odl,lim_dih,ires_homo,jres_homo,link_start_homo,
& link_end_homo,idihconstr_start_homo,idihconstr_end_homo,
common /back_constr/ uconst_back,utheta,ugamma,uscdiff,
& dutheta,dugamma,duscdiff,duscdiffx,
& wfrag_back,nfrag_back,ifrag_back
common /homrestr/ odl,dih,sigma_dih,sigma_odl,
& lim_odl,lim_dih,ires_homo,jres_homo,link_start_homo,
& link_end_homo,idihconstr_start_homo,idihconstr_end_homo,