// File: jkingan[P]ladyheather/heathmsc.cpp
// Function: step2lon_(double*, double*, double*, double*)
int step2lon_(double *xsta, double *fhr, double *t, double *xcorsta)
{
    /* Initialized data */

    static double deg2rad = .017453292519943295769;
    static double datdi[45] /* was [9][5] */ = { 0.,0.,0.,1.,0.,.47,.23,
            .16,.07,0.,2.,0.,0.,0.,-.2,-.12,-.11,-.05,1.,0.,-1.,0.,0.,-.11,
            -.08,-.09,-.04,2.,0.,0.,0.,0.,-.13,-.11,-.15,-.07,2.,0.,0.,1.,0.,
            -.05,-.05,-.06,-.03 };

    /* F2C generated locals */
    double d__1, d__2, d__3;

    /* Local variables */
    static double rsta, h;
    static int i, j;
    static double p, s, cosla, sinla, de, dn, dr, pr, ps, thetaf, cosphi, 
            dn_tot__, sinphi, dr_tot__, zns;

    if(xsta == 0) return (-1);
    if(fhr == 0) return (-1);
    if(t == 0) return (-1);
    if(xcorsta == 0) return (-1);

    /* Function Body */
/* cf. table 7.5b of IERS conventions 2003 (TN.32, pg.82) */
/* columns are s,h,p,N',ps, dR(ip),dT(ip),dR(op),dT(op) */
/* IERS cols.= s,h,p,N',ps, dR(ip),dR(op),dT(ip),dT(op) */
/* units of mm */
/* Computing 3rd power */
    d__1 = *t, d__2 = d__1;
    s = *t * 481267.88194 + 218.31664563 - *t * .0014663889 * *t + d__2 * (
            d__1 * d__1) * 1.85139e-6;
/* Computing 3rd power */
    d__1 = *t, d__2 = d__1;
/* Computing 4th power */
    d__3 = *t, d__3 *= d__3;
    pr = *t * 1.396971278f + *t * 3.08889e-4f * *t + d__2 * (d__1 * d__1) * 
            2.1e-8f + d__3 * d__3 * 7e-9f;
    s += pr;
/* Computing 3rd power */
    d__1 = *t, d__2 = d__1;
/* Computing 4th power */
    d__3 = *t, d__3 *= d__3;
    h = *t * 36000.7697489 + 280.46645 + *t * 3.0322222e-4 * *t + d__2 * (
            d__1 * d__1) * 2e-8f - d__3 * d__3 * 6.54e-9f;
/* Computing 3rd power */
    d__1 = *t, d__2 = d__1;
/* Computing 4th power */
    d__3 = *t, d__3 *= d__3;
    p = *t * 4069.01363525 + 83.35324312 - *t * .01032172222 * *t - d__2 * (
            d__1 * d__1) * 1.24991e-5 + d__3 * d__3 * 5.263e-8;
/* Computing 3rd power */
    d__1 = *t, d__2 = d__1;
/* Computing 4th power */
    d__3 = *t, d__3 *= d__3;
    zns = *t * 1934.13626197 + 234.95544499 - *t * .00207561111 * *t - d__2 * 
            (d__1 * d__1) * 2.13944e-6 + d__3 * d__3 * 1.65e-8;
/* Computing 3rd power */
    d__1 = *t, d__2 = d__1;
/* Computing 4th power */
    d__3 = *t, d__3 *= d__3;
    ps = *t * 1.71945766667 + 282.93734098 + *t * 4.5688889e-4 * *t - d__2 * (
            d__1 * d__1) * 1.778e-8 - d__3 * d__3 * 3.34e-9;
/* Computing 2nd power */
    d__1 = xsta[0];
/* Computing 2nd power */
    d__2 = xsta[1];
/* Computing 2nd power */
    d__3 = xsta[2];
    rsta = sqrt(d__1 * d__1 + d__2 * d__2 + d__3 * d__3);
    sinphi = xsta[2] / rsta;
/* Computing 2nd power */
    d__1 = xsta[0];
/* Computing 2nd power */
    d__2 = xsta[1];
    cosphi = sqrt(d__1 * d__1 + d__2 * d__2) / rsta;
    cosla = xsta[0] / cosphi / rsta;
    sinla = xsta[1] / cosphi / rsta;
/* reduce angles to between 0 and 360 */
    s = d_mod(&s, &c_b56);
/* **** tau=dmod(tau,360.d0)       !*** tau not used here--09jul28 */
    h = d_mod(&h, &c_b56);
    p = d_mod(&p, &c_b56);
    zns = d_mod(&zns, &c_b56);
    ps = d_mod(&ps, &c_b56);
    dr_tot__ = 0.;
    dn_tot__ = 0.;
    for(i=0; i<= 2; ++i) {
        xcorsta[i] = 0.;
    }
/*             1 2 3 4   5   6      7      8      9 */
/* columns are s,h,p,N',ps, dR(ip),dT(ip),dR(op),dT(op) */
    for(j=1; j<=5; ++j) {
        thetaf = (datdi[j * 9 - 9] * s + datdi[j * 9 - 8] * h + datdi[j * 9 - 
                7] * p + datdi[j * 9 - 6] * zns + datdi[j * 9 - 5] * ps) * 
                deg2rad;
/* Computing 2nd power */
        d__1 = sinphi;
/* Computing 2nd power */
        d__2 = sinphi;
        dr = datdi[j * 9 - 4] * (d__1 * d__1 * 3. - 1.) / 2.f * cos(thetaf) + 
                datdi[j * 9 - 2] * (d__2 * d__2 * 3. - 1.) / 2.f * sin(thetaf)
                ;
        dn = datdi[j * 9 - 3] * (cosphi * sinphi * 2.) * cos(thetaf) + datdi[
                j * 9 - 1] * (cosphi * sinphi * 2.) * sin(thetaf);
        de = 0.;
        dr_tot__ += dr;
        dn_tot__ += dn;
        xcorsta[0] = xcorsta[0] + dr * cosla * cosphi - de * sinla - dn * 
                sinphi * cosla;
        xcorsta[1] = xcorsta[1] + dr * sinla * cosphi + de * cosla - dn * 
                sinphi * sinla;
        xcorsta[2] = xcorsta[2] + dr * sinphi + dn * cosphi;
    }
    for(i=0; i<= 2; ++i) {
        xcorsta[i] /= 1e3;
    }
    return 0;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x70, %rsp
movq %rdi, -0x10(%rbp)
movq %rsi, -0x18(%rbp)
movq %rdx, -0x20(%rbp)
movq %rcx, -0x28(%rbp)
cmpq $0x0, -0x10(%rbp)
jne 0x145cab
movl $0xffffffff, -0x4(%rbp) # imm = 0xFFFFFFFF
jmp 0x146846
cmpq $0x0, -0x18(%rbp)
jne 0x145cbe
movl $0xffffffff, -0x4(%rbp) # imm = 0xFFFFFFFF
jmp 0x146846
cmpq $0x0, -0x20(%rbp)
jne 0x145cd1
movl $0xffffffff, -0x4(%rbp) # imm = 0xFFFFFFFF
jmp 0x146846
cmpq $0x0, -0x28(%rbp)
jne 0x145ce4
movl $0xffffffff, -0x4(%rbp) # imm = 0xFFFFFFFF
jmp 0x146846
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x30(%rbp)
movsd -0x30(%rbp), %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd 0x492c5(%rip), %xmm1    # 0x18efd0
mulsd %xmm1, %xmm0
movsd 0x492c1(%rip), %xmm1    # 0x18efd8
addsd %xmm1, %xmm0
movq -0x20(%rbp), %rax
movsd 0x492a1(%rip), %xmm1    # 0x18efc8
mulsd (%rax), %xmm1
movq -0x20(%rbp), %rax
movsd (%rax), %xmm2
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x38(%rbp), %xmm0
movsd -0x30(%rbp), %xmm2
mulsd -0x30(%rbp), %xmm2
mulsd %xmm2, %xmm0
movsd 0x49253(%rip), %xmm2    # 0x18efc0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x294d03(%rip)   # 0x3daa80
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x30(%rbp)
movsd -0x30(%rbp), %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x40(%rbp)
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movsd %xmm0, -0x40(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movq -0x20(%rbp), %rax
movsd 0x491d4(%rip), %xmm1    # 0x18ef98
mulsd (%rax), %xmm1
movq -0x20(%rbp), %rax
mulsd (%rax), %xmm1
movsd 0x491b8(%rip), %xmm2    # 0x18ef90
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd -0x38(%rbp), %xmm1
movsd -0x30(%rbp), %xmm2
mulsd -0x30(%rbp), %xmm2
mulsd %xmm2, %xmm1
movsd 0x4918d(%rip), %xmm2    # 0x18ef88
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movsd 0x4916b(%rip), %xmm2    # 0x18ef80
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x294c8b(%rip)   # 0x3daab0
movsd 0x294c83(%rip), %xmm0   # 0x3daab0
addsd 0x294c4b(%rip), %xmm0   # 0x3daa80
movsd %xmm0, 0x294c43(%rip)   # 0x3daa80
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x30(%rbp)
movsd -0x30(%rbp), %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x40(%rbp)
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movsd %xmm0, -0x40(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm1
movsd 0x490f0(%rip), %xmm0    # 0x18ef70
mulsd %xmm0, %xmm1
movsd 0x490ec(%rip), %xmm0    # 0x18ef78
addsd %xmm0, %xmm1
movq -0x20(%rbp), %rax
movsd 0x490cc(%rip), %xmm0    # 0x18ef68
mulsd (%rax), %xmm0
movq -0x20(%rbp), %rax
movsd (%rax), %xmm2
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd -0x38(%rbp), %xmm1
movsd -0x30(%rbp), %xmm2
mulsd -0x30(%rbp), %xmm2
mulsd %xmm2, %xmm1
movsd 0x49095(%rip), %xmm2    # 0x18ef60
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
movsd 0x4905c(%rip), %xmm2    # 0x18ef58
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x294b5c(%rip)   # 0x3daa68
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x30(%rbp)
movsd -0x30(%rbp), %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x40(%rbp)
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movsd %xmm0, -0x40(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm1
movsd 0x48ff9(%rip), %xmm0    # 0x18ef48
mulsd %xmm0, %xmm1
movsd 0x48ff5(%rip), %xmm0    # 0x18ef50
addsd %xmm0, %xmm1
movq -0x20(%rbp), %rax
movsd 0x48fd5(%rip), %xmm0    # 0x18ef40
mulsd (%rax), %xmm0
movq -0x20(%rbp), %rax
movsd (%rax), %xmm2
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd -0x38(%rbp), %xmm1
movsd -0x30(%rbp), %xmm2
mulsd -0x30(%rbp), %xmm2
mulsd %xmm2, %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
movsd 0x48f70(%rip), %xmm2    # 0x18ef38
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movsd 0x48f4e(%rip), %xmm2    # 0x18ef30
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x294a86(%rip)   # 0x3daa78
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x30(%rbp)
movsd -0x30(%rbp), %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x40(%rbp)
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movsd %xmm0, -0x40(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm1
movsd 0x48eeb(%rip), %xmm0    # 0x18ef20
mulsd %xmm0, %xmm1
movsd 0x48ee7(%rip), %xmm0    # 0x18ef28
addsd %xmm0, %xmm1
movq -0x20(%rbp), %rax
movsd 0x48ec7(%rip), %xmm0    # 0x18ef18
mulsd (%rax), %xmm0
movq -0x20(%rbp), %rax
movsd (%rax), %xmm2
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd -0x38(%rbp), %xmm1
movsd -0x30(%rbp), %xmm2
mulsd -0x30(%rbp), %xmm2
mulsd %xmm2, %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
movsd 0x48e62(%rip), %xmm2    # 0x18ef10
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movsd 0x48e40(%rip), %xmm2    # 0x18ef08
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x294a10(%rip)   # 0x3daae8
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x30(%rbp)
movsd -0x30(%rbp), %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x40(%rbp)
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movsd %xmm0, -0x40(%rbp)
movq -0x20(%rbp), %rax
movsd (%rax), %xmm1
movsd 0x48ddd(%rip), %xmm0    # 0x18eef8
mulsd %xmm0, %xmm1
movsd 0x48dd9(%rip), %xmm0    # 0x18ef00
addsd %xmm0, %xmm1
movq -0x20(%rbp), %rax
movsd 0x48db9(%rip), %xmm0    # 0x18eef0
mulsd (%rax), %xmm0
movq -0x20(%rbp), %rax
movsd (%rax), %xmm2
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd -0x38(%rbp), %xmm1
movsd -0x30(%rbp), %xmm2
mulsd -0x30(%rbp), %xmm2
mulsd %xmm2, %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
movsd 0x48d6b(%rip), %xmm2    # 0x18eee8
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x40(%rbp), %xmm0
mulsd -0x40(%rbp), %xmm0
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
movsd 0x48d32(%rip), %xmm2    # 0x18eee0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x2948fa(%rip)   # 0x3daab8
movq -0x10(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x30(%rbp)
movq -0x10(%rbp), %rax
movsd 0x8(%rax), %xmm0
movsd %xmm0, -0x38(%rbp)
movq -0x10(%rbp), %rax
movsd 0x10(%rax), %xmm0
movsd %xmm0, -0x40(%rbp)
movsd -0x30(%rbp), %xmm1
movsd -0x30(%rbp), %xmm2
movsd -0x38(%rbp), %xmm0
mulsd -0x38(%rbp), %xmm0
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd -0x40(%rbp), %xmm0
movsd -0x40(%rbp), %xmm2
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
callq 0x9280
movsd %xmm0, 0x29483e(%rip)   # 0x3daa60
movq -0x10(%rbp), %rax
movsd 0x10(%rax), %xmm0
divsd 0x29482d(%rip), %xmm0   # 0x3daa60
movsd %xmm0, 0x29489d(%rip)   # 0x3daad8
movq -0x10(%rbp), %rax
movsd (%rax), %xmm0
movsd %xmm0, -0x30(%rbp)
movq -0x10(%rbp), %rax
movsd 0x8(%rax), %xmm0
movsd %xmm0, -0x38(%rbp)
movsd -0x30(%rbp), %xmm0
movsd -0x30(%rbp), %xmm2
movsd -0x38(%rbp), %xmm1
mulsd -0x38(%rbp), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
callq 0x9280
divsd 0x2947e1(%rip), %xmm0   # 0x3daa60
movsd %xmm0, 0x294841(%rip)   # 0x3daac8
movq -0x10(%rbp), %rax
movsd (%rax), %xmm0
divsd 0x294831(%rip), %xmm0   # 0x3daac8
divsd 0x2947c1(%rip), %xmm0   # 0x3daa60
movsd %xmm0, 0x2947e1(%rip)   # 0x3daa88
movq -0x10(%rbp), %rax
movsd 0x8(%rax), %xmm0
divsd 0x294810(%rip), %xmm0   # 0x3daac8
divsd 0x2947a0(%rip), %xmm0   # 0x3daa60
movsd %xmm0, 0x2947c8(%rip)   # 0x3daa90
movsd 0x2947b0(%rip), %xmm0   # 0x3daa80
movsd 0x890d8(%rip), %xmm1    # 0x1cf3b0
callq 0x94d0
movsd %xmm0, 0x29479b(%rip)   # 0x3daa80
movsd 0x29477b(%rip), %xmm0   # 0x3daa68
movsd 0x890bb(%rip), %xmm1    # 0x1cf3b0
callq 0x94d0
movsd %xmm0, 0x294766(%rip)   # 0x3daa68
movsd 0x29476e(%rip), %xmm0   # 0x3daa78
movsd 0x8909e(%rip), %xmm1    # 0x1cf3b0
callq 0x94d0
movsd %xmm0, 0x294759(%rip)   # 0x3daa78
movsd 0x2947c1(%rip), %xmm0   # 0x3daae8
movsd 0x89081(%rip), %xmm1    # 0x1cf3b0
callq 0x94d0
movsd %xmm0, 0x2947ac(%rip)   # 0x3daae8
movsd 0x294774(%rip), %xmm0   # 0x3daab8
movsd 0x89064(%rip), %xmm1    # 0x1cf3b0
callq 0x94d0
movsd %xmm0, 0x29475f(%rip)   # 0x3daab8
xorps %xmm0, %xmm0
movsd %xmm0, 0x29477c(%rip)   # 0x3daae0
xorps %xmm0, %xmm0
movsd %xmm0, 0x294761(%rip)   # 0x3daad0
movl $0x0, 0x2946f7(%rip)    # 0x3daa70
cmpl $0x2, 0x2946f0(%rip)    # 0x3daa70
jg 0x1463a6
movq -0x28(%rbp), %rax
movslq 0x2946e3(%rip), %rcx    # 0x3daa70
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movl 0x2946d5(%rip), %eax    # 0x3daa70
addl $0x1, %eax
movl %eax, 0x2946cc(%rip)    # 0x3daa70
jmp 0x146379
movl $0x1, 0x2946c4(%rip)    # 0x3daa74
cmpl $0x5, 0x2946bd(%rip)    # 0x3daa74
jg 0x1467fa
imull $0x9, 0x2946b0(%rip), %eax # 0x3daa74
subl $0x9, %eax
movslq %eax, %rcx
leaq 0x88fef(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm1
movsd 0x2946a2(%rip), %xmm2   # 0x3daa80
imull $0x9, 0x29468f(%rip), %eax # 0x3daa74
subl $0x8, %eax
movslq %eax, %rcx
leaq 0x88fce(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm0
mulsd 0x294669(%rip), %xmm0   # 0x3daa68
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
imull $0x9, 0x294666(%rip), %eax # 0x3daa74
subl $0x7, %eax
movslq %eax, %rcx
leaq 0x88fa5(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm0
movsd 0x294650(%rip), %xmm2   # 0x3daa78
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
imull $0x9, 0x29463d(%rip), %eax # 0x3daa74
subl $0x6, %eax
movslq %eax, %rcx
leaq 0x88f7c(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm1
movsd 0x294697(%rip), %xmm2   # 0x3daae8
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
imull $0x9, 0x294614(%rip), %eax # 0x3daa74
subl $0x5, %eax
movslq %eax, %rcx
leaq 0x88f53(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm0
movsd 0x29463e(%rip), %xmm2   # 0x3daab8
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
mulsd 0x88f2e(%rip), %xmm0    # 0x1cf3b8
movsd %xmm0, 0x29462e(%rip)   # 0x3daac0
movsd 0x29463e(%rip), %xmm0   # 0x3daad8
movsd %xmm0, -0x30(%rbp)
movsd 0x294631(%rip), %xmm0   # 0x3daad8
movsd %xmm0, -0x38(%rbp)
imull $0x9, 0x2945c1(%rip), %eax # 0x3daa74
subl $0x4, %eax
movslq %eax, %rcx
leaq 0x88f00(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm0
movsd -0x30(%rbp), %xmm1
mulsd -0x30(%rbp), %xmm1
movsd 0x28d09(%rip), %xmm2    # 0x16f1e0
mulsd %xmm2, %xmm1
movsd 0x28c35(%rip), %xmm2    # 0x16f118
addsd %xmm2, %xmm1
mulsd %xmm1, %xmm0
movsd 0x28c5d(%rip), %xmm1    # 0x16f150
divsd %xmm1, %xmm0
movsd %xmm0, -0x60(%rbp)
movsd 0x2945bc(%rip), %xmm0   # 0x3daac0
callq 0x96f0
movsd %xmm0, -0x68(%rbp)
imull $0x9, 0x29455f(%rip), %eax # 0x3daa74
subl $0x2, %eax
movslq %eax, %rcx
leaq 0x88e9e(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm0
movsd -0x38(%rbp), %xmm1
mulsd -0x38(%rbp), %xmm1
movsd 0x28ca7(%rip), %xmm2    # 0x16f1e0
mulsd %xmm2, %xmm1
movsd 0x28bd3(%rip), %xmm2    # 0x16f118
addsd %xmm2, %xmm1
mulsd %xmm1, %xmm0
movsd 0x28bfb(%rip), %xmm1    # 0x16f150
divsd %xmm1, %xmm0
movsd %xmm0, -0x70(%rbp)
movsd 0x29455a(%rip), %xmm0   # 0x3daac0
callq 0x9080
movsd -0x70(%rbp), %xmm1
movsd -0x68(%rbp), %xmm2
movaps %xmm0, %xmm3
movsd -0x60(%rbp), %xmm0
mulsd %xmm3, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x294517(%rip)   # 0x3daaa8
imull $0x9, 0x2944dc(%rip), %eax # 0x3daa74
subl $0x3, %eax
movslq %eax, %rcx
leaq 0x88e1b(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm0
movsd 0x294516(%rip), %xmm1   # 0x3daac8
mulsd 0x29451e(%rip), %xmm1   # 0x3daad8
movsd 0x28b8e(%rip), %xmm2    # 0x16f150
mulsd %xmm2, %xmm1
mulsd %xmm1, %xmm0
movsd %xmm0, -0x48(%rbp)
movsd 0x2944e9(%rip), %xmm0   # 0x3daac0
callq 0x96f0
movsd %xmm0, -0x50(%rbp)
imull $0x9, 0x29448c(%rip), %eax # 0x3daa74
subl $0x1, %eax
movslq %eax, %rcx
leaq 0x88dcb(%rip), %rax     # 0x1cf3c0
movsd (%rax,%rcx,8), %xmm0
movsd 0x2944c6(%rip), %xmm1   # 0x3daac8
mulsd 0x2944ce(%rip), %xmm1   # 0x3daad8
movsd 0x28b3e(%rip), %xmm2    # 0x16f150
mulsd %xmm2, %xmm1
mulsd %xmm1, %xmm0
movsd %xmm0, -0x58(%rbp)
movsd 0x294499(%rip), %xmm0   # 0x3daac0
callq 0x9080
movsd -0x58(%rbp), %xmm1
movsd -0x50(%rbp), %xmm2
movaps %xmm0, %xmm3
movsd -0x48(%rbp), %xmm0
mulsd %xmm3, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, 0x29444e(%rip)   # 0x3daaa0
xorps %xmm0, %xmm0
movsd %xmm0, 0x29443b(%rip)   # 0x3daa98
movsd 0x294443(%rip), %xmm0   # 0x3daaa8
addsd 0x294473(%rip), %xmm0   # 0x3daae0
movsd %xmm0, 0x29446b(%rip)   # 0x3daae0
movsd 0x294423(%rip), %xmm0   # 0x3daaa0
addsd 0x29444b(%rip), %xmm0   # 0x3daad0
movsd %xmm0, 0x294443(%rip)   # 0x3daad0
movq -0x28(%rbp), %rax
movsd (%rax), %xmm1
movsd 0x29440b(%rip), %xmm0   # 0x3daaa8
mulsd 0x2943e3(%rip), %xmm0   # 0x3daa88
movsd 0x29441b(%rip), %xmm2   # 0x3daac8
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd 0x2943db(%rip), %xmm1   # 0x3daa98
movsd 0x2943cb(%rip), %xmm2   # 0x3daa90
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd 0x2943b4(%rip), %xmm0   # 0x3daaa0
mulsd 0x2943e4(%rip), %xmm0   # 0x3daad8
movsd 0x29438c(%rip), %xmm2   # 0x3daa88
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq -0x28(%rbp), %rax
movsd %xmm0, (%rax)
movq -0x28(%rbp), %rax
movsd 0x8(%rax), %xmm1
movsd 0x294374(%rip), %xmm0   # 0x3daaa8
mulsd 0x294354(%rip), %xmm0   # 0x3daa90
movsd 0x294384(%rip), %xmm2   # 0x3daac8
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd 0x294344(%rip), %xmm1   # 0x3daa98
movsd 0x29432c(%rip), %xmm2   # 0x3daa88
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd 0x294334(%rip), %xmm0   # 0x3daaa0
mulsd 0x294364(%rip), %xmm0   # 0x3daad8
movsd 0x294314(%rip), %xmm2   # 0x3daa90
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq -0x28(%rbp), %rax
movsd %xmm0, 0x8(%rax)
movq -0x28(%rbp), %rax
movsd 0x10(%rax), %xmm0
movsd 0x2942f3(%rip), %xmm1   # 0x3daaa8
movsd 0x29431b(%rip), %xmm2   # 0x3daad8
mulsd %xmm2, %xmm1
addsd %xmm0, %xmm1
movsd 0x2942d3(%rip), %xmm0   # 0x3daaa0
movsd 0x2942f3(%rip), %xmm2   # 0x3daac8
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq -0x28(%rbp), %rax
movsd %xmm0, 0x10(%rax)
movl 0x294288(%rip), %eax    # 0x3daa74
addl $0x1, %eax
movl %eax, 0x29427f(%rip)    # 0x3daa74
jmp 0x1463b0
movl $0x0, 0x29426c(%rip)    # 0x3daa70
cmpl $0x2, 0x294265(%rip)    # 0x3daa70
jg 0x14683f
movq -0x28(%rbp), %rax
movslq 0x294258(%rip), %rcx    # 0x3daa70
movsd (%rax,%rcx,8), %xmm0
movsd 0x2880b(%rip), %xmm1    # 0x16f030
divsd %xmm1, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movl 0x29423c(%rip), %eax    # 0x3daa70
addl $0x1, %eax
movl %eax, 0x294233(%rip)    # 0x3daa70
jmp 0x146804
movl $0x0, -0x4(%rbp)
movl -0x4(%rbp), %eax
addq $0x70, %rsp
popq %rbp
retq
nop