// File: /workspace/github_c_makefile_star2_O0/PoulinV[P]AxiCLASS/build/../tools/arrays.c
// Function: array_spline_table_lines
int array_spline_table_lines(
			     double * x, /* vector of size x_size */
			     int x_size,
			     double * y_array, /* array of size x_size*y_size with elements
						  y_array[index_x*y_size+index_y] */
			     int y_size,
			     double * ddy_array, /* array of size x_size*y_size */
			     short spline_mode,
			     ErrorMsg errmsg
			     ) {

  double * p;
  double * qn;
  double * un;
  double * u;
  double sig;
  int index_x;
  int index_y;
  double dy_first;
  double dy_last;

  u = (double*)malloc((x_size-1) * y_size * sizeof(double));
  p = (double*)malloc(y_size * sizeof(double));
  qn = (double*)malloc(y_size * sizeof(double));
  un = (double*)malloc(y_size * sizeof(double));

  if (u == NULL) {
    class_sprintf(errmsg,"%s(L:%d) Cannot allocate u",__func__,__LINE__);
    return _FAILURE_;
  }
  if (p == NULL) {
    class_sprintf(errmsg,"%s(L:%d) Cannot allocate p",__func__,__LINE__);
    return _FAILURE_;
  }
  if (qn == NULL) {
    class_sprintf(errmsg,"%s(L:%d) Cannot allocate qn",__func__,__LINE__);
    return _FAILURE_;
  }
  if (un == NULL) {
    class_sprintf(errmsg,"%s(L:%d) Cannot allocate un",__func__,__LINE__);
    return _FAILURE_;
  }

  if (x_size==2) spline_mode = _SPLINE_NATURAL_; // in the case of only 2 x-values, only the natural spline method is appropriate, for _SPLINE_EST_DERIV_ at least 3 x-values are needed.

  index_x=0;

  if (spline_mode == _SPLINE_NATURAL_) {
    for (index_y=0; index_y < y_size; index_y++) {
      ddy_array[index_x*y_size+index_y] = u[index_x*y_size+index_y] = 0.0;
    }
  }
  else {
    if (spline_mode == _SPLINE_EST_DERIV_) {

      for (index_y=0; index_y < y_size; index_y++) {

	dy_first =
	  ((x[2]-x[0])*(x[2]-x[0])*
	   (y_array[1*y_size+index_y]-y_array[0*y_size+index_y])-
	   (x[1]-x[0])*(x[1]-x[0])*
	   (y_array[2*y_size+index_y]-y_array[0*y_size+index_y]))/
	  ((x[2]-x[0])*(x[1]-x[0])*(x[2]-x[1]));

	ddy_array[index_x*y_size+index_y] = -0.5;

	u[index_x*y_size+index_y] =
	  (3./(x[1] -  x[0]))*
	  ((y_array[1*y_size+index_y]-y_array[0*y_size+index_y])/
	   (x[1] - x[0])-dy_first);

      }
    }
    else {
      class_sprintf(errmsg,"%s(L:%d) Spline mode not identified: %d",__func__,__LINE__,spline_mode);
      return _FAILURE_;
    }
  }


  for (index_x=1; index_x < x_size-1; index_x++) {

    sig = (x[index_x] - x[index_x-1])/(x[index_x+1] - x[index_x-1]);

    for (index_y=0; index_y < y_size; index_y++) {

      p[index_y] = sig * ddy_array[(index_x-1)*y_size+index_y] + 2.0;

      ddy_array[index_x*y_size+index_y] = (sig-1.0)/p[index_y];

      u[index_x*y_size+index_y] =
	(y_array[(index_x+1)*y_size+index_y] - y_array[index_x*y_size+index_y])
	/ (x[index_x+1] - x[index_x])
	- (y_array[index_x*y_size+index_y] - y_array[(index_x-1)*y_size+index_y])
	/ (x[index_x] - x[index_x-1]);

      u[index_x*y_size+index_y] = (6.0 * u[index_x*y_size+index_y] /
				   (x[index_x+1] - x[index_x-1])
				   - sig * u[(index_x-1)*y_size+index_y]) / p[index_y];
    }

  }

  if (spline_mode == _SPLINE_NATURAL_) {

    for (index_y=0; index_y < y_size; index_y++) {
      qn[index_y]=un[index_y]=0.0;
    }

  }
  else {
    if (spline_mode == _SPLINE_EST_DERIV_) {

      for (index_y=0; index_y < y_size; index_y++) {

	dy_last =
	  ((x[x_size-3]-x[x_size-1])*(x[x_size-3]-x[x_size-1])*
	   (y_array[(x_size-2)*y_size+index_y]-y_array[(x_size-1)*y_size+index_y])-
	   (x[x_size-2]-x[x_size-1])*(x[x_size-2]-x[x_size-1])*
	   (y_array[(x_size-3)*y_size+index_y]-y_array[(x_size-1)*y_size+index_y]))/
	  ((x[x_size-3]-x[x_size-1])*(x[x_size-2]-x[x_size-1])*(x[x_size-3]-x[x_size-2]));

	qn[index_y]=0.5;

	un[index_y]=
	  (3./(x[x_size-1] - x[x_size-2]))*
	  (dy_last-(y_array[(x_size-1)*y_size+index_y] - y_array[(x_size-2)*y_size+index_y])/
	   (x[x_size-1] - x[x_size-2]));

      }
    }
    else {
      class_sprintf(errmsg,"%s(L:%d) Spline mode not identified: %d",__func__,__LINE__,spline_mode);
      return _FAILURE_;
    }
  }

  index_x=x_size-1;

  for (index_y=0; index_y < y_size; index_y++) {
    ddy_array[index_x*y_size+index_y] =
      (un[index_y] - qn[index_y] * u[(index_x-1)*y_size+index_y]) /
      (qn[index_y] * ddy_array[(index_x-1)*y_size+index_y] + 1.0);
  }

  for (index_x=x_size-2; index_x >= 0; index_x--) {
    for (index_y=0; index_y < y_size; index_y++) {

      ddy_array[index_x*y_size+index_y] = ddy_array[index_x*y_size+index_y] *
	ddy_array[(index_x+1)*y_size+index_y] + u[index_x*y_size+index_y];

    }
  }

  free(qn);
  free(un);
  free(p);
  free(u);

  return _SUCCESS_;
 }

