user: Translate the below assembly code into C programming language:

```asm
<glassofast>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  lea    -0x19a000(%rsp),%r11
L706:
  sub    $0x1000,%rsp
  orq    $0x0,(%rsp)
  cmp    %r11,%rsp
  jne    L706
  sub    $0x340,%rsp
  mov    %edi,-0x19a304(%rbp)
  mov    %rsi,-0x19a310(%rbp)
  mov    %rdx,-0x19a318(%rbp)
  movsd  %xmm0,-0x19a320(%rbp)
  mov    %ecx,-0x19a308(%rbp)
  mov    %r8d,-0x19a324(%rbp)
  mov    %r9d,-0x19a328(%rbp)
  mov    0x10(%rbp),%rax
  mov    %rax,-0x19a330(%rbp)
  mov    0x18(%rbp),%rax
  mov    %rax,-0x19a338(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0x19a2ec(%rbp)
  pxor   %xmm0,%xmm0
  movsd  %xmm0,-0x19a2c8(%rbp)
  jmp    L841
L641:
  movl   $0x0,-0x19a2e4(%rbp)
  jmp    L567
L457:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a310(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2e4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movq   D132(%rip),%xmm1
  andpd  %xmm1,%xmm0
  movsd  -0x19a2c8(%rbp),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2c8(%rbp)
  addl   $0x1,-0x19a2e4(%rbp)
L567:
  mov    -0x19a2e4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L457
  addl   $0x1,-0x19a2ec(%rbp)
L841:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L641
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L764
L542:
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a310(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movq   D132(%rip),%xmm1
  andpd  %xmm0,%xmm1
  movsd  -0x19a2c8(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2c8(%rbp)
  addl   $0x1,-0x19a2f4(%rbp)
L764:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L542
  pxor   %xmm0,%xmm0
  ucomisd -0x19a2c8(%rbp),%xmm0
  jp     L342
  pxor   %xmm0,%xmm0
  ucomisd -0x19a2c8(%rbp),%xmm0
  jne    L342
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L521
L721:
  movl   $0x0,-0x19a2e4(%rbp)
  jmp    L597
L529:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2e4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  pxor   %xmm0,%xmm0
  movsd  %xmm0,(%rax)
  mov    -0x19a2ec(%rbp),%edx
  movslq %edx,%rdx
  lea    0x0(,%rdx,8),%rcx
  mov    -0x19a338(%rbp),%rdx
  add    %rcx,%rdx
  mov    (%rdx),%rcx
  mov    -0x19a2e4(%rbp),%edx
  movslq %edx,%rdx
  shl    $0x3,%rdx
  add    %rcx,%rdx
  movsd  (%rax),%xmm0
  movsd  %xmm0,(%rdx)
  addl   $0x1,-0x19a2e4(%rbp)
L597:
  mov    -0x19a2e4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L529
  addl   $0x1,-0x19a2ec(%rbp)
L521:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L721
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L281
L79:
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a318(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  addsd  %xmm1,%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x19a2f4(%rbp)
L281:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L79
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L248
L439:
  movl   $0x0,-0x19a2e4(%rbp)
  jmp    L316
L377:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2e4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  pxor   %xmm0,%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x19a2e4(%rbp)
L316:
  mov    -0x19a2e4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L377
  addl   $0x1,-0x19a2ec(%rbp)
L248:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L439
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L694
L786:
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  comisd D98(%rip),%xmm0
  jbe    L405
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  jmp    L600
L405:
  movsd  D98(%rip),%xmm0
L600:
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  D23(%rip),%xmm1
  divsd  %xmm0,%xmm1
  movsd  %xmm1,(%rax)
  addl   $0x1,-0x19a2f4(%rbp)
L694:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L786
  mov    $0x0,%eax
  jmp    L750
L342:
  mov    -0x19a304(%rbp),%eax
  sub    $0x1,%eax
  pxor   %xmm1,%xmm1
  cvtsi2sd %eax,%xmm1
  movsd  -0x19a320(%rbp),%xmm0
  divsd  %xmm1,%xmm0
  movsd  -0x19a2c8(%rbp),%xmm1
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2c8(%rbp)
  pxor   %xmm1,%xmm1
  cvtsi2sdl -0x19a304(%rbp),%xmm1
  movsd  -0x19a2c8(%rbp),%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2b8(%rbp)
  movsd  D67(%rip),%xmm0
  comisd -0x19a2b8(%rbp),%xmm0
  jbe    L323
  movsd  D67(%rip),%xmm0
  movsd  %xmm0,-0x19a2b8(%rbp)
L323:
  cmpl   $0x0,-0x19a328(%rbp)
  jne    L624
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L138
L519:
  movl   $0x0,-0x19a2e4(%rbp)
  jmp    L613
L371:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a310(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2e4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rax,%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rcx
  mov    -0x19a338(%rbp),%rax
  add    %rcx,%rax
  mov    (%rax),%rcx
  mov    -0x19a2e4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rcx,%rax
  movsd  (%rdx),%xmm0
  movsd  %xmm0,(%rax)
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2e4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  pxor   %xmm0,%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x19a2e4(%rbp)
L613:
  mov    -0x19a2e4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L371
  addl   $0x1,-0x19a2ec(%rbp)
L138:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L519
  jmp    L123
L624:
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L183
L703:
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L522
L125:
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movq   D4(%rip),%xmm1
  xorpd  %xmm1,%xmm0
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  divsd  %xmm1,%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x19a2ec(%rbp)
L522:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L125
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  pxor   %xmm0,%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x19a2f4(%rbp)
L183:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L703
L123:
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L108
L122:
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a310(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a318(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  addsd  %xmm1,%xmm0
  mov    -0x19a2f4(%rbp),%eax
  cltq
  movsd  %xmm0,-0x19a290(%rbp,%rax,8)
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rax,%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  movsd  -0x19a290(%rbp,%rax,8),%xmm0
  movsd  %xmm0,(%rdx)
  addl   $0x1,-0x19a2f4(%rbp)
L108:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L122
  movl   $0x1,-0x19a2e8(%rbp)
  jmp    L134
L401:
  pxor   %xmm0,%xmm0
  movsd  %xmm0,-0x19a2d0(%rbp)
  movl   $0x0,-0x19a2f0(%rbp)
  jmp    L263
L313:
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L72
L91:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  pxor   %xmm0,%xmm0
  movsd  %xmm0,-0xcd150(%rbp,%rax,8)
  addl   $0x1,-0x19a2ec(%rbp)
L72:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L91
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L57
L666:
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  pxor   %xmm1,%xmm1
  ucomisd %xmm1,%xmm0
  jp     L322
  pxor   %xmm1,%xmm1
  ucomisd %xmm1,%xmm0
  je     L124
L322:
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L535
L49:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  movsd  -0xcd150(%rbp,%rax,8),%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm2
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  mov    -0x19a2ec(%rbp),%eax
  cltq
  movsd  %xmm0,-0xcd150(%rbp,%rax,8)
  addl   $0x1,-0x19a2ec(%rbp)
L535:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L49
L124:
  addl   $0x1,-0x19a2f4(%rbp)
L57:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L666
L719:
  pxor   %xmm0,%xmm0
  movsd  %xmm0,-0x19a2d8(%rbp)
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L140
L175:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a2f0(%rbp),%eax
  je     L651
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a318(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  movsd  D173(%rip),%xmm0
  comisd %xmm1,%xmm0
  jbe    L651
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a310(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mov    -0x19a2f4(%rbp),%eax
  cltq
  movsd  -0xcd150(%rbp,%rax,8),%xmm2
  movapd %xmm0,%xmm1
  subsd  %xmm2,%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  movsd  -0x19a290(%rbp,%rax,8),%xmm2
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2b0(%rbp)
  movsd  -0x19a2b0(%rbp),%xmm0
  movq   D132(%rip),%xmm1
  andpd  %xmm1,%xmm0
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a318(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2a8(%rbp)
  pxor   %xmm0,%xmm0
  comisd -0x19a2a8(%rbp),%xmm0
  jb     L736
  pxor   %xmm0,%xmm0
  movsd  %xmm0,-0x19a2e0(%rbp)
  jmp    L623
L736:
  movsd  -0x19a2b0(%rbp),%xmm0
  pxor   %xmm1,%xmm1
  comisd %xmm1,%xmm0
  jb     L259
  mov    -0x19a2f4(%rbp),%eax
  cltq
  movsd  -0x19a290(%rbp,%rax,8),%xmm1
  movsd  -0x19a2a8(%rbp),%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2e0(%rbp)
  jmp    L623
L259:
  movsd  -0x19a2a8(%rbp),%xmm0
  movq   D4(%rip),%xmm1
  xorpd  %xmm1,%xmm0
  mov    -0x19a2f4(%rbp),%eax
  cltq
  movsd  -0x19a290(%rbp,%rax,8),%xmm1
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2e0(%rbp)
L623:
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  movsd  -0x19a2e0(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2a0(%rbp)
  pxor   %xmm0,%xmm0
  ucomisd -0x19a2a0(%rbp),%xmm0
  jp     L814
  pxor   %xmm0,%xmm0
  ucomisd -0x19a2a0(%rbp),%xmm0
  je     L651
L814:
  cmpl   $0x0,-0x19a324(%rbp)
  je     L458
  movsd  -0x19a2a0(%rbp),%xmm0
  movq   D132(%rip),%xmm1
  andpd  %xmm1,%xmm0
  comisd D53(%rip),%xmm0
  jbe    L651
L458:
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  -0x19a2e0(%rbp),%xmm0
  movsd  %xmm0,(%rax)
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L162
L394:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  movsd  -0xcd150(%rbp,%rax,8),%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mulsd  -0x19a2a0(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  mov    -0x19a2ec(%rbp),%eax
  cltq
  movsd  %xmm0,-0xcd150(%rbp,%rax,8)
  addl   $0x1,-0x19a2ec(%rbp)
L162:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L394
  movsd  -0x19a2a0(%rbp),%xmm0
  movq   D132(%rip),%xmm1
  andpd  %xmm1,%xmm0
  comisd -0x19a2d8(%rbp),%xmm0
  jbe    L651
  movsd  -0x19a2a0(%rbp),%xmm0
  movq   D132(%rip),%xmm1
  andpd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2d8(%rbp)
L651:
  addl   $0x1,-0x19a2f4(%rbp)
L140:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L175
  movsd  -0x19a2b8(%rbp),%xmm0
  comisd -0x19a2d8(%rbp),%xmm0
  ja     L485
  jmp    L719
L485:
  nop
  mov    -0x19a2f0(%rbp),%eax
  cltq
  movsd  -0x19a290(%rbp,%rax,8),%xmm0
  mov    -0x19a2f0(%rbp),%eax
  cltq
  movsd  %xmm0,-0xcd150(%rbp,%rax,8)
  movl   $0x0,-0x19a2ec(%rbp)
  pxor   %xmm0,%xmm0
  movsd  %xmm0,-0x19a2c0(%rbp)
  jmp    L355
L712:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  movsd  -0xcd150(%rbp,%rax,8),%xmm0
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  subsd  %xmm1,%xmm0
  movq   D132(%rip),%xmm1
  andpd  %xmm1,%xmm0
  movsd  -0x19a2c0(%rbp),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2c0(%rbp)
  addl   $0x1,-0x19a2ec(%rbp)
L355:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L712
  movsd  -0x19a2c0(%rbp),%xmm0
  comisd -0x19a2d0(%rbp),%xmm0
  jbe    L606
  movsd  -0x19a2c0(%rbp),%xmm0
  movsd  %xmm0,-0x19a2d0(%rbp)
L606:
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L440
L787:
  mov    -0x19a2f0(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rax,%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  movsd  -0xcd150(%rbp,%rax,8),%xmm0
  movsd  %xmm0,(%rdx)
  addl   $0x1,-0x19a2ec(%rbp)
L440:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L787
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L185
L804:
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f0(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rax,%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  movsd  -0xcd150(%rbp,%rax,8),%xmm0
  movsd  %xmm0,(%rdx)
  addl   $0x1,-0x19a2ec(%rbp)
L185:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L804
  addl   $0x1,-0x19a2f0(%rbp)
L263:
  mov    -0x19a2f0(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L313
  movsd  -0x19a2c8(%rbp),%xmm0
  comisd -0x19a2d0(%rbp),%xmm0
  jae    L464
  addl   $0x1,-0x19a2e8(%rbp)
L134:
  mov    -0x19a2e8(%rbp),%eax
  cmp    -0x19a308(%rbp),%eax
  jle    L401
  jmp    L130
L464:
  nop
L130:
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L156
L201:
  movl   $0x0,-0x19a2ec(%rbp)
  pxor   %xmm0,%xmm0
  movsd  %xmm0,-0x19a2c0(%rbp)
  jmp    L271
L499:
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a338(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  -0x19a2c0(%rbp),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a2c0(%rbp)
  addl   $0x1,-0x19a2ec(%rbp)
L271:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L499
  mov    -0x19a2f4(%rbp),%eax
  cltq
  movsd  -0x19a290(%rbp,%rax,8),%xmm0
  movapd %xmm0,%xmm1
  subsd  -0x19a2c0(%rbp),%xmm1
  movsd  D23(%rip),%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x19a298(%rbp)
  movl   $0x0,-0x19a2ec(%rbp)
  jmp    L579
L820:
  movsd  -0x19a298(%rbp),%xmm0
  movq   D4(%rip),%xmm1
  xorpd  %xmm0,%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x19a2ec(%rbp)
L579:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L820
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  -0x19a298(%rbp),%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x19a2f4(%rbp)
L156:
  mov    -0x19a2f4(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L201
  movl   $0x0,-0x19a2f4(%rbp)
  jmp    L246
L193:
  mov    -0x19a2f4(%rbp),%eax
  add    $0x1,%eax
  mov    %eax,-0x19a2ec(%rbp)
  jmp    L99
L779:
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  addsd  %xmm0,%xmm1
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rdx,%rax
  movsd  D25(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,(%rax)
  mov    -0x19a2f4(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x19a330(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rax,%rdx
  mov    -0x19a2ec(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rcx
  mov    -0x19a330(%rbp),%rax
  add    %rcx,%rax
  mov    (%rax),%rcx
  mov    -0x19a2f4(%rbp),%eax
  cltq
  shl    $0x3,%rax
  add    %rcx,%rax
  movsd  (%rdx),%xmm0
  movsd  %xmm0,(%rax)
  addl   $0x1,-0x19a2ec(%rbp)
L99:
  mov    -0x19a2ec(%rbp),%eax
  cmp    -0x19a304(%rbp),%eax
  jl     L779
  addl   $0x1,-0x19a2f4(%rbp)
L246:
  mov    -0x19a304(%rbp),%eax
  sub    $0x1,%eax
  cmp    %eax,-0x19a2f4(%rbp)
  jl     L193
  mov    -0x19a2e8(%rbp),%eax
L750:
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L269
  call   <__stack_chk_fail@plt>
L269:
  leave
  ret
```

