Searched refs:t1xtup (Results 1 – 2 of 2) sorted by relevance
23462 static real t1xtup[20]; in make1bar_() local23567 t1xtup[nxtup - 1] = 0.f; in make1bar_()23601 r__1 = t1xtup[nxtup - 1] + *tglp1; in make1bar_()23667 t1xtup[nxtup - 1] = xit[commvl_1.ivx - 1] - all_1.tnote[in - 1]; in make1bar_()23699 r__1 = t1xtup[nxtup - 1] + *tglp1; in make1bar_()23716 t1xtup[nxtnow[commvl_1.ivx - 1] - 1] + all_1.nodur[ in make1bar_()
15230 real*4 xit(nm),t1xtup(20),tstart(80),squez(80)15338 t1xtup(nxtup) = 0.15364 call addfb(nfb,ivx,t1xtup(nxtup)+15415 t1xtup(nxtup) = xit(ivx)-tnote(in)15441 call addfb(nfb,ivx,t1xtup(nxtup)+tglp1,15456 * t1xtup(nxtnow(ivx))+nodur(ivx,cnn(ivx))+tglp1