Lines Matching refs:srn
110 * returns the integer product of the "floating point" an and srn
117 int srn)
123 return ((srn >= 0) ?
124 ((srn & 077) + 1) >> (18 - (srn >> 6)) :
125 -(((srn & 077) + 1) >> (2 - (srn >> 6))));
129 if (srn >= 0) {
130 wanexp = anexp + (srn >> 6) - 7;
132 (_fmultwanmant[(srn & 077) + anmant] << wanexp)
134 _fmultwanmant[(srn & 077) + anmant] >> -wanexp);
136 wanexp = anexp + (srn >> 6) - 0xFFF7;
138 -((_fmultwanmant[(srn & 077) + anmant] << wanexp)
140 -(_fmultwanmant[(srn & 077) + anmant] >> -wanexp));
147 if (srn >= 0) {
148 wanexp = anexp + (srn >> 6) - 7;
150 -((_fmultwanmant[(srn & 077) + anmant] << wanexp)
152 -(_fmultwanmant[(srn & 077) + anmant] >> -wanexp));
154 wanexp = anexp + (srn >> 6) - 0xFFF7;
156 (_fmultwanmant[(srn & 077) + anmant] << wanexp)
158 _fmultwanmant[(srn & 077) + anmant] >> -wanexp);