// File: /workspace/github_c_makefile_star2_O0/PoulinV[P]AxiCLASS/build/../tools/arrays.c
// Function: array_spline_table_columns
int array_spline_table_columns(
		       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_y*x_size+index_x] */
		       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_y*x_size+index_x] = 0.0;
      u[index_x*y_size+index_y] = 0.0;
    }
  }
  else {
    if (spline_mode == _SPLINE_EST_DERIV_) {

      class_test(x[2]-x[0]==0.,
		 errmsg,
		 "x[2]=%g, x[0]=%g, stop to avoid seg fault",x[2],x[0]);
      class_test(x[1]-x[0]==0.,
		 errmsg,
		 "x[1]=%g, x[0]=%g, stop to avoid seg fault",x[1],x[0]);
      class_test(x[2]-x[1]==0.,
		 errmsg,
		 "x[2]=%g, x[1]=%g, stop to avoid seg fault",x[2],x[1]);

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

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

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

	u[index_x*y_size+index_y] =
	  (3./(x[1] -  x[0]))*
	  ((y_array[index_y*x_size+1]-y_array[index_y*x_size+0])/
	   (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_y*x_size+(index_x-1)] + 2.0;

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

      u[index_x*y_size+index_y] =
	(y_array[index_y*x_size+(index_x+1)] - y_array[index_y*x_size+index_x])
	/ (x[index_x+1] - x[index_x])
	- (y_array[index_y*x_size+index_x] - y_array[index_y*x_size+(index_x-1)])
	/ (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[index_y*x_size+(x_size-2)]-y_array[index_y*x_size+(x_size-1)])-
	   (x[x_size-2]-x[x_size-1])*(x[x_size-2]-x[x_size-1])*
	   (y_array[index_y*x_size+(x_size-3)]-y_array[index_y*x_size+(x_size-1)]))/
	  ((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[index_y*x_size+(x_size-1)] - y_array[index_y*x_size+(x_size-2)])/
	   (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_y*x_size+index_x] =
      (un[index_y] - qn[index_y] * u[(index_x-1)*y_size+index_y]) /
      (qn[index_y] * ddy_array[index_y*x_size+(index_x-1)] + 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_y*x_size+index_x] = ddy_array[index_y*x_size+index_x] *
	ddy_array[index_y*x_size+(index_x+1)] + u[index_x*y_size+index_y];

    }
  }

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

  return _SUCCESS_;
 }

