// File: /workspace/github_c_makefile_star2_O0/ugobas[P]tnm/kinetic_tnm.c
// Function: Eckart_main
void Eckart_main(struct axe *axes, int N_axes, atom *atoms, int N_atoms,
		 struct Reference Ref)
{
  /******************************************************************/
  /*   Computing internal rotations and translations (Eckart frame)  */
  /******************************************************************/
  // Initialize
  int i, j, k;

 // Compute inertia tensor and center of mass for all atoms
  double **corr_sum=Allocate_mat2_d(3,3), mr_tot[3];
  for(i=0; i<3; i++)mr_tot[i]=0;
  double M_tot=Sum_inertia(mr_tot, corr_sum, atoms, Ref, 0, Ref.N_ref-1);
  double r_ave[3]; for(i=0; i<3; i++)r_ave[i]=mr_tot[i]/M_tot;
  if(START){
    printf("Center of mass: ");
    for(i=0; i<3; i++)printf("  %.7f", r_ave[i]);
    printf("   M=%.0f\n", M_tot);
    START=0;
  }

  double **inertia_tot=Allocate_mat2_d(3,3);
  Inertia_tensor(inertia_tot, corr_sum, mr_tot, M_tot);

  // Cholevsky decomposition of global inertia tensor
  double **L_mat=Allocate_mat2_d(3,3);
  choldc(L_mat, inertia_tot, 3);

  // Partial inertia tensor for all axes
  // Exploits the fact that axes are nested
  double M_part=0, mr_part[3], **inertia_part=Allocate_mat2_d(3,3);
  Empty_inertia(mr_part, corr_sum);

  struct axe *axe=axes+N_axes-1;
  int last_kin=-1, i_last=0;
  for(int k=N_axes-1; k>=0; k--){
    // Compute partial center of mass and inertia tensor
    if(axe->last_kin!=last_kin){
      // New chain, initialize counters
      M_part=Empty_inertia(mr_part, corr_sum);
      last_kin=axe->last_kin;
      i_last=last_kin;
    }
    M_part+=Sum_inertia(mr_part, corr_sum, atoms, Ref, axe->first_kin, i_last);
    Inertia_tensor(inertia_part, corr_sum, mr_part, M_part);
    i_last=axe->first_kin-1;

    // Test that at least some atom is moved
    if(M_part==0){
      printf("WARNING, axis %d does not move any reference atom!\n", k);
      printf("Reference atoms: %d - %d\n", axe->first_kin, axe->last_kin);
      printf("All atoms: %d - %d\n", axe->first_atom, axe->last_atom);
      printf("dof: %d-%d (main) ", axe->first_main, axe->last_main);
      if(axe->first_side>=0)printf(" %d-%d (side)", axe->first_side, k);
      printf("\n");
      //exit(8);
    }
 
    /*
      ECKART ROTATION AND SHIFT OPERATORS:
      Vector global rotation about axe k:
      Iner global_rot[k]=-iner_part[k]v[k]+M_k(R-Rk)X(axe[k]X Rk+tau[k])}
      Vector global shift:
      global_shift[k]= - (axe[k]X Rk+tau[k])Mk/M - global_rot[k] X R
     */

    // Center of mass displacement
    double delta_cm[3], r_shift[3], rot_tot[3], X[3], Y[3];
    for(i=0; i<3; i++)r_shift[i]=M_part*mr_tot[i]-mr_part[i];
    Vector_product_d(delta_cm, axe->rot, mr_part);
    for(i=0; i<3; i++)delta_cm[i]=delta_cm[i]/M_part+axe->shift[i];
    for(i=0; i<3; i++)r_shift[i]=M_part*r_ave[i]-mr_part[i];
    Vector_product_d(Y, r_shift, delta_cm);
    for(i=0; i<3; i++){
      for(j=0; j<3; j++)Y[i]-=inertia_part[i][j]*axe->rot[j];
    }

    // Downstream rotataion: Solve (L L^t)A_a = Y_a
    Forward_substitution(X, L_mat, Y, 3);
    Backward_substitution(axe->global_rot, L_mat, X, 3);

    // Downstream shift
    Vector_product_d(rot_tot, axe->global_rot, r_ave);
    for(i=0; i<3; i++){
      axe->global_shift[i]=-delta_cm[i]*M_part/M_tot-rot_tot[i]; //
    }

    // Downstream rotation and shift
    for(i=0; i<3; i++){
      axe->local_rot[i]  =axe->global_rot[i] + axe->rot[i];
      axe->local_shift[i]=axe->global_shift[i]+axe->shift[i];
    }

    // Store kinetic variables.
    // Remove center of mass from inertia tensor
    axe->mass=M_part;
    double mr2=Scalar_product_3_d(mr_part, mr_part)/axe->mass;
    for(i=0; i<3; i++){
      axe->MR[i]=mr_part[i];
      for(j=0; j<3; j++){
	axe->I[i][j]=inertia_part[i][j]-mr_part[i]*mr_part[j]/axe->mass;
      }
      axe->I[i][i]+=mr2;
    }

    // New axe
    axe--;
  }

