ttl ieee format equivalent power function(iefpwr) *************************************** * (c) copyright 1981 by motorola inc. * *************************************** ************************************************* * iefpwr * * ieee format equivalent power function * * * * input: d6 - ieee format exponent value * * d7 - ieee format argument value * * * * output: d7 - result of the value taken to * * the power specified * * * * all registers are transparent * * * * maximum stack used: 52 bytes * * * * condition codes: * * z - set if result is zero * * n - cleared * * v - set if result is nan (not-a-number)* * (input argument negative or nan) * * c - undefined * * x - undefined * * * * notes: * * 1) see the mc68344 user's guide for details* * concerning limitations on normalized * * argument ranges. * * 2) a negative base value, or zero to a * * negative power is invalid and returns * * a nan with the "v" bit set. * * 3) spot checks show at least six digit * * precision for 80 percent of the cases. * * * ************************************************* page iefpwr idnt 1,1 ieee format equivalent power function opt pcs section 9 xdef iefpwr entry point xref ieflog ieee log function xref iefmul ieee multiply routine xref iefexp ieee exponent function xref ffpcpyrt copyright stub ***************** * power entry * ***************** iefpwr jsr ieflog find low of base value jsr iefmul multiply by the power jmp iefexp finish with exponent result end  end  end  end