Lines Matching refs:stabdis
1273 & iBC, BC, stabdis, xavegt) argument
1305 & xavegr(nfath,12), stabdis(nfath),
1563 stabdis(:) = xavegr(:,10)
1575 stabdis(:) = xaveg(:,10)
1609 & xavegt, stabdis) argument
1640 & xavegr(nfath,12), stabdis(nfath),
2038 if (stabdis(i) .gt. zero) then
2039 cdel(i) = (two*xavegr(i,11)-stabdis(i))/xavegr(i,12)
2040 xnume(i) = two*xavegr(i,11)-stabdis(i)
2049 if (stabdis(i) .gt. zero) then
2050 cdel(i) = (two*xaveg(i,11)-stabdis(i))/xaveg(i,12)
2051 xnume(i) = two*xaveg(i,11)-stabdis(i)