& short_r_sidechain(ntyp),fac_shield(maxres),wshield,
& grad_shield_side(3,maxcont,-1:maxres),grad_shield(3,-1:maxres),
& grad_shield_loc(3,maxcont,-1:maxres),
& short_r_sidechain(ntyp),fac_shield(maxres),wshield,
& grad_shield_side(3,maxcont,-1:maxres),grad_shield(3,-1:maxres),
& grad_shield_loc(3,maxcont,-1:maxres),