1 integer ns,nss,nfree,iss,ihpb,jhpb,nhpb,link_start,link_end
2 double precision ebr,dbr,fbr,dhpb,forcon,weidis
3 common /sbridge/ ebr,dbr,fbr,ns,nss,nfree,iss(maxss)
4 common /links/ dhpb(maxss),forcon(maxss),ihpb(maxss),
6 common /restraints/ weidis
7 common /links_split/ link_start,link_end