Searched refs:elsstarg (Results 1 – 2 of 2) sorted by relevance
28641 static real elsstarg; in pmxa_() local29321 elsstarg = celsk[compage_1.ibarflb[1] - 1] / ( in pmxa_()29337 elsstarg = (celsk[compage_1.ibarflb[iflb] - 1] - celskb4) in pmxa_()29345 elsstarg = (celsk[compage_1.ibarflb[iflb] - 1] - celskb4) in pmxa_()29351 diff1 = (r__1 = elsstarg - elsk[ibarb4], dabs(r__1)); in pmxa_()29355 diff = elsstarg - (celsk[a1ll_2.ibar] - celskb4); in pmxa_()
19016 if (isfirst) elsstarg = celsk(ibarflb(1)-1)/19029 elsstarg = (celsk(ibarflb(iflb)-1)-celskb4)19036 elsstarg = (celsk(ibarflb(iflb)-1)-celskb4)19042 diff1 = abs(elsstarg-elsk(ibarb4+1))19044 diff = elsstarg-(celsk(ibar)-celskb4)