tool_calls: name: disassemble_data
arguments: data_tag: D132
type: qword
name: disassemble_data
arguments: data_tag: D98
type: byte[16]
name: disassemble_data
arguments: data_tag: D23
type: f64
name: disassemble_data
arguments: data_tag: D67
type: byte[8]
name: disassemble_data
arguments: data_tag: D4
type: f32[2]
name: disassemble_data
arguments: data_tag: D173
type: f64
name: disassemble_data
arguments: data_tag: D53
type: byte[16]
name: disassemble_data
arguments: data_tag: D25
type: f64

tool: D132: 9223372036854775807

tool: {"D98": [0xb1,0xde,0x64,0xc8,0xda,0xd0,0xd3,0x3c,0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0x3f]}

tool: D23: 1

tool: {"D67": [0xb1,0xde,0x64,0xc8,0xda,0xd0,0xe3,0x3c]}

tool: {"D4": [0.0,-0.0]}

tool: D173: 1000000000

tool: {"D53": [0x8d,0xed,0xb5,0xa0,0xf7,0xc6,0xb0,0x3e,0x00,0x00,0x00,0x00,0x00,0x00,0xe0,0x3f]}

tool: D25: 0.5

assistant: ```c
int glassofast(const int n, double **S, double **L, const double thr, const int maxit, int approxflg, int warm, double **X, double **W) {
  int i, j, ii, iter, jj;
  double a, b, c, delta, dlx, dw, shr, sum, thrlasso, tmp, wd[5000 * 21], wxj[5000 * 21];
  for (shr = ii = 0; ii < n; ii++)
    for (jj = 0; jj < n; jj++)
      shr += fabs(S[ii][jj]);
  for (i = 0; i < n; i++)
    shr -= fabs(S[i][i]);
  if (shr == 0.0) {
    for (ii = 0; ii < n; ii++)
      for (jj = 0; jj < n; jj++)
        W[ii][jj] = X[ii][jj] = 0.0;
    for (i = 0; i < n; i++)
      W[i][i] = W[i][i] + L[i][i];
    for (ii = 0; ii < n; ii++)
      for (jj = 0; jj < n; jj++)
        X[ii][jj] = 0.0;
    for (i = 0; i < n; i++)
      X[i][i] = 1.0 / ((W[i][i]) > ((1.1e-15)) ? (W[i][i]) : ((1.1e-15)));
    return 0;
  }
  shr *= thr / (n - 1);
  thrlasso = shr / n;
  if (thrlasso < 2 * (1.1e-15))
    thrlasso = 2 * (1.1e-15);
  if (!warm) {
    for (ii = 0; ii < n; ii++)
      for (jj = 0; jj < n; jj++) {
        W[ii][jj] = S[ii][jj];
        X[ii][jj] = 0.0;
      }
  } else {
    for (i = 0; i < n; i++) {
      for (ii = 0; ii < n; ii++)
        X[i][ii] = -X[i][ii] / X[i][i];
      X[i][i] = 0.0;
    }
  }
  for (i = 0; i < n; i++) {
    wd[i] = S[i][i] + L[i][i];
    W[i][i] = wd[i];
  }
  for (iter = 1; iter <= maxit; iter++) {
    dw = 0.0;
#pragma omp parallel for default(shared) private(i, j, ii, wxj, a, b, c, dlx, delta, sum)
    for (j = 0; j < n; j++) {
      for (ii = 0; ii < n; ii++)
        wxj[ii] = 0.0;
      for (i = 0; i < n; i++)
        if (X[j][i] != 0.0)
          for (ii = 0; ii < n; ii++)
            wxj[ii] += W[i][ii] * X[j][i];
      for (;;) {
        dlx = 0.0;
        for (i = 0; i < n; i++) {
          if (i != j && L[j][i] < (1e9)) {
            a = S[j][i] - wxj[i] + wd[i] * X[j][i];
            b = fabs(a) - L[j][i];
            if (b <= 0.0)
              c = 0.0;
            else if (a >= 0.0)
              c = b / wd[i];
            else
              c = -b / wd[i];
            delta = c - X[j][i];
            if (delta != 0.0 && (!approxflg || fabs(delta) > 1e-6)) {
              X[j][i] = c;
              for (ii = 0; ii < n; ii++)
                wxj[ii] += W[i][ii] * delta;
              if (fabs(delta) > dlx)
                dlx = fabs(delta);
            }
          }
        }
        if (dlx < thrlasso)
          break;
      }
      wxj[j] = wd[j];
      for (sum = ii = 0; ii < n; ii++)
        sum += fabs(wxj[ii] - W[j][ii]);
#pragma omp critical
      if (sum > dw)
        dw = sum;
      for (ii = 0; ii < n; ii++)
        W[j][ii] = wxj[ii];
      for (ii = 0; ii < n; ii++)
        W[ii][j] = wxj[ii];
    }
    if (dw <= shr)
      break;
  }
  for (i = 0; i < n; i++) {
    for (sum = ii = 0; ii < n; ii++)
      sum += X[i][ii] * W[i][ii];
    tmp = 1.0 / (wd[i] - sum);
    for (ii = 0; ii < n; ii++)
      X[i][ii] = -tmp * X[i][ii];
    X[i][i] = tmp;
  }
  for (i = 0; i < n - 1; i++) {
    for (ii = i + 1; ii < n; ii++) {
      X[i][ii] = 0.5 * (X[i][ii] + X[ii][i]);
      X[ii][i] = X[i][ii];
    }
  }
  return iter;
}
```