user: What would the C source look like for the assembly code provided here:

```asm
<tm_world_recur_>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0xe0,%rsp
  mov    %rdi,-0x68(%rbp)
  mov    %rsi,-0x70(%rbp)
  mov    %rdx,-0x78(%rbp)
  mov    %rcx,-0x80(%rbp)
  mov    %r8,-0x88(%rbp)
  mov    %r9,-0x90(%rbp)
  mov    0x10(%rbp),%rax
  mov    %rax,-0x98(%rbp)
  mov    0x18(%rbp),%rax
  mov    %rax,-0xa0(%rbp)
  mov    0x20(%rbp),%rax
  mov    %rax,-0xa8(%rbp)
  mov    0x28(%rbp),%rax
  mov    %rax,-0xb0(%rbp)
  mov    0x30(%rbp),%rax
  mov    %rax,-0xb8(%rbp)
  mov    0x38(%rbp),%rax
  mov    %rax,-0xc0(%rbp)
  mov    0x40(%rbp),%rax
  mov    %rax,-0xc8(%rbp)
  mov    0x48(%rbp),%rax
  mov    %rax,-0xd0(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  mov    -0x70(%rbp),%rax
  mov    (%rax),%eax
  mov    %eax,-0x5c(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xa0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  mov    %eax,-0x48(%rbp)
  mov    -0x80(%rbp),%rax
  mov    (%rax),%edx
  mov    -0x5c(%rbp),%eax
  cmp    %eax,%edx
  setl   %al
  movzbl %al,%eax
  mov    %eax,-0x44(%rbp)
  cmpl   $0x0,-0x44(%rbp)
  je     L332
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  setne  %al
  movzbl %al,%eax
  mov    %eax,-0x44(%rbp)
  cmpl   $0x0,-0x44(%rbp)
  je     L332
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x98(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  cmp    $0x1,%eax
  je     L55
  cmp    $0x2,%eax
  je     L112
  jmp    L180
L55:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xa8(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  cvttsd2si %xmm0,%ecx
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  lea    -0x1(%rax),%edx
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rsi
  mov    -0xb0(%rbp),%rax
  add    %rsi,%rax
  movsd  (%rax),%xmm0
  cvttsd2si %xmm0,%eax
  imul   %edx,%eax
  add    %ecx,%eax
  mov    %eax,-0x58(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xd0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  jne    L218
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x2,%eax
  jne    L444
L218:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  lea    (%rdx,%rax,1),%rsi
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%rdi
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rdx
  lea    -0x58(%rbp),%rax
  push   -0xd0(%rbp)
  push   -0xc8(%rbp)
  push   -0xc0(%rbp)
  push   -0xb8(%rbp)
  push   -0xb0(%rbp)
  push   -0xa8(%rbp)
  push   -0xa0(%rbp)
  push   -0x98(%rbp)
  mov    %r8,%r9
  mov    %rdi,%r8
  mov    %rax,%rdi
  call   <tm_world_recur_>
  add    $0x40,%rsp
  movq   %xmm0,%rax
  mov    %rax,-0x20(%rbp)
  jmp    L313
L444:
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x1,%eax
  jne    L483
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xa8(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  cvttsd2si %xmm0,%ecx
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  lea    -0x2(%rax),%edx
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rsi
  mov    -0xb0(%rbp),%rax
  add    %rsi,%rax
  movsd  (%rax),%xmm0
  cvttsd2si %xmm0,%eax
  imul   %edx,%eax
  add    %ecx,%eax
  mov    %eax,-0x54(%rbp)
  mov    -0x58(%rbp),%eax
  mov    %eax,-0x38(%rbp)
  jmp    L231
L483:
  mov    -0x58(%rbp),%eax
  mov    %eax,-0x54(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xa8(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  cvttsd2si %xmm0,%ecx
  mov    -0x68(%rbp),%rax
  mov    (%rax),%edx
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rsi
  mov    -0xb0(%rbp),%rax
  add    %rsi,%rax
  movsd  (%rax),%xmm0
  cvttsd2si %xmm0,%eax
  imul   %edx,%eax
  add    %ecx,%eax
  mov    %eax,-0x38(%rbp)
L231:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xa0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  mov    %eax,-0x40(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  add    %rdx,%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <tm_its_subspan_modulo_int_@plt>
  mov    %eax,-0x3c(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xc0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  je     L164
  cmpl   $0x0,-0x3c(%rbp)
  je     L164
  mov    -0x54(%rbp),%eax
  test   %eax,%eax
  je     L194
  mov    -0x54(%rbp),%eax
  cmp    $0xffffffff,%eax
  jne    L25
L194:
  movl   $0x1,-0x30(%rbp)
  movl   $0x1,-0x54(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  lea    (%rdx,%rax,1),%rsi
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%rdi
  mov    -0x80(%rbp),%rcx
  lea    -0x30(%rbp),%rdx
  lea    -0x54(%rbp),%rax
  push   -0xd0(%rbp)
  push   -0xc8(%rbp)
  push   -0xc0(%rbp)
  push   -0xb8(%rbp)
  push   -0xb0(%rbp)
  push   -0xa8(%rbp)
  push   -0xa0(%rbp)
  push   -0x98(%rbp)
  mov    %r8,%r9
  mov    %rdi,%r8
  mov    %rax,%rdi
  call   <tm_world_recur_>
  add    $0x40,%rsp
  movq   %xmm0,%rax
  mov    %rax,-0x20(%rbp)
  movsd  -0x20(%rbp),%xmm0
  jmp    L233
L25:
  mov    -0x40(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    -0x38(%rbp),%eax
  cmp    %eax,%edx
  jne    L164
  movl   $0x3,-0x30(%rbp)
  mov    -0x40(%rbp),%eax
  mov    %eax,-0x38(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  lea    (%rdx,%rax,1),%rsi
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%rdi
  mov    -0x80(%rbp),%rcx
  lea    -0x30(%rbp),%rdx
  lea    -0x38(%rbp),%rax
  push   -0xd0(%rbp)
  push   -0xc8(%rbp)
  push   -0xc0(%rbp)
  push   -0xb8(%rbp)
  push   -0xb0(%rbp)
  push   -0xa8(%rbp)
  push   -0xa0(%rbp)
  push   -0x98(%rbp)
  mov    %r8,%r9
  mov    %rdi,%r8
  mov    %rax,%rdi
  call   <tm_world_recur_>
  add    $0x40,%rsp
  movq   %xmm0,%rax
  mov    %rax,-0x20(%rbp)
  movsd  -0x20(%rbp),%xmm0
  jmp    L233
L164:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xc0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  jne    L544
  mov    -0x54(%rbp),%eax
  test   %eax,%eax
  jle    L81
  mov    -0x38(%rbp),%eax
  cmp    %eax,-0x40(%rbp)
  jl     L81
L544:
  movl   $0x2,-0x30(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  lea    (%rdx,%rax,1),%rsi
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%rdi
  mov    -0x80(%rbp),%rcx
  lea    -0x30(%rbp),%rdx
  lea    -0x54(%rbp),%rax
  push   -0xd0(%rbp)
  push   -0xc8(%rbp)
  push   -0xc0(%rbp)
  push   -0xb8(%rbp)
  push   -0xb0(%rbp)
  push   -0xa8(%rbp)
  push   -0xa0(%rbp)
  push   -0x98(%rbp)
  mov    %r8,%r9
  mov    %rdi,%r8
  mov    %rax,%rdi
  call   <tm_world_recur_>
  add    $0x40,%rsp
  movsd  %xmm0,-0xd8(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  lea    (%rdx,%rax,1),%rsi
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%rdi
  mov    -0x80(%rbp),%rcx
  lea    -0x30(%rbp),%rdx
  lea    -0x38(%rbp),%rax
  push   -0xd0(%rbp)
  push   -0xc8(%rbp)
  push   -0xc0(%rbp)
  push   -0xb8(%rbp)
  push   -0xb0(%rbp)
  push   -0xa8(%rbp)
  push   -0xa0(%rbp)
  push   -0x98(%rbp)
  mov    %r8,%r9
  mov    %rdi,%r8
  mov    %rax,%rdi
  call   <tm_world_recur_>
  add    $0x40,%rsp
  movsd  -0xd8(%rbp),%xmm1
  addsd  %xmm0,%xmm1
  movsd  D41(%rip),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  %xmm0,-0x20(%rbp)
  jmp    L313
L81:
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x1,%eax
  jne    L414
  movl   $0x1,-0x58(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  lea    (%rdx,%rax,1),%rsi
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%rdi
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rdx
  lea    -0x58(%rbp),%rax
  push   -0xd0(%rbp)
  push   -0xc8(%rbp)
  push   -0xc0(%rbp)
  push   -0xb8(%rbp)
  push   -0xb0(%rbp)
  push   -0xa8(%rbp)
  push   -0xa0(%rbp)
  push   -0x98(%rbp)
  mov    %r8,%r9
  mov    %rdi,%r8
  mov    %rax,%rdi
  call   <tm_world_recur_>
  add    $0x40,%rsp
  movq   %xmm0,%rax
  mov    %rax,-0x20(%rbp)
  jmp    L34
L414:
  mov    -0x40(%rbp),%eax
  mov    %eax,-0x58(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x90(%rbp),%rax
  lea    (%rdx,%rax,1),%rsi
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%rdi
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rdx
  lea    -0x58(%rbp),%rax
  push   -0xd0(%rbp)
  push   -0xc8(%rbp)
  push   -0xc0(%rbp)
  push   -0xb8(%rbp)
  push   -0xb0(%rbp)
  push   -0xa8(%rbp)
  push   -0xa0(%rbp)
  push   -0x98(%rbp)
  mov    %r8,%r9
  mov    %rdi,%r8
  mov    %rax,%rdi
  call   <tm_world_recur_>
  add    $0x40,%rsp
  movq   %xmm0,%rax
  mov    %rax,-0x20(%rbp)
  jmp    L34
L313:
  jmp    L34
L112:
  mov    -0x90(%rbp),%r8
  mov    -0x88(%rbp),%rdi
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rdx
  mov    -0x70(%rbp),%rsi
  mov    -0x68(%rbp),%rax
  push   -0xd0(%rbp)
  push   -0xc8(%rbp)
  push   -0xc0(%rbp)
  push   -0xb8(%rbp)
  push   -0xb0(%rbp)
  push   -0xa8(%rbp)
  push   -0xa0(%rbp)
  push   -0x98(%rbp)
  mov    %r8,%r9
  mov    %rdi,%r8
  mov    %rax,%rdi
  call   <tm_world_recur_>
  add    $0x40,%rsp
  movq   %xmm0,%rax
  mov    %rax,-0x20(%rbp)
  jmp    L34
L180:
  movsd  D6(%rip),%xmm0
  movsd  %xmm0,-0x20(%rbp)
L34:
  movsd  -0x20(%rbp),%xmm0
  jmp    L233
L332:
  lea    -0x5c(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <tm_its_subspan_modulo_int_@plt>
  test   %eax,%eax
  je     L288
  addl   $0x1,-0x48(%rbp)
L288:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xc0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  je     L98
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  sub    $0x1,%eax
  cltd
  idivl  -0x48(%rbp)
  mov    %edx,%eax
  add    $0x1,%eax
  mov    %eax,-0x50(%rbp)
  cmpl   $0x0,-0x50(%rbp)
  jg     L226
  mov    -0x48(%rbp),%eax
  add    %eax,-0x50(%rbp)
  jmp    L226
L98:
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  mov    $0x1,%edx
  test   %eax,%eax
  cmovle %edx,%eax
  mov    -0x48(%rbp),%edx
  cmp    %eax,%edx
  cmovle %edx,%eax
  mov    %eax,-0x50(%rbp)
L226:
  lea    -0x5c(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <tm_its_subspan_modulo_int_@plt>
  test   %eax,%eax
  je     L503
  mov    -0x50(%rbp),%eax
  cmp    -0x48(%rbp),%eax
  jne    L503
  lea    -0x30(%rbp),%rdx
  lea    -0x38(%rbp),%rcx
  lea    -0x5c(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <tm_ww_axlims_@plt>
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x1,%eax
  jne    L262
  movsd  -0x30(%rbp),%xmm0
  movsd  %xmm0,-0x28(%rbp)
  jmp    L468
L262:
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x2,%eax
  jne    L39
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xc8(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  movsd  -0x38(%rbp),%xmm0
  addsd  %xmm0,%xmm1
  movsd  -0x30(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movsd  D45(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movsd  %xmm0,-0x28(%rbp)
  jmp    L468
L39:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xc8(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  movsd  -0x38(%rbp),%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x28(%rbp)
L468:
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  test   %eax,%eax
  jg     L84
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  cltd
  idivl  -0x48(%rbp)
  sub    $0x1,%eax
  mov    %eax,-0x4c(%rbp)
  jmp    L525
L84:
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  sub    $0x1,%eax
  cltd
  idivl  -0x48(%rbp)
  mov    %eax,-0x4c(%rbp)
L525:
  pxor   %xmm1,%xmm1
  cvtsi2sdl -0x4c(%rbp),%xmm1
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xc8(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  -0x28(%rbp),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x20(%rbp)
  jmp    L190
L503:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xd0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  je     L161
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xa8(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm1
  mov    -0x50(%rbp),%eax
  sub    $0x1,%eax
  pxor   %xmm2,%xmm2
  cvtsi2sd %eax,%xmm2
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xb0(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  mulsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x18(%rbp)
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0xb0(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movsd  %xmm0,-0x10(%rbp)
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x1,%eax
  jne    L12
  movsd  -0x10(%rbp),%xmm0
  movsd  D45(%rip),%xmm2
  movapd %xmm0,%xmm1
  divsd  %xmm2,%xmm1
  movsd  -0x18(%rbp),%xmm0
  subsd  %xmm1,%xmm0
  movsd  %xmm0,-0x28(%rbp)
  jmp    L168
L12:
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x2,%eax
  jne    L175
  movsd  -0x18(%rbp),%xmm0
  movsd  %xmm0,-0x28(%rbp)
  jmp    L168
L175:
  movsd  -0x10(%rbp),%xmm0
  movsd  D45(%rip),%xmm1
  divsd  %xmm1,%xmm0
  movsd  -0x18(%rbp),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x28(%rbp)
L168:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xc0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  je     L273
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  test   %eax,%eax
  jg     L556
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  cltd
  idivl  -0x48(%rbp)
  sub    $0x1,%eax
  mov    %eax,-0x4c(%rbp)
  jmp    L33
L556:
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  sub    $0x1,%eax
  cltd
  idivl  -0x48(%rbp)
  mov    %eax,-0x4c(%rbp)
L33:
  lea    -0x5c(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <tm_modulo_axlen_@plt>
  imul   -0x4c(%rbp),%eax
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movsd  -0x28(%rbp),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x20(%rbp)
  jmp    L190
L273:
  movsd  -0x28(%rbp),%xmm0
  movsd  %xmm0,-0x20(%rbp)
  jmp    L190
L161:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xb8(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  sub    $0x1,%eax
  add    %eax,-0x50(%rbp)
  subl   $0x1,-0x50(%rbp)
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x1,%eax
  jne    L397
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xa0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%edx
  mov    -0x50(%rbp),%eax
  add    %edx,%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x88(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movsd  %xmm0,-0x28(%rbp)
  jmp    L19
L397:
  mov    -0x78(%rbp),%rax
  mov    (%rax),%eax
  cmp    $0x2,%eax
  jne    L574
  mov    -0x50(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x88(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movsd  %xmm0,-0x28(%rbp)
  jmp    L19
L574:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xa0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%edx
  mov    -0x50(%rbp),%eax
  add    %edx,%eax
  cltq
  add    $0x1,%rax
  lea    0x0(,%rax,8),%rdx
  mov    -0x88(%rbp),%rax
  add    %rdx,%rax
  movsd  (%rax),%xmm0
  movsd  %xmm0,-0x28(%rbp)
L19:
  mov    -0x5c(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0xc0(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  je     L174
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  test   %eax,%eax
  jg     L258
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  cltd
  idivl  -0x48(%rbp)
  sub    $0x1,%eax
  mov    %eax,-0x4c(%rbp)
  jmp    L365
L258:
  mov    -0x68(%rbp),%rax
  mov    (%rax),%eax
  sub    $0x1,%eax
  cltd
  idivl  -0x48(%rbp)
  mov    %eax,-0x4c(%rbp)
L365:
  lea    -0x5c(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <tm_modulo_axlen_@plt>
  imul   -0x4c(%rbp),%eax
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  movsd  -0x28(%rbp),%xmm1
  addsd  %xmm1,%xmm0
  movsd  %xmm0,-0x20(%rbp)
  jmp    L190
L174:
  movsd  -0x28(%rbp),%xmm0
  movsd  %xmm0,-0x20(%rbp)
L190:
  movsd  -0x20(%rbp),%xmm0
L233:
  movq   %xmm0,%rax
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L94
  call   <__stack_chk_fail@plt>
L94:
  movq   %rax,%xmm0
  leave
  ret
```

