Searched refs:ymax (Results 1 – 3 of 3) sorted by relevance
36 real*8 ymax, displTi, displTr, correction local49 ymax = xyn(nfint)227 if (xynin(i)*rdelta.gt.ymax) then228 xts2 = ymax247 elseif (xynin(i)*rdelta.gt.ymax) then248 xts1 = (radcyl-ymax*sang)250 xts2 = (radcyl-ymax*sang)252 xts3 = (aR-(radcyl-ymax*sang)
279 ymax = Forout(2)283 ymax = ylngth300 ylngth = ymax-Forout(2)
42 ymax=maxval(y(:,i))