// Assembly:
subq $0x3098, %rsp           # imm = 0x3098
movw %r9w, %ax
movq 0x30a0(%rsp), %r9
movq %rdi, 0x3088(%rsp)
movl %esi, 0x3084(%rsp)
movq %rdx, 0x3078(%rsp)
movl %ecx, 0x3074(%rsp)
movq %r8, 0x3068(%rsp)
movw %ax, 0x3066(%rsp)
movl 0x3084(%rsp), %eax
subl $0x1, %eax
imull 0x3074(%rsp), %eax
movslq %eax, %rdi
shlq $0x3, %rdi
callq 0x8460
movq %rax, 0x3040(%rsp)
movslq 0x3074(%rsp), %rdi
shlq $0x3, %rdi
callq 0x8460
movq %rax, 0x3058(%rsp)
movslq 0x3074(%rsp), %rdi
shlq $0x3, %rdi
callq 0x8460
movq %rax, 0x3050(%rsp)
movslq 0x3074(%rsp), %rdi
shlq $0x3, %rdi
callq 0x8460
movq %rax, 0x3048(%rsp)
cmpq $0x0, 0x3040(%rsp)
jne 0x1f5d8
jmp 0x1f56f
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b488a(%rip), %rdx    # 0x1d3e04
leaq 0x1b49a6(%rip), %rcx    # 0x1d3f27
movl $0x389, %r8d            # imm = 0x389
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x301c(%rsp)
movq 0x30a0(%rsp), %rdi
movl 0x301c(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
leaq 0x1b4850(%rip), %rdx    # 0x1d3e04
leaq 0x1b496c(%rip), %rcx    # 0x1d3f27
movl $0x389, %r8d            # imm = 0x389
movb $0x0, %al
callq 0x8540
movl $0x1, 0x3094(%rsp)
jmp 0x20803
cmpq $0x0, 0x3058(%rsp)
jne 0x1f64e
jmp 0x1f5e5
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b48c8(%rip), %rdx    # 0x1d3eb8
leaq 0x1b4930(%rip), %rcx    # 0x1d3f27
movl $0x38d, %r8d            # imm = 0x38D
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x3018(%rsp)
movq 0x30a0(%rsp), %rdi
movl 0x3018(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
leaq 0x1b488e(%rip), %rdx    # 0x1d3eb8
leaq 0x1b48f6(%rip), %rcx    # 0x1d3f27
movl $0x38d, %r8d            # imm = 0x38D
movb $0x0, %al
callq 0x8540
movl $0x1, 0x3094(%rsp)
jmp 0x20803
cmpq $0x0, 0x3050(%rsp)
jne 0x1f6c4
jmp 0x1f65b
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b486d(%rip), %rdx    # 0x1d3ed3
leaq 0x1b48ba(%rip), %rcx    # 0x1d3f27
movl $0x391, %r8d            # imm = 0x391
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x3014(%rsp)
movq 0x30a0(%rsp), %rdi
movl 0x3014(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
leaq 0x1b4833(%rip), %rdx    # 0x1d3ed3
leaq 0x1b4880(%rip), %rcx    # 0x1d3f27
movl $0x391, %r8d            # imm = 0x391
movb $0x0, %al
callq 0x8540
movl $0x1, 0x3094(%rsp)
jmp 0x20803
cmpq $0x0, 0x3048(%rsp)
jne 0x1f73a
jmp 0x1f6d1
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b4813(%rip), %rdx    # 0x1d3eef
leaq 0x1b4844(%rip), %rcx    # 0x1d3f27
movl $0x395, %r8d            # imm = 0x395
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x3010(%rsp)
movq 0x30a0(%rsp), %rdi
movl 0x3010(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
leaq 0x1b47d9(%rip), %rdx    # 0x1d3eef
leaq 0x1b480a(%rip), %rcx    # 0x1d3f27
movl $0x395, %r8d            # imm = 0x395
movb $0x0, %al
callq 0x8540
movl $0x1, 0x3094(%rsp)
jmp 0x20803
cmpl $0x2, 0x3084(%rsp)
jne 0x1f74e
movw $0x0, 0x3066(%rsp)
movl $0x0, 0x3034(%rsp)
movswl 0x3066(%rsp), %eax
cmpl $0x0, %eax
jne 0x1f7ef
movl $0x0, 0x3030(%rsp)
movl 0x3030(%rsp), %eax
cmpl 0x3074(%rsp), %eax
jge 0x1f7ea
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl 0x3034(%rsp), %ecx
movslq %ecx, %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movq 0x3040(%rsp), %rax
movl 0x3034(%rsp), %ecx
imull 0x3074(%rsp), %ecx
addl 0x3030(%rsp), %ecx
movslq %ecx, %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movl 0x3030(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x3030(%rsp)
jmp 0x1f775
jmp 0x1fd39
movswl 0x3066(%rsp), %eax
cmpl $0x1, %eax
jne 0x1fcc0
movq 0x3088(%rsp), %rax
movsd 0x10(%rax), %xmm0
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm0
xorps %xmm1, %xmm1
ucomisd %xmm1, %xmm0
jne 0x1f8ba
jp 0x1f8ba
leaq 0x2810(%rsp), %rdi
movq 0x3088(%rsp), %rax
movsd 0x10(%rax), %xmm0
movq 0x3088(%rsp), %rax
movsd (%rax), %xmm1
leaq 0x1b46ee(%rip), %rsi    # 0x1d3f42
movb $0x2, %al
callq 0x5b9c0
leaq 0x2010(%rsp), %rdi
leaq 0x2810(%rsp), %rcx
leaq 0x1b2810(%rip), %rsi    # 0x1d2082
leaq 0x1b46f3(%rip), %rdx    # 0x1d3f6c
movb $0x0, %al
callq 0x5b9c0
movq 0x30a0(%rsp), %rdi
leaq 0x2010(%rsp), %r8
leaq 0x1b279d(%rip), %rsi    # 0x1d2034
leaq 0x1b4689(%rip), %rdx    # 0x1d3f27
movl $0x3a8, %ecx            # imm = 0x3A8
movb $0x0, %al
callq 0x5b9c0
movl $0x1, 0x3094(%rsp)
jmp 0x20803
movq 0x3088(%rsp), %rax
movsd 0x8(%rax), %xmm0
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm0
xorps %xmm1, %xmm1
ucomisd %xmm1, %xmm0
jne 0x1f974
jp 0x1f974
leaq 0x1810(%rsp), %rdi
movq 0x3088(%rsp), %rax
movsd 0x8(%rax), %xmm0
movq 0x3088(%rsp), %rax
movsd (%rax), %xmm1
leaq 0x1b466c(%rip), %rsi    # 0x1d3f7a
movb $0x2, %al
callq 0x5b9c0
leaq 0x1010(%rsp), %rdi
leaq 0x1810(%rsp), %rcx
leaq 0x1b2756(%rip), %rsi    # 0x1d2082
leaq 0x1b4671(%rip), %rdx    # 0x1d3fa4
movb $0x0, %al
callq 0x5b9c0
movq 0x30a0(%rsp), %rdi
leaq 0x1010(%rsp), %r8
leaq 0x1b26e3(%rip), %rsi    # 0x1d2034
leaq 0x1b45cf(%rip), %rdx    # 0x1d3f27
movl $0x3ab, %ecx            # imm = 0x3AB
movb $0x0, %al
callq 0x5b9c0
movl $0x1, 0x3094(%rsp)
jmp 0x20803
movq 0x3088(%rsp), %rax
movsd 0x10(%rax), %xmm0
movq 0x3088(%rsp), %rax
subsd 0x8(%rax), %xmm0
xorps %xmm1, %xmm1
ucomisd %xmm1, %xmm0
jne 0x1fa2a
jp 0x1fa2a
leaq 0x810(%rsp), %rdi
movq 0x3088(%rsp), %rax
movsd 0x10(%rax), %xmm0
movq 0x3088(%rsp), %rax
movsd 0x8(%rax), %xmm1
leaq 0x1b45e8(%rip), %rsi    # 0x1d3fb2
movb $0x2, %al
callq 0x5b9c0
leaq 0x10(%rsp), %rdi
leaq 0x810(%rsp), %rcx
leaq 0x1b269d(%rip), %rsi    # 0x1d2082
leaq 0x1b45f0(%rip), %rdx    # 0x1d3fdc
movb $0x0, %al
callq 0x5b9c0
movq 0x30a0(%rsp), %rdi
leaq 0x10(%rsp), %r8
leaq 0x1b262d(%rip), %rsi    # 0x1d2034
leaq 0x1b4519(%rip), %rdx    # 0x1d3f27
movl $0x3ae, %ecx            # imm = 0x3AE
movb $0x0, %al
callq 0x5b9c0
movl $0x1, 0x3094(%rsp)
jmp 0x20803
movl $0x0, 0x3030(%rsp)
movl 0x3030(%rsp), %eax
cmpl 0x3074(%rsp), %eax
jge 0x1fcbe
movq 0x3088(%rsp), %rax
movsd 0x10(%rax), %xmm0
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm0
movq 0x3088(%rsp), %rax
movsd 0x10(%rax), %xmm1
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm1
mulsd %xmm1, %xmm0
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl $0x0, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
movq 0x3088(%rsp), %rax
movsd 0x8(%rax), %xmm1
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm1
movq 0x3088(%rsp), %rax
movsd 0x8(%rax), %xmm3
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm3
mulsd %xmm3, %xmm1
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl $0x2, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm3
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl $0x0, %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 0x3088(%rsp), %rax
movsd 0x10(%rax), %xmm1
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm1
movq 0x3088(%rsp), %rax
movsd 0x8(%rax), %xmm2
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm2
mulsd %xmm2, %xmm1
movq 0x3088(%rsp), %rax
movsd 0x10(%rax), %xmm2
movq 0x3088(%rsp), %rax
subsd 0x8(%rax), %xmm2
mulsd %xmm2, %xmm1
divsd %xmm1, %xmm0
movsd %xmm0, 0x3028(%rsp)
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl 0x3034(%rsp), %ecx
movslq %ecx, %rcx
movsd 0x1b3ab6(%rip), %xmm0   # 0x1d36a0
movsd %xmm0, (%rax,%rcx,8)
movq 0x3088(%rsp), %rax
movsd 0x8(%rax), %xmm1
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm1
movsd 0x1b3a88(%rip), %xmm0   # 0x1d3698
divsd %xmm1, %xmm0
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl $0x0, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movsd 0x8(%rax), %xmm2
movq 0x3088(%rsp), %rax
subsd (%rax), %xmm2
divsd %xmm2, %xmm1
subsd 0x3028(%rsp), %xmm1
mulsd %xmm1, %xmm0
movq 0x3040(%rsp), %rax
movl 0x3034(%rsp), %ecx
imull 0x3074(%rsp), %ecx
addl 0x3030(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x3030(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x3030(%rsp)
jmp 0x1fa35
jmp 0x1fd37
jmp 0x1fcc2
movswl 0x3066(%rsp), %r9d
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b4149(%rip), %rdx    # 0x1d3e1f
leaq 0x1b424a(%rip), %rcx    # 0x1d3f27
movl $0x3c3, %r8d            # imm = 0x3C3
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0xc(%rsp)
movq 0x30a0(%rsp), %rdi
movl 0xc(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
movswl 0x3066(%rsp), %r9d
leaq 0x1b410c(%rip), %rdx    # 0x1d3e1f
leaq 0x1b420d(%rip), %rcx    # 0x1d3f27
movl $0x3c3, %r8d            # imm = 0x3C3
movb $0x0, %al
callq 0x8540
movl $0x1, 0x3094(%rsp)
jmp 0x20803
jmp 0x1fd39
movl $0x1, 0x3034(%rsp)
movl 0x3034(%rsp), %eax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
cmpl %ecx, %eax
jge 0x200e7
movq 0x3088(%rsp), %rax
movslq 0x3034(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x3088(%rsp), %rax
movl 0x3034(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
movq 0x3088(%rsp), %rax
movl 0x3034(%rsp), %ecx
addl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movl 0x3034(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
divsd %xmm1, %xmm0
movsd %xmm0, 0x3038(%rsp)
movl $0x0, 0x3030(%rsp)
movl 0x3030(%rsp), %eax
cmpl 0x3074(%rsp), %eax
jge 0x200cf
movsd 0x3038(%rsp), %xmm0
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3034(%rsp), %edx
subl $0x1, %edx
addl %edx, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
mulsd %xmm1, %xmm0
movsd 0x1b2e54(%rip), %xmm1   # 0x1d2c80
addsd %xmm1, %xmm0
movq 0x3058(%rsp), %rax
movslq 0x3030(%rsp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movsd 0x3038(%rsp), %xmm0
movsd 0x1b23f2(%rip), %xmm1   # 0x1d2248
subsd %xmm1, %xmm0
movq 0x3058(%rsp), %rax
movslq 0x3030(%rsp), %rcx
divsd (%rax,%rcx,8), %xmm0
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl 0x3034(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3034(%rsp), %edx
addl $0x1, %edx
addl %edx, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl 0x3034(%rsp), %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
movq 0x3088(%rsp), %rax
movl 0x3034(%rsp), %ecx
addl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movslq 0x3034(%rsp), %rcx
subsd (%rax,%rcx,8), %xmm1
divsd %xmm1, %xmm0
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl 0x3034(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3034(%rsp), %edx
subl $0x1, %edx
addl %edx, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movslq 0x3034(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x3088(%rsp), %rax
movl 0x3034(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
divsd %xmm2, %xmm1
subsd %xmm1, %xmm0
movq 0x3040(%rsp), %rax
movl 0x3034(%rsp), %ecx
imull 0x3074(%rsp), %ecx
addl 0x3030(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movq 0x3040(%rsp), %rax
movl 0x3034(%rsp), %ecx
imull 0x3074(%rsp), %ecx
addl 0x3030(%rsp), %ecx
movslq %ecx, %rcx
movsd 0x1b3698(%rip), %xmm1   # 0x1d3688
mulsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movl 0x3034(%rsp), %ecx
addl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x3088(%rsp), %rax
movl 0x3034(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
divsd %xmm0, %xmm1
movsd 0x3038(%rsp), %xmm0
movq 0x3040(%rsp), %rax
movl 0x3034(%rsp), %ecx
subl $0x1, %ecx
imull 0x3074(%rsp), %ecx
addl 0x3030(%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 0x3058(%rsp), %rax
movslq 0x3030(%rsp), %rcx
divsd (%rax,%rcx,8), %xmm0
movq 0x3040(%rsp), %rax
movl 0x3034(%rsp), %ecx
imull 0x3074(%rsp), %ecx
addl 0x3030(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x3030(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x3030(%rsp)
jmp 0x1fdd8
jmp 0x200d1
movl 0x3034(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x3034(%rsp)
jmp 0x1fd44
movswl 0x3066(%rsp), %eax
cmpl $0x0, %eax
jne 0x20157
movl $0x0, 0x3030(%rsp)
movl 0x3030(%rsp), %eax
cmpl 0x3074(%rsp), %eax
jge 0x20152
movq 0x3048(%rsp), %rax
movslq 0x3030(%rsp), %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movq 0x3050(%rsp), %rax
movslq 0x3030(%rsp), %rcx
xorps %xmm0, %xmm0
movsd %xmm0, (%rax,%rcx,8)
movl 0x3030(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x3030(%rsp)
jmp 0x200ff
jmp 0x20581
movswl 0x3066(%rsp), %eax
cmpl $0x1, %eax
jne 0x20508
movl $0x0, 0x3030(%rsp)
movl 0x3030(%rsp), %eax
cmpl 0x3074(%rsp), %eax
jge 0x20506
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x3, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm0
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x3, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
mulsd %xmm1, %xmm0
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3084(%rsp), %edx
subl $0x2, %edx
addl %edx, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3084(%rsp), %edx
subl $0x1, %edx
addl %edx, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm3
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm3
mulsd %xmm3, %xmm1
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3084(%rsp), %edx
subl $0x3, %edx
addl %edx, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm3
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3084(%rsp), %edx
subl $0x1, %edx
addl %edx, %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 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x3, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
mulsd %xmm2, %xmm1
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x3, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
mulsd %xmm2, %xmm1
divsd %xmm1, %xmm0
movsd %xmm0, 0x3020(%rsp)
movq 0x3050(%rsp), %rax
movslq 0x3030(%rsp), %rcx
movsd 0x1b2891(%rip), %xmm0   # 0x1d2c88
movsd %xmm0, (%rax,%rcx,8)
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm1
movsd 0x1b3260(%rip), %xmm0   # 0x1d3698
divsd %xmm1, %xmm0
movsd 0x3020(%rsp), %xmm1
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3084(%rsp), %edx
subl $0x1, %edx
addl %edx, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x3078(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3084(%rsp), %edx
subl $0x2, %edx
addl %edx, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm2
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x1, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm3
movq 0x3088(%rsp), %rax
movl 0x3084(%rsp), %ecx
subl $0x2, %ecx
movslq %ecx, %rcx
subsd (%rax,%rcx,8), %xmm3
divsd %xmm3, %xmm2
subsd %xmm2, %xmm1
mulsd %xmm1, %xmm0
movq 0x3048(%rsp), %rax
movslq 0x3030(%rsp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x3030(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x3030(%rsp)
jmp 0x20173
jmp 0x2057f
jmp 0x2050a
movswl 0x3066(%rsp), %r9d
xorl %eax, %eax
movl %eax, %esi
leaq 0x1b3901(%rip), %rdx    # 0x1d3e1f
leaq 0x1b3a02(%rip), %rcx    # 0x1d3f27
movl $0x3fc, %r8d            # imm = 0x3FC
movq %rsi, %rdi
movb $0x0, %al
callq 0x8540
movl %eax, 0x8(%rsp)
movq 0x30a0(%rsp), %rdi
movl 0x8(%rsp), %eax
addl $0x1, %eax
movslq %eax, %rsi
movswl 0x3066(%rsp), %r9d
leaq 0x1b38c4(%rip), %rdx    # 0x1d3e1f
leaq 0x1b39c5(%rip), %rcx    # 0x1d3f27
movl $0x3fc, %r8d            # imm = 0x3FC
movb $0x0, %al
callq 0x8540
movl $0x1, 0x3094(%rsp)
jmp 0x20803
jmp 0x20581
movl 0x3084(%rsp), %eax
subl $0x1, %eax
movl %eax, 0x3034(%rsp)
movl $0x0, 0x3030(%rsp)
movl 0x3030(%rsp), %eax
cmpl 0x3074(%rsp), %eax
jge 0x206b3
movq 0x3048(%rsp), %rax
movslq 0x3030(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3050(%rsp), %rax
movslq 0x3030(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x3040(%rsp), %rax
movl 0x3034(%rsp), %ecx
subl $0x1, %ecx
imull 0x3074(%rsp), %ecx
addl 0x3030(%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 0x3050(%rsp), %rax
movslq 0x3030(%rsp), %rcx
movsd (%rax,%rcx,8), %xmm1
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3034(%rsp), %edx
subl $0x1, %edx
addl %edx, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
mulsd %xmm2, %xmm1
movsd 0x1b1bd9(%rip), %xmm2   # 0x1d2248
addsd %xmm2, %xmm1
divsd %xmm1, %xmm0
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl 0x3034(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x3030(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x3030(%rsp)
jmp 0x2059d
movl 0x3084(%rsp), %eax
subl $0x2, %eax
movl %eax, 0x3034(%rsp)
cmpl $0x0, 0x3034(%rsp)
jl 0x207c4
movl $0x0, 0x3030(%rsp)
movl 0x3030(%rsp), %eax
cmpl 0x3074(%rsp), %eax
jge 0x207ac
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl 0x3034(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm0
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
movl 0x3034(%rsp), %edx
addl $0x1, %edx
addl %edx, %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm2
movq 0x3040(%rsp), %rax
movl 0x3034(%rsp), %ecx
imull 0x3074(%rsp), %ecx
addl 0x3030(%rsp), %ecx
movslq %ecx, %rcx
movsd (%rax,%rcx,8), %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movq 0x3068(%rsp), %rax
movl 0x3030(%rsp), %ecx
imull 0x3084(%rsp), %ecx
addl 0x3034(%rsp), %ecx
movslq %ecx, %rcx
movsd %xmm0, (%rax,%rcx,8)
movl 0x3030(%rsp), %eax
addl $0x1, %eax
movl %eax, 0x3030(%rsp)
jmp 0x206dd
jmp 0x207ae
movl 0x3034(%rsp), %eax
addl $-0x1, %eax
movl %eax, 0x3034(%rsp)
jmp 0x206c4
movq 0x3050(%rsp), %rdi
callq 0x8420
movq 0x3058(%rsp), %rdi
callq 0x8420
movq 0x3040(%rsp), %rdi
callq 0x8420
movq 0x3048(%rsp), %rdi
callq 0x8420
movl $0x0, 0x3094(%rsp)
movl 0x3094(%rsp), %eax
addq $0x3098, %rsp           # imm = 0x3098
retq
nopw %cs:(%rax,%rax)