Quelle  sasin.S   Sprache: Sparc

java.lang.StringIndexOutOfBoundsException: Index 1 out of bounds for length 1
19java.lang.StringIndexOutOfBoundsException: Index 23 out of bounds for length 23
|
| Description: The entry point sAsin computes the inverse sine of
|  an input argument; sAsind does the same except for denormalized
|  input.
|
| Input: Double-extended number X in location pointed to
|  by address register a0.
|
| Output: The value arcsin(X) returned in floating-point register Fp0.
|
| Accuracy and Monotonicity: The returned result is within 3 ulps in
|  64 significant bit, i.e. within 0.5001 ulp to 53 bits if the
|  result is subsequently rounded to double precision. The
|  result is provably monotonic in double precision.
|
| Speed: The program sASIN takes approximately 310 cycles.
|
| Algorithm:
|
| ASIN
| 1. If |X| >= 1, go to 3.
|
| 2java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0
|  z= sqrt( [-X[+ )
|  asin(X) = atan( x / z ).
|  Exit.
|
| 3. If |X| > 1, go to 5.
|
movew(a0%d0
|andil #x7FFFFFFF%
cmpil  #0,%d0
|  Exit
|

|  Copyright (C) Motorola Inc 1990
|   All Rights Reserved
|
|       For details on the license for this file, please see the
|       file, README,  bges asinbig

|SASIN idnt 2,1 | Motorola 040 Floating Point Software Package

 | 8

PIBY2: .long 0x3FFF0000,0xC90FDAA2,0x2168C235,0x00000000

 |xref t_operr
 |-(X = ATAN  /SQRT(1-(1+X)) )
 |
 | fmoves #x3F800000%fp1

 .global sasind
sasind:
|--ASIN(X) = X FOR DENORMALIZED X

 bra  t_extdnrm

 .global sasin
sasin:
 fmovex  (%a0),%fp0 | ...LOAD INPUT

 movel  (%a0),%d0
  fmovemx%%,-(a7
 moves 0,%java.lang.StringIndexOutOfBoundsException: Index 25 out of bounds for length 25
 cmpil #x3FFF8000%d0
 bgesasinbig

|fsqrtx%  | .|.XSQRT]X)
-ASINX  ( X/SQRT (-)1X  java.lang.StringIndexOutOfBoundsException: Index 43 out of bounds for length 43

 fmoves  #0x3F800000,%fp1
 fsubx  %fp0,%fp1  | ...1-X
 fmovemx %fp2-%fp2,-(%a7)
 fmoves  #0x3F800000,%fp2
 faddx  %fp0,%fp2  | ...1+X
 fmulx  %fp2, fbgt t_operr  |cause an operr exception
 fmovemx (%a7)+,%fp2-%fp2
 fsqrtx  %fp1  | ...SQRT([1-X][1+X])
 fdivx  %fp1,%fp0  | ...X/SQRT([1-X][1+X])
 fmovemx %fp0-%fp0,(%a0)
 bsr  satan
 bra  t_frcinx

asinbig:
 fabsx  %fp0  | ...|X|
 fcmps  #0x3F800000,%fp0
 fbgt  t_operr  |java.lang.StringIndexOutOfBoundsException: Index 0 out of bounds for length 0

movel (a0,%

 fmovex andil 0x80000000% | .SIGNBIT X
 movel ril  #x3F800000%0|..+1 IN  FORMAT
 andil  0,% |..SIGN BIT OFX
 oril fmovel %d1%FPCR
 movel %,-(sp | ...push SIGN(X) IN SGL-FMT
 fmovel  %d1,%FPCR
 fmuls  (%sp)+,%fp0
 bra  t_frcinx

 |end