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

```asm
<NURBSsurfaceBasisX4Max>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xd8,%rsp
  mov    %edi,0x30(%rsp)
  mov    %esi,0x34(%rsp)
  mov    %rdx,0x38(%rsp)
  mov    %ecx,0x10(%rsp)
  mov    %r8d,0x88(%rsp)
  mov    %r9,0x40(%rsp)
  mov    0x110(%rsp),%r14
  mov    0x118(%rsp),%rax
  mov    %rax,0xa0(%rsp)
  mov    0x120(%rsp),%rax
  mov    %rax,0x18(%rsp)
  mov    0x128(%rsp),%rax
  mov    %rax,0x48(%rsp)
  mov    0x130(%rsp),%rax
  mov    %rax,0x50(%rsp)
  mov    0x138(%rsp),%rax
  mov    %rax,0x58(%rsp)
  mov    0x140(%rsp),%rax
  mov    %rax,0x60(%rsp)
  mov    0x148(%rsp),%rax
  mov    %rax,0x68(%rsp)
  mov    0x150(%rsp),%rax
  mov    %rax,0x70(%rsp)
  mov    0x158(%rsp),%rax
  mov    %rax,0x78(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0xc8(%rsp)
  xor    %eax,%eax
  cmp    $0x1,%r8d
  jle    L19
  lea    -0x2(%r8),%eax
  mov    %rax,0x98(%rsp)
  movslq %edi,%rax
  lea    (%r9,%rax,8),%rax
  mov    %rax,0x80(%rsp)
  mov    %ecx,0x94(%rsp)
  movl   $0x0,0x90(%rsp)
  movq   $0x0,0x8(%rsp)
  movl   $0x0,0x8c(%rsp)
  lea    0x2(%rsi),%eax
  mov    %eax,0xa8(%rsp)
  lea    -0x2(%rcx),%eax
  mov    %eax,0xac(%rsp)
  jmp    L5
L7:
  mov    0xa8(%rsp),%eax
  add    0x8(%rsp),%eax
  cltq
  lea    (%r14,%rax,8),%r15
  mov    0x90(%rsp),%eax
  lea    0x2(%rax,%rax,1),%eax
  cltq
  mov    0x18(%rsp),%rdi
  lea    (%rdi,%rax,8),%r12
  mov    0x94(%rsp),%eax
  add    %eax,%eax
  cltq
  lea    (%rdi,%rax,8),%rbp
  mov    0x8c(%rsp),%eax
  add    %eax,%eax
  cltq
  mov    0xa0(%rsp),%rcx
  lea    0x8(%rcx,%rax,8),%r13
  mov    0xac(%rsp),%eax
  mov    %rax,0x20(%rsp)
  mov    $0x0,%ebx
  lea    0xb0(%rsp),%rax
  mov    %rax,0x28(%rsp)
L0:
  movsd  -0x10(%r12),%xmm0
  addsd  (%r12),%xmm0
  addsd  0x0(%rbp),%xmm0
  addsd  0x10(%rbp),%xmm0
  mulsd  D5(%rip),%xmm0
  movsd  %xmm0,0xb0(%rsp)
  movsd  -0x8(%r12),%xmm0
  addsd  0x8(%r12),%xmm0
  addsd  0x8(%rbp),%xmm0
  addsd  0x18(%rbp),%xmm0
  mulsd  D5(%rip),%xmm0
  movsd  %xmm0,0xb8(%rsp)
  movsd  (%r15),%xmm1
  mov    0x8(%rsp),%rax
  subsd  (%r14,%rax,8),%xmm1
  mov    0x80(%rsp),%rax
  movsd  0x10(%rax,%rbx,8),%xmm0
  mov    0x40(%rsp),%rax
  subsd  (%rax,%rbx,8),%xmm0
  mulsd  D36(%rip),%xmm0
  sub    $0x8,%rsp
  push   0x80(%rsp)
  push   0x80(%rsp)
  push   0x80(%rsp)
  push   0x80(%rsp)
  push   0x80(%rsp)
  push   0x80(%rsp)
  push   0x80(%rsp)
  push   0x58(%rsp)
  push   %r14
  push   %rax
  mov    0xe0(%rsp),%eax
  push   %rax
  mov    0x70(%rsp),%eax
  push   %rax
  push   0xa0(%rsp)
  mov    0xa4(%rsp),%r9d
  mov    0xa0(%rsp),%r8d
  mulsd  D36(%rip),%xmm1
  mov    0x98(%rsp),%rcx
  mov    $0x6,%edx
  mov    %ebx,%esi
  mov    0x84(%rsp),%edi
  call   <findNURBSbasisFunIso4xCP@plt>
  movsd  0x120(%rsp),%xmm0
  movsd  %xmm0,-0x8(%r13)
  movsd  0x128(%rsp),%xmm0
  movsd  %xmm0,0x0(%r13)
  mov    %rbx,%rax
  add    $0x1,%rbx
  add    $0x10,%r12
  add    $0x10,%rbp
  add    $0x10,%r13
  add    $0x70,%rsp
  cmp    0x20(%rsp),%rax
  jne    L0
  mov    0x8c(%rsp),%eax
  mov    0x10(%rsp),%ecx
  lea    -0x1(%rax,%rcx,1),%eax
  mov    %eax,0x8c(%rsp)
L14:
  mov    0x8(%rsp),%rcx
  lea    0x1(%rcx),%rax
  mov    0x10(%rsp),%edx
  add    %edx,0x90(%rsp)
  add    %edx,0x94(%rsp)
  cmp    0x98(%rsp),%rcx
  je     L19
  mov    %rax,0x8(%rsp)
L5:
  mov    0x8(%rsp),%eax
  mov    %eax,0x14(%rsp)
  cmpl   $0x1,0x10(%rsp)
  jg     L7
  jmp    L14
L19:
  mov    0xc8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L35
  add    $0xd8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L35:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: label: D5
type_infered: f64
name: disassemble_data
arguments: label: D36
type_infered: f64

tool: D5: 0.25

tool: D36: 0.1

assistant: ```c
void NURBSsurfaceBasisX4Max(int degU, int degV, double *cp, int ncp, int kcp, double *knotU, double *knotV, double *us, double *usX1max, double *basisVals, double *leftU, double *rightU, double *NU, double *leftV, double *rightV, double *NV) {
  int ii, jj, nus, orderU, orderV;
  double uv[2], stepU, stepV;
  orderU = degU + 1;
  orderV = degV + 1;
  nus = 0;
  for (ii = 0; ii <= (kcp - 2); ii++) {
    for (jj = 0; jj <= (ncp - 2); jj++) {
      uv[0] = 0.25 * (usX1max[2 * (ii * ncp + jj)] + usX1max[2 * (ii * ncp + jj + 1)] + usX1max[2 * ((ii + 1) * ncp + jj)] + usX1max[2 * ((ii + 1) * ncp + jj + 1)]);
      uv[1] = 0.25 * (usX1max[2 * (ii * ncp + jj) + 1] + usX1max[2 * (ii * ncp + jj + 1) + 1] + usX1max[2 * ((ii + 1) * ncp + jj) + 1] + usX1max[2 * ((ii + 1) * ncp + jj + 1) + 1]);
      stepU = 0.1 * (knotU[jj + 1 + orderU] - knotU[jj]);
      stepV = 0.1 * (knotV[ii + 1 + orderV] - knotV[ii]);
      findNURBSbasisFunIso4xCP(ii, jj, 6, uv, stepU, stepV, degU, degV, cp, ncp, kcp, knotU, knotV, usX1max, basisVals, leftU, rightU, NU, leftV, rightV, NV);
      us[2 * nus] = uv[0];
      us[2 * nus + 1] = uv[1];
      nus++;
    }
  }
}
```