Searched refs:t1fb (Results 1 – 2 of 2) sorted by relevance
/dports/print/texlive-base/texlive-20150521-source/utils/pmx/pmx-2.7.0/ |
H A D | pmxab.c | 2480 t1fb -= 25; in addfb_() 2487 if (*tnew < t1fb[*iv + ifb * 24] - comtol_1.tol) { in addfb_() 2488 t1fb[*iv + (ifb + 1) * 24] = t1fb[*iv + ifb * 24]; in addfb_() 2499 t1fb[*iv + *ifbadd * 24] = *tnew; in addfb_() 23576 if (comfb_1.t1fb[commvl_1.ivx + comfb_1.ifb * 24 - 25] in make1bar_() 23583 } else if (comfb_1.t1fb[commvl_1.ivx + comfb_1.ifb * in make1bar_() 23602 addfb_(comfb_1.nfb, &commvl_1.ivx, &r__1, comfb_1.t1fb, in make1bar_() 23700 addfb_(comfb_1.nfb, &commvl_1.ivx, &r__1, comfb_1.t1fb, in make1bar_() 23966 itbb1 = (integer) (comfb_1.t1fb[commvl_1.ivx + in make1bar_() 24070 comfb_1.t1fb[commvl_1.ivx + comfb_1.ifb * 24 - 25] = in make1bar_() [all …]
|
H A D | pmx270.for | 1184 real*4 t1fb(nm,20),t2fb(nm,20) local 1189 if (tnew .lt. t1fb(iv,ifb)-tol) then 1190 t1fb(iv,ifb+1) = t1fb(iv,ifb) 1199 t1fb(iv,ifbadd) = tnew 11526 t1fb(ivx,nfb(ivx)) = itsofar(ivx) 12866 t1fb(ivx,nfb(ivx)) = itsofar(ivx) 13849 * t1fb(ivx,nfb(ivx)) = 15365 * tglp1,t1fb,t2fb,ulfbq,ifbadd) 15442 * t1fb,t2fb,ulfbq,ifbadd) 15668 itbb1 = int(t1fb(ivx,ifb)-tglp1+tol) [all …]
|