// Assembly:
subq $0x98, %rsp
movw %r9w, %ax
movq 0xa0(%rsp), %r9
movq %rdi, 0x88(%rsp)
movl %esi, 0x84(%rsp)
movq %rdx, 0x78(%rsp)
movl %ecx, 0x74(%rsp)
movq %r8, 0x68(%rsp)
movw %ax, 0x66(%rsp)
movl 0x84(%rsp), %eax
subl $0x1, %eax
imull 0x74(%rsp), %eax
movslq %eax, %rdi
shlq $0x3, %rdi
callq 0x8460
movq %rax, 0x40(%rsp)
movslq 0x74(%rsp), %rdi
shlq $0x3, %rdi
callq 0x8460
movq %rax, 0x58(%rsp)
movslq 0x74(%rsp), %rdi
shlq $0x3, %rdi
callq 0x8460
movq %rax, 0x50(%rsp)
movslq 0x74(%rsp), %rdi
shlq $0x3, %rdi
callq 0x8460
movq %rax, 0x48(%rsp)
cmpq $0x0, 0x40(%rsp)
jne 0x1d08b
jmp 0x1d028
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b6dd1(%rip), %rdx    # 0x1d3e04
leaq 0x1b6e65(%rip), %rcx    # 0x1d3e9f
movl $0x246, %r8d            # imm = 0x246
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x1c(%rsp)
movq 0xa0(%rsp), %rdi
movl 0x1c(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
leaq 0x1b6d9d(%rip), %rdx    # 0x1d3e04
leaq 0x1b6e31(%rip), %rcx    # 0x1d3e9f
movl $0x246, %r8d            # imm = 0x246
movb $0x0, %al
callq 0x8540
movl $0x1, 0x94(%rsp)
jmp 0x1ddc2
cmpq $0x0, 0x58(%rsp)
jne 0x1d0f8
jmp 0x1d095
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b6e18(%rip), %rdx    # 0x1d3eb8
leaq 0x1b6df8(%rip), %rcx    # 0x1d3e9f
movl $0x24a, %r8d            # imm = 0x24A
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x18(%rsp)
movq 0xa0(%rsp), %rdi
movl 0x18(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
leaq 0x1b6de4(%rip), %rdx    # 0x1d3eb8
leaq 0x1b6dc4(%rip), %rcx    # 0x1d3e9f
movl $0x24a, %r8d            # imm = 0x24A
movb $0x0, %al
callq 0x8540
movl $0x1, 0x94(%rsp)
jmp 0x1ddc2
cmpq $0x0, 0x50(%rsp)
jne 0x1d165
jmp 0x1d102
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b6dc6(%rip), %rdx    # 0x1d3ed3
leaq 0x1b6d8b(%rip), %rcx    # 0x1d3e9f
movl $0x24e, %r8d            # imm = 0x24E
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x14(%rsp)
movq 0xa0(%rsp), %rdi
movl 0x14(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
leaq 0x1b6d92(%rip), %rdx    # 0x1d3ed3
leaq 0x1b6d57(%rip), %rcx    # 0x1d3e9f
movl $0x24e, %r8d            # imm = 0x24E
movb $0x0, %al
callq 0x8540
movl $0x1, 0x94(%rsp)
jmp 0x1ddc2
cmpq $0x0, 0x48(%rsp)
jne 0x1d1d2
jmp 0x1d16f
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b6d75(%rip), %rdx    # 0x1d3eef
leaq 0x1b6d1e(%rip), %rcx    # 0x1d3e9f
movl $0x252, %r8d            # imm = 0x252
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x10(%rsp)
movq 0xa0(%rsp), %rdi
movl 0x10(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
leaq 0x1b6d41(%rip), %rdx    # 0x1d3eef
leaq 0x1b6cea(%rip), %rcx    # 0x1d3e9f
movl $0x252, %r8d            # imm = 0x252
movb $0x0, %al
callq 0x8540
movl $0x1, 0x94(%rsp)
jmp 0x1ddc2
cmpl $0x2, 0x84(%rsp)
jne 0x1d1e3
movw $0x0, 0x66(%rsp)
movl $0x0, 0x34(%rsp)
movswl 0x66(%rsp), %eax
cmpl $0x0, %eax
jne 0x1d253
movl $0x0, 0x30(%rsp)
movl 0x30(%rsp), %eax
cmpl 0x74(%rsp), %eax
jge 0x1d24e
movq 0x40(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movl 0x30(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x30(%rsp)
jmp 0x1d1fd
jmp 0x1d4fa
movswl 0x66(%rsp), %eax
cmpl $0x1, %eax
jne 0x1d487
movl $0x0, 0x30(%rsp)
movl 0x30(%rsp), %eax
cmpl 0x74(%rsp), %eax
jge 0x1d485
movq 0x88(%rsp), %rax
movsd 0x10(%rax), %xmm0
movq 0x88(%rsp), %rax
subsd (%rax), %xmm0
movq 0x88(%rsp), %rax
movsd 0x10(%rax), %xmm1
movq 0x88(%rsp), %rax
subsd (%rax), %xmm1
mulsd %xmm1, %xmm0
movq 0x78(%rsp), %rax
movl 0x74(%rsp), %ecx
shll $0x0, %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x78(%rsp), %rax
imull $0x0, 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
movq 0x88(%rsp), %rax
movsd 0x8(%rax), %xmm1
movq 0x88(%rsp), %rax
subsd (%rax), %xmm1
movq 0x88(%rsp), %rax
movsd 0x8(%rax), %xmm3
movq 0x88(%rsp), %rax
subsd (%rax), %xmm3
mulsd %xmm3, %xmm1
movq 0x78(%rsp), %rax
movl 0x74(%rsp), %ecx
shll %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm3
movq 0x78(%rsp), %rax
imull $0x0, 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm3
mulsd %xmm3, %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq 0x88(%rsp), %rax
movsd 0x10(%rax), %xmm1
movq 0x88(%rsp), %rax
subsd (%rax), %xmm1
movq 0x88(%rsp), %rax
movsd 0x8(%rax), %xmm2
movq 0x88(%rsp), %rax
subsd (%rax), %xmm2
mulsd %xmm2, %xmm1
movq 0x88(%rsp), %rax
movsd 0x10(%rax), %xmm2
movq 0x88(%rsp), %rax
subsd 0x8(%rax), %xmm2
mulsd %xmm2, %xmm1
divsd %xmm1, %xmm0
movsd %xmm0, 0x28(%rsp)
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd 0x1b62c4(%rip), %xmm0   # 0x1d36a0
movsd %xmm0, (%rax,%rcx,8)
movq 0x88(%rsp), %rax
movsd 0x8(%rax), %xmm1
movq 0x88(%rsp), %rax
subsd (%rax), %xmm1
movsd 0x1b6296(%rip), %xmm0   # 0x1d3698
divsd %xmm1, %xmm0
movq 0x78(%rsp), %rax
movl 0x74(%rsp), %ecx
shll $0x0, %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x78(%rsp), %rax
imull $0x0, 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movsd 0x8(%rax), %xmm2
movq 0x88(%rsp), %rax
subsd (%rax), %xmm2
divsd %xmm2, %xmm1
subsd 0x28(%rsp), %xmm1
mulsd %xmm1, %xmm0
movq 0x40(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x30(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x30(%rsp)
jmp 0x1d269
jmp 0x1d4f8
jmp 0x1d489
movswl 0x66(%rsp), %r9d
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b6985(%rip), %rdx    # 0x1d3e1f
leaq 0x1b69fe(%rip), %rcx    # 0x1d3e9f
movl $0x275, %r8d            # imm = 0x275
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0xc(%rsp)
movq 0xa0(%rsp), %rdi
movl 0xc(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
movswl 0x66(%rsp), %r9d
leaq 0x1b694b(%rip), %rdx    # 0x1d3e1f
leaq 0x1b69c4(%rip), %rcx    # 0x1d3e9f
movl $0x275, %r8d            # imm = 0x275
movb $0x0, %al
callq 0x8540
movl $0x1, 0x94(%rsp)
jmp 0x1ddc2
jmp 0x1d4fa
movl $0x1, 0x34(%rsp)
movl 0x34(%rsp), %eax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
cmpl %ecx, %eax
jge 0x1d7d3
movq 0x88(%rsp), %rax
movslq 0x34(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x88(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
movq 0x88(%rsp), %rax
movl 0x34(%rsp), %ecx
addl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
divsd %xmm1, %xmm0
movsd %xmm0, 0x38(%rsp)
movl $0x0, 0x30(%rsp)
movl 0x30(%rsp), %eax
cmpl 0x74(%rsp), %eax
jge 0x1d7c1
movsd 0x38(%rsp), %xmm0
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
mulsd %xmm1, %xmm0
movsd 0x1b56c2(%rip), %xmm1   # 0x1d2c80
addsd %xmm1, %xmm0
movq 0x58(%rsp), %rax
movslq 0x30(%rsp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movsd 0x38(%rsp), %xmm0
movsd 0x1b4c69(%rip), %xmm1   # 0x1d2248
subsd %xmm1, %xmm0
movq 0x58(%rsp), %rax
movslq 0x30(%rsp), %rcx
divsd (%rax,%rcx,8), %xmm0
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movq 0x78(%rsp), %rax
movl 0x34(%rsp), %ecx
addl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x78(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
movq 0x88(%rsp), %rax
movl 0x34(%rsp), %ecx
addl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movslq 0x34(%rsp), %rcx
subsd (%rax,%rcx,8), %xmm1
divsd %xmm1, %xmm0
movq 0x78(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x78(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movslq 0x34(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x88(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
divsd %xmm2, %xmm1
subsd %xmm1, %xmm0
movq 0x40(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movq 0x40(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd 0x1b5f79(%rip), %xmm1   # 0x1d3688
mulsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movl 0x34(%rsp), %ecx
addl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x88(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
divsd %xmm0, %xmm1
movsd 0x38(%rsp), %xmm0
movq 0x40(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq 0x58(%rsp), %rax
movslq 0x30(%rsp), %rcx
divsd (%rax,%rcx,8), %xmm0
movq 0x40(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x30(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x30(%rsp)
jmp 0x1d581
jmp 0x1d7c3
movl 0x34(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x34(%rsp)
jmp 0x1d502
movswl 0x66(%rsp), %eax
cmpl $0x0, %eax
jne 0x1d825
movl $0x0, 0x30(%rsp)
movl 0x30(%rsp), %eax
cmpl 0x74(%rsp), %eax
jge 0x1d820
movq 0x48(%rsp), %rax
movslq 0x30(%rsp), %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movq 0x50(%rsp), %rax
movslq 0x30(%rsp), %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movl 0x30(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x30(%rsp)
jmp 0x1d7e5
jmp 0x1dbe3
movswl 0x66(%rsp), %eax
cmpl $0x1, %eax
jne 0x1db70
movl $0x0, 0x30(%rsp)
movl 0x30(%rsp), %eax
cmpl 0x74(%rsp), %eax
jge 0x1db6e
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x3, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x3, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
mulsd %xmm1, %xmm0
movq 0x78(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x2, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x78(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm3
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm3
mulsd %xmm3, %xmm1
movq 0x78(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x3, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm3
movq 0x78(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm3
mulsd %xmm3, %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x3, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
mulsd %xmm2, %xmm1
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x3, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
mulsd %xmm2, %xmm1
divsd %xmm1, %xmm0
movsd %xmm0, 0x20(%rsp)
movq 0x50(%rsp), %rax
movslq 0x30(%rsp), %rcx
movsd 0x1b5204(%rip), %xmm0   # 0x1d2c88
movsd %xmm0, (%rax,%rcx,8)
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movsd 0x1b5bd3(%rip), %xmm0   # 0x1d3698
divsd %xmm1, %xmm0
movsd 0x20(%rsp), %xmm1
movq 0x78(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x78(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x2, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm3
movq 0x88(%rsp), %rax
movl 0x84(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm3
divsd %xmm3, %xmm2
subsd %xmm2, %xmm1
mulsd %xmm1, %xmm0
movq 0x48(%rsp), %rax
movslq 0x30(%rsp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x30(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x30(%rsp)
jmp 0x1d83b
jmp 0x1dbe1
jmp 0x1db72
movswl 0x66(%rsp), %r9d
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b629c(%rip), %rdx    # 0x1d3e1f
leaq 0x1b6315(%rip), %rcx    # 0x1d3e9f
movl $0x2af, %r8d            # imm = 0x2AF
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x8(%rsp)
movq 0xa0(%rsp), %rdi
movl 0x8(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
movswl 0x66(%rsp), %r9d
leaq 0x1b6262(%rip), %rdx    # 0x1d3e1f
leaq 0x1b62db(%rip), %rcx    # 0x1d3e9f
movl $0x2af, %r8d            # imm = 0x2AF
movb $0x0, %al
callq 0x8540
movl $0x1, 0x94(%rsp)
jmp 0x1ddc2
jmp 0x1dbe3
movl 0x84(%rsp), %eax
subl $0x1, %eax
movl %eax, 0x34(%rsp)
movl $0x0, 0x30(%rsp)
movl 0x30(%rsp), %eax
cmpl 0x74(%rsp), %eax
jge 0x1dccb
movq 0x48(%rsp), %rax
movslq 0x30(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x50(%rsp), %rax
movslq 0x30(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x40(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq 0x50(%rsp), %rax
movslq 0x30(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
subl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
mulsd %xmm2, %xmm1
movsd 0x1b45af(%rip), %xmm2   # 0x1d2248
addsd %xmm2, %xmm1
divsd %xmm1, %xmm0
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x30(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x30(%rsp)
jmp 0x1dbf9
movl 0x84(%rsp), %eax
subl $0x2, %eax
movl %eax, 0x34(%rsp)
cmpl $0x0, 0x34(%rsp)
jl 0x1dd8f
movl $0x0, 0x30(%rsp)
movl 0x30(%rsp), %eax
cmpl 0x74(%rsp), %eax
jge 0x1dd7d
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
addl $0x1, %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x40(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq 0x68(%rsp), %rax
movl 0x34(%rsp), %ecx
imull 0x74(%rsp), %ecx
addl 0x30(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x30(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x30(%rsp)
jmp 0x1dcec
jmp 0x1dd7f
movl 0x34(%rsp), %eax
addl $-0x1, %eax
movl %eax, 0x34(%rsp)
jmp 0x1dcd9
movq 0x50(%rsp), %rdi
callq 0x8420
movq 0x48(%rsp), %rdi
callq 0x8420
movq 0x58(%rsp), %rdi
callq 0x8420
movq 0x40(%rsp), %rdi
callq 0x8420
movl $0x0, 0x94(%rsp)
movl 0x94(%rsp), %eax
addq $0x98, %rsp
retq
nopw %cs:(%rax,%rax)