Searched refs:phi_dim1 (Results 1 – 2 of 2) sorted by relevance
76 integer phi_dim1, phi_offset, i__1, i__2; in mload_() local86 phi_dim1 = *order; in mload_()87 phi_offset = phi_dim1 + 1; in mload_()95 phi[r__ + phi_dim1] = 0.f; in mload_()98 phi[r__ + phi_dim1] += speech[i__ - 1] * speech[i__ - r__]; in mload_()112 phi[r__ + c__ * phi_dim1] = phi[r__ - 1 + (c__ - 1) * phi_dim1] - in mload_()120 psi[c__] = phi[c__ + 1 + phi_dim1] - speech[start - 1] * speech[start in mload_()
69 integer phi_dim1, phi_offset, i__1, i__2, i__3; in invert_() local89 phi_dim1 = *order; in invert_()90 phi_offset = phi_dim1 + 1; in invert_()98 v[i__ + j * 10 - 11] = phi[i__ + j * phi_dim1]; in invert_()