Searched refs:ipito (Results 1 – 2 of 2) sorted by relevance
121 integer *ipito; in pitsyn_() local188 ipito = &(st->ipito); in pitsyn_()234 slope = (*pitch - *ipito) / (real) lsamp; in pitsyn_()242 *ipito = *pitch; in pitsyn_()248 slope = (*pitch - *ipito) / (real) lsamp; in pitsyn_()273 *ipito = *pitch; in pitsyn_()398 r__1 = *ipito + slope * i__; in pitsyn_()506 *ipito = *pitch; in pitsyn_()
189 integer ipito; /* no initial value necessary as long as first_pitsyn is initially TRUE_ */ member