tool_calls: name: retrieve_data
arguments: data_tag: D41
data_type: f64
name: retrieve_data
arguments: data_tag: D6
data_type: byte[8]
name: retrieve_data
arguments: data_tag: D45
data_type: f64

tool: D41: 0.5

tool: {"D6": [0x00,0x00,0x00,0x00,0x00,0x38,0x8f,0xc0]}

tool: D45: 2

assistant: ```c
double tm_world_recur_(int *isudirript, int *iaxis, int *where_in_box, int *max_lines, double line_mem[], int line_parent[], int line_class[], int line_dim[], double line_start[], double line_delta[], int line_sudir1[], int line_modulo[], double line_modulo_len[], int line_regular[]) {
  double tempwld, tm_world;
  int isub, rmod;
  int axis = *iaxis;
  int line_len = line_dim[axis];
  int is_subspan;
  int recursive = axis > *max_lines;
  if (recursive) {
    recursive = line_parent[axis] != 0;
    if (recursive) {
      int new_ss, lo_ss, hi_ss, parent_len;
      int new_where;
      switch (line_class[axis]) {
      case 1:
        new_ss = (int)line_start[axis] + (*isudirript - 1) * (int)line_delta[axis];
        if (line_regular[axis] || *where_in_box == 2) {
          tm_world = tm_world_recur_(&new_ss, &(line_parent[axis]), where_in_box, max_lines, line_mem, line_parent, line_class, line_dim, line_start, line_delta, line_sudir1, line_modulo, line_modulo_len, line_regular);
        } else {
          if (*where_in_box == 1) {
            lo_ss = (int)line_start[axis] + (*isudirript - 2) * (int)line_delta[axis];
            hi_ss = new_ss;
          } else {
            lo_ss = new_ss;
            hi_ss = (int)line_start[axis] + (*isudirript - 0) * (int)line_delta[axis];
          }
          parent_len = line_dim[line_parent[axis]];
          is_subspan = (tm_its_subspan_modulo_int_(&line_parent[axis]));
          if (line_modulo[line_parent[axis]] && is_subspan) {
            if (lo_ss == 0 || lo_ss == -1) {
              new_where = 1;
              lo_ss = 1;
              tm_world = (tm_world_recur_(&lo_ss, &(line_parent[axis]), &new_where, max_lines, line_mem, line_parent, line_class, line_dim, line_start, line_delta, line_sudir1, line_modulo, line_modulo_len, line_regular));
              return (tm_world);
            }
            if (hi_ss == parent_len + 1) {
              new_where = 3;
              hi_ss = parent_len;
              tm_world = (tm_world_recur_(&hi_ss, &(line_parent[axis]), &new_where, max_lines, line_mem, line_parent, line_class, line_dim, line_start, line_delta, line_sudir1, line_modulo, line_modulo_len, line_regular));
              return (tm_world);
            }
          }
          if (line_modulo[line_parent[axis]] || (lo_ss >= 1 && hi_ss <= parent_len)) {
            new_where = 2;
            tm_world = 0.5 * (tm_world_recur_(&lo_ss, &(line_parent[axis]), &new_where, max_lines, line_mem, line_parent, line_class, line_dim, line_start, line_delta, line_sudir1, line_modulo, line_modulo_len, line_regular) + tm_world_recur_(&hi_ss, &(line_parent[axis]), &new_where, max_lines, line_mem, line_parent, line_class, line_dim, line_start, line_delta, line_sudir1, line_modulo, line_modulo_len, line_regular));
          } else if (*where_in_box == 1) {
            new_ss = 1;
            tm_world = tm_world_recur_(&new_ss, &(line_parent[axis]), where_in_box, max_lines, line_mem, line_parent, line_class, line_dim, line_start, line_delta, line_sudir1, line_modulo, line_modulo_len, line_regular);
          } else {
            new_ss = parent_len;
            tm_world = tm_world_recur_(&new_ss, &(line_parent[axis]), where_in_box, max_lines, line_mem, line_parent, line_class, line_dim, line_start, line_delta, line_sudir1, line_modulo, line_modulo_len, line_regular);
          }
        }
        break;
      case 2:
        tm_world = tm_world_recur_(isudirript, iaxis, where_in_box, max_lines, line_mem, line_parent, line_class, line_dim, line_start, line_delta, line_sudir1, line_modulo, line_modulo_len, line_regular);
        break;
      default:
        tm_world = -999.;
      }
      return (tm_world);
    }
  }
  if (tm_its_subspan_modulo_int_(&axis))
    line_len++;
  if (line_modulo[axis]) {
    isub = ((*isudirript - 1) % line_len) + 1;
    if (isub <= 0)
      isub += line_len;
  } else
    isub = (((line_len) < ((((1) < (*isudirript)) ? (*isudirript) : (1)))) ? (line_len) : ((((1) < (*isudirript)) ? (*isudirript) : (1))));
  if (tm_its_subspan_modulo_int_(&axis) && isub == line_len) {
    double lo, hi;
    tm_ww_axlims_(&axis, &lo, &hi);
    if (*where_in_box == 1)
      tempwld = hi;
    else if (*where_in_box == 2)
      tempwld = (hi + (lo + line_modulo_len[axis])) / 2.;
    else
      tempwld = lo + line_modulo_len[axis];
    if (*isudirript <= 0)
      rmod = *isudirript / line_len - 1;
    else
      rmod = (*isudirript - 1) / line_len;
    tm_world = tempwld + rmod * line_modulo_len[axis];
  } else if (line_regular[axis]) {
    double midpoint = line_start[axis] + (isub - 1) * line_delta[axis];
    double box_size = line_delta[axis];
    if (*where_in_box == 1)
      tempwld = midpoint - (box_size / 2.);
    else if (*where_in_box == 2)
      tempwld = midpoint;
    else
      tempwld = midpoint + (box_size / 2.);
    if (line_modulo[axis]) {
      if (*isudirript <= 0)
        rmod = (*isudirript / line_len - 1);
      else
        rmod = ((*isudirript - 1) / line_len);
      tm_world = tempwld + rmod * tm_modulo_axlen_(&axis);
    } else
      tm_world = tempwld;
  } else {
    isub += line_sudir1[axis] - 1;
    isub--;
    if (*where_in_box == 1)
      tempwld = line_mem[isub + line_dim[axis]];
    else if (*where_in_box == 2)
      tempwld = line_mem[isub];
    else
      tempwld = line_mem[isub + line_dim[axis] + 1];
    if (line_modulo[axis]) {
      if (*isudirript <= 0)
        rmod = *isudirript / line_len - 1;
      else
        rmod = (*isudirript - 1) / line_len;
      tm_world = tempwld + rmod * tm_modulo_axlen_(&axis);
    } else
      tm_world = tempwld;
  }
  return (tm_world);
}
```