  if(DEBUG){
    double *v, q;
    printf("Axis res local_rot local_shift global_rot global_shift");
    printf(" first_ref first_rotable_atom type\n");
    for(k=0; k<N_axes; k++){
      axe=axes+k;
      printf("%3d %3d ", k, axe->bond->atom->res);
      v=axe->local_rot;
      q=Scalar_product_3_d(v,v); printf(" %.3f ", sqrt(q));
      v=axe->local_shift;
      q=Scalar_product_3_d(v,v); printf("%4.1f ", sqrt(q));
      v=axe->global_rot;
      q=Scalar_product_3_d(v,v); printf(" %.3f ", sqrt(q));
      v=axe->global_shift;
      q=Scalar_product_3_d(v,v); printf("%4.1f ", sqrt(q));
      printf("%3d %3d %c\n",axe->first_kin,axe->first_atom,axe->type);
    }
  }

  // Cleaning
  Empty_matrix_d(corr_sum, 3);
  Empty_matrix_d(inertia_part, 3);
  Empty_matrix_d(inertia_tot, 3);
  Empty_matrix_d(L_mat, 3);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
subq $0x1b0, %rsp            # imm = 0x1B0
leaq 0x10(%rbp), %rax
movq %rax, -0x180(%rbp)
movq %rdi, -0x8(%rbp)
movl %esi, -0xc(%rbp)
movq %rdx, -0x18(%rbp)
movl %ecx, -0x1c(%rbp)
movl $0x3, %esi
movl %esi, %edi
callq 0x694a0
movq %rax, -0x30(%rbp)
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2e819
movslq -0x20(%rbp), %rax
xorps %xmm0, %xmm0
movsd %xmm0, -0x50(%rbp,%rax,8)
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2e7fb
movq -0x180(%rbp), %rax
leaq -0x50(%rbp), %rdi
movq -0x30(%rbp), %rsi
movq -0x18(%rbp), %rdx
movl (%rax), %r8d
subl $0x1, %r8d
xorl %ecx, %ecx
movups (%rax), %xmm0
movups 0x10(%rax), %xmm1
movups 0x20(%rax), %xmm2
movq %rsp, %rax
movups %xmm2, 0x20(%rax)
movups %xmm1, 0x10(%rax)
movups %xmm0, (%rax)
xorl %ecx, %ecx
callq 0x307d0
cvtss2sd %xmm0, %xmm0
movsd %xmm0, -0x58(%rbp)
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2e88f
movslq -0x20(%rbp), %rax
movsd -0x50(%rbp,%rax,8), %xmm0
divsd -0x58(%rbp), %xmm0
movslq -0x20(%rbp), %rax
movsd %xmm0, -0x70(%rbp,%rax,8)
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2e865
cmpl $0x0, 0x5d5da(%rip)     # 0x8be70
je 0x2e8f3
leaq 0x4f12f(%rip), %rdi     # 0x7d9ce
movb $0x0, %al
callq 0x10d0
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2e8d6
movslq -0x20(%rbp), %rax
movsd -0x70(%rbp,%rax,8), %xmm0
leaq 0x4f11b(%rip), %rdi     # 0x7d9df
movb $0x1, %al
callq 0x10d0
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2e8ad
movsd -0x58(%rbp), %xmm0
leaq 0x4f104(%rip), %rdi     # 0x7d9e6
movb $0x1, %al
callq 0x10d0
movl $0x0, 0x5d57d(%rip)     # 0x8be70
movl $0x3, %esi
movl %esi, %edi
callq 0x694a0
movq %rax, -0x78(%rbp)
movq -0x78(%rbp), %rdi
movq -0x30(%rbp), %rsi
leaq -0x50(%rbp), %rdx
movsd -0x58(%rbp), %xmm0
callq 0x30340
movl $0x3, %esi
movl %esi, %edi
callq 0x694a0
movq %rax, -0x80(%rbp)
movq -0x80(%rbp), %rdi
movq -0x78(%rbp), %rsi
movl $0x3, %edx
callq 0x69540
xorps %xmm0, %xmm0
movsd %xmm0, -0x88(%rbp)
movl $0x3, %esi
movl %esi, %edi
callq 0x694a0
movq %rax, -0xa8(%rbp)
leaq -0xa0(%rbp), %rdi
movq -0x30(%rbp), %rsi
callq 0x30910
movq -0x8(%rbp), %rax
movslq -0xc(%rbp), %rcx
imulq $0x158, %rcx, %rcx      # imm = 0x158
addq %rcx, %rax
addq $-0x158, %rax           # imm = 0xFEA8
movq %rax, -0xb0(%rbp)
movl $0xffffffff, -0xb4(%rbp) # imm = 0xFFFFFFFF
movl $0x0, -0xb8(%rbp)
movl -0xc(%rbp), %eax
subl $0x1, %eax
movl %eax, -0xbc(%rbp)
cmpl $0x0, -0xbc(%rbp)
jl 0x2efe5
movq -0xb0(%rbp), %rax
movl 0x1c(%rax), %eax
cmpl -0xb4(%rbp), %eax
je 0x2e9ff
leaq -0xa0(%rbp), %rdi
movq -0x30(%rbp), %rsi
callq 0x30910
cvtss2sd %xmm0, %xmm0
movsd %xmm0, -0x88(%rbp)
movq -0xb0(%rbp), %rax
movl 0x1c(%rax), %eax
movl %eax, -0xb4(%rbp)
movl -0xb4(%rbp), %eax
movl %eax, -0xb8(%rbp)
movq -0x180(%rbp), %rax
leaq -0xa0(%rbp), %rdi
movq -0x30(%rbp), %rsi
movq -0x18(%rbp), %rdx
movq -0xb0(%rbp), %rcx
movl 0x18(%rcx), %ecx
movl -0xb8(%rbp), %r8d
movups (%rax), %xmm0
movups 0x10(%rax), %xmm1
movups 0x20(%rax), %xmm2
movq %rsp, %rax
movups %xmm2, 0x20(%rax)
movups %xmm1, 0x10(%rax)
movups %xmm0, (%rax)
callq 0x307d0
cvtss2sd %xmm0, %xmm0
addsd -0x88(%rbp), %xmm0
movsd %xmm0, -0x88(%rbp)
movq -0xa8(%rbp), %rdi
movq -0x30(%rbp), %rsi
leaq -0xa0(%rbp), %rdx
movsd -0x88(%rbp), %xmm0
callq 0x30340
movq -0xb0(%rbp), %rax
movl 0x18(%rax), %eax
subl $0x1, %eax
movl %eax, -0xb8(%rbp)
movsd -0x88(%rbp), %xmm0
xorps %xmm1, %xmm1
ucomisd %xmm1, %xmm0
jne 0x2eb58
jp 0x2eb58
movl -0xbc(%rbp), %esi
leaq 0x4ef3f(%rip), %rdi     # 0x7d9f1
movb $0x0, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
movl 0x18(%rax), %esi
movq -0xb0(%rbp), %rax
movl 0x1c(%rax), %edx
leaq 0x4ef51(%rip), %rdi     # 0x7da25
movb $0x0, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
movl 0x10(%rax), %esi
movq -0xb0(%rbp), %rax
movl 0x14(%rax), %edx
leaq 0x4ef49(%rip), %rdi     # 0x7da3f
movb $0x0, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
movl 0x20(%rax), %esi
movq -0xb0(%rbp), %rax
movl 0x24(%rax), %edx
leaq 0x4ef3b(%rip), %rdi     # 0x7da53
movb $0x0, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
cmpl $0x0, 0x28(%rax)
jl 0x2eb4a
movq -0xb0(%rbp), %rax
movl 0x28(%rax), %esi
movl -0xbc(%rbp), %edx
leaq 0x4ef23(%rip), %rdi     # 0x7da66
movb $0x0, %al
callq 0x10d0
leaq 0x4f527(%rip), %rdi     # 0x7e078
movb $0x0, %al
callq 0x10d0
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2ebbb
movsd -0x88(%rbp), %xmm0
movslq -0x20(%rbp), %rax
movsd -0x50(%rbp,%rax,8), %xmm2
movslq -0x20(%rbp), %rax
movsd -0xa0(%rbp,%rax,8), %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movslq -0x20(%rbp), %rax
movsd %xmm0, -0x100(%rbp,%rax,8)
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2eb5f
leaq -0xe0(%rbp), %rdi
movq -0xb0(%rbp), %rsi
addq $0x48, %rsi
leaq -0xa0(%rbp), %rdx
callq 0x14aa0
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2ec24
movslq -0x20(%rbp), %rax
movsd -0xe0(%rbp,%rax,8), %xmm0
divsd -0x88(%rbp), %xmm0
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
addsd 0x60(%rax,%rcx,8), %xmm0
movslq -0x20(%rbp), %rax
movsd %xmm0, -0xe0(%rbp,%rax,8)
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2ebe0
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2ec87
movsd -0x88(%rbp), %xmm0
movslq -0x20(%rbp), %rax
movsd -0x70(%rbp,%rax,8), %xmm2
movslq -0x20(%rbp), %rax
movsd -0xa0(%rbp,%rax,8), %xmm1
movq %xmm1, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm1
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movslq -0x20(%rbp), %rax
movsd %xmm0, -0x100(%rbp,%rax,8)
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2ec2b
leaq -0x160(%rbp), %rdi
leaq -0x100(%rbp), %rsi
leaq -0xe0(%rbp), %rdx
callq 0x14aa0
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2ed38
movl $0x0, -0x24(%rbp)
cmpl $0x3, -0x24(%rbp)
jge 0x2ed28
movq -0xa8(%rbp), %rax
movslq -0x20(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movslq -0x24(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm0
movq -0xb0(%rbp), %rax
movslq -0x24(%rbp), %rcx
movsd 0x48(%rax,%rcx,8), %xmm2
movslq -0x20(%rbp), %rax
movsd -0x160(%rbp,%rax,8), %xmm1
movq %xmm0, %rcx
movabsq $-0x8000000000000000, %rdx # imm = 0x8000000000000000
xorq %rdx, %rcx
movq %rcx, %xmm0
mulsd %xmm2, %xmm0
addsd %xmm1, %xmm0
movsd %xmm0, -0x160(%rbp,%rax,8)
movl -0x24(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x24(%rbp)
jmp 0x2ecb9
jmp 0x2ed2a
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2eca8
leaq -0x140(%rbp), %rdi
movq -0x80(%rbp), %rsi
leaq -0x160(%rbp), %rdx
movl $0x3, %ecx
callq 0x697c0
movq -0xb0(%rbp), %rdi
addq $0xa8, %rdi
movq -0x80(%rbp), %rsi
leaq -0x140(%rbp), %rdx
movl $0x3, %ecx
callq 0x698c0
leaq -0x120(%rbp), %rdi
movq -0xb0(%rbp), %rsi
addq $0xa8, %rsi
leaq -0x70(%rbp), %rdx
callq 0x14aa0
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2edff
movslq -0x20(%rbp), %rax
movsd -0xe0(%rbp,%rax,8), %xmm0
movq %xmm0, %rax
movabsq $-0x8000000000000000, %rcx # imm = 0x8000000000000000
xorq %rcx, %rax
movq %rax, %xmm0
mulsd -0x88(%rbp), %xmm0
divsd -0x58(%rbp), %xmm0
movslq -0x20(%rbp), %rax
subsd -0x120(%rbp,%rax,8), %xmm0
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
movsd %xmm0, 0x90(%rax,%rcx,8)
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2ed9c
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2ee90
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
movsd 0xa8(%rax,%rcx,8), %xmm0
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
addsd 0x48(%rax,%rcx,8), %xmm0
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
movsd %xmm0, 0xd8(%rax,%rcx,8)
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
movsd 0x90(%rax,%rcx,8), %xmm0
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
addsd 0x60(%rax,%rcx,8), %xmm0
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
movsd %xmm0, 0xc0(%rax,%rcx,8)
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2ee06
movsd -0x88(%rbp), %xmm0
movq -0xb0(%rbp), %rax
movsd %xmm0, 0xf0(%rax)
leaq -0xa0(%rbp), %rdi
leaq -0xa0(%rbp), %rsi
callq 0x14c00
movq -0xb0(%rbp), %rax
divsd 0xf0(%rax), %xmm0
movsd %xmm0, -0x168(%rbp)
movl $0x0, -0x20(%rbp)
cmpl $0x3, -0x20(%rbp)
jge 0x2efbd
movslq -0x20(%rbp), %rax
movsd -0xa0(%rbp,%rax,8), %xmm0
movq -0xb0(%rbp), %rax
movslq -0x20(%rbp), %rcx
movsd %xmm0, 0xf8(%rax,%rcx,8)
movl $0x0, -0x24(%rbp)
cmpl $0x3, -0x24(%rbp)
jge 0x2ef81
movq -0xa8(%rbp), %rax
movslq -0x20(%rbp), %rcx
movq (%rax,%rcx,8), %rax
movslq -0x24(%rbp), %rcx
movsd (%rax,%rcx,8), %xmm0
movslq -0x20(%rbp), %rax
movsd -0xa0(%rbp,%rax,8), %xmm1
movslq -0x24(%rbp), %rax
mulsd -0xa0(%rbp,%rax,8), %xmm1
movq -0xb0(%rbp), %rax
divsd 0xf0(%rax), %xmm1
subsd %xmm1, %xmm0
movq -0xb0(%rbp), %rax
addq $0x110, %rax            # imm = 0x110
movslq -0x20(%rbp), %rcx
imulq $0x18, %rcx, %rcx
addq %rcx, %rax
movslq -0x24(%rbp), %rcx
movsd %xmm0, (%rax,%rcx,8)
movl -0x24(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x24(%rbp)
jmp 0x2ef0a
movsd -0x168(%rbp), %xmm0
movq -0xb0(%rbp), %rax
addq $0x110, %rax            # imm = 0x110
movslq -0x20(%rbp), %rcx
imulq $0x18, %rcx, %rcx
addq %rcx, %rax
movslq -0x20(%rbp), %rcx
addsd (%rax,%rcx,8), %xmm0
movsd %xmm0, (%rax,%rcx,8)
movl -0x20(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x20(%rbp)
jmp 0x2eed8
movq -0xb0(%rbp), %rax
addq $-0x158, %rax           # imm = 0xFEA8
movq %rax, -0xb0(%rbp)
movl -0xbc(%rbp), %eax
addl $-0x1, %eax
movl %eax, -0xbc(%rbp)
jmp 0x2e9a8
leaq 0x6d3c0(%rip), %rax     # 0x9c3ac
cmpl $0x0, (%rax)
je 0x2f1c3
leaq 0x4ea78(%rip), %rdi     # 0x7da74
movb $0x0, %al
callq 0x10d0
leaq 0x4eaa1(%rip), %rdi     # 0x7daab
movb $0x0, %al
callq 0x10d0
movl $0x0, -0x28(%rbp)
movl -0x28(%rbp), %eax
cmpl -0xc(%rbp), %eax
jge 0x2f1c1
movq -0x8(%rbp), %rax
movslq -0x28(%rbp), %rcx
imulq $0x158, %rcx, %rcx      # imm = 0x158
addq %rcx, %rax
movq %rax, -0xb0(%rbp)
movl -0x28(%rbp), %esi
movq -0xb0(%rbp), %rax
movq 0x8(%rax), %rax
movq (%rax), %rax
movl 0x64(%rax), %edx
leaq 0x4ea77(%rip), %rdi     # 0x7dacf
movb $0x0, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
addq $0xd8, %rax
movq %rax, -0x170(%rbp)
movq -0x170(%rbp), %rdi
movq -0x170(%rbp), %rsi
callq 0x14c00
movsd %xmm0, -0x178(%rbp)
movsd -0x178(%rbp), %xmm0
callq 0x1220
leaq 0x4ea36(%rip), %rdi     # 0x7dad8
movb $0x1, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
addq $0xc0, %rax
movq %rax, -0x170(%rbp)
movq -0x170(%rbp), %rdi
movq -0x170(%rbp), %rsi
callq 0x14c00
movsd %xmm0, -0x178(%rbp)
movsd -0x178(%rbp), %xmm0
callq 0x1220
leaq 0x4e9f3(%rip), %rdi     # 0x7dadf
movb $0x1, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
addq $0xa8, %rax
movq %rax, -0x170(%rbp)
movq -0x170(%rbp), %rdi
movq -0x170(%rbp), %rsi
callq 0x14c00
movsd %xmm0, -0x178(%rbp)
movsd -0x178(%rbp), %xmm0
callq 0x1220
leaq 0x4e9a2(%rip), %rdi     # 0x7dad8
movb $0x1, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
addq $0x90, %rax
movq %rax, -0x170(%rbp)
movq -0x170(%rbp), %rdi
movq -0x170(%rbp), %rsi
callq 0x14c00
movsd %xmm0, -0x178(%rbp)
movsd -0x178(%rbp), %xmm0
callq 0x1220
leaq 0x4e95f(%rip), %rdi     # 0x7dadf
movb $0x1, %al
callq 0x10d0
movq -0xb0(%rbp), %rax
movl 0x18(%rax), %esi
movq -0xb0(%rbp), %rax
movl 0x10(%rax), %edx
movq -0xb0(%rbp), %rax
movsbl (%rax), %ecx
leaq 0x4e93a(%rip), %rdi     # 0x7dae6
movb $0x0, %al
callq 0x10d0
movl -0x28(%rbp), %eax
addl $0x1, %eax
movl %eax, -0x28(%rbp)
jmp 0x2f018
jmp 0x2f1c3
movq -0x30(%rbp), %rdi
movl $0x3, %esi
callq 0x692a0
movq -0xa8(%rbp), %rdi
movl $0x3, %esi
callq 0x692a0
movq -0x78(%rbp), %rdi
movl $0x3, %esi
callq 0x692a0
movq -0x80(%rbp), %rdi
movl $0x3, %esi
callq 0x692a0
addq $0x1b0, %rsp            # imm = 0x1B0
popq %rbp
retq
nopw (%rax,%rax)