Home | History | Annotate | Download | only in lib

Lines Matching full:_cos

965     double _sin, _cos, _tan, _cot; /* local variables, not functions */
1004                     _cos = _sin * _cot;
1007                     _cos = 1 / hypot(1, _tan);
1008                     _sin = _cos * _tan;
1013                 r[kk] = _cos * r[kk] + _sin * Sdiag[k];
1014                 temp = _cos * W[k] + _sin * qtbpj;
1015                 qtbpj = -_sin * W[k] + _cos * qtbpj;
1020                     temp = _cos * r[k*ldr+i] + _sin * Sdiag[i];
1021                     Sdiag[i] = -_sin * r[k*ldr+i] + _cos * Sdiag[i];