user: 请将以下的汇编代码转换成C语言代码：

```asm
<calculate_uvw>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  movslq %edx,%rbp
  push   %rbx
  sub    $0x68,%rsp
  mov    %edi,0x4c(%rsp)
  mov    0xa0(%rsp),%rdx
  mov    %esi,0x48(%rsp)
  mov    %r8,0x38(%rsp)
  mov    %r9,0x40(%rsp)
  movsd  %xmm0,0x8(%rsp)
  movsd  %xmm1,0x20(%rsp)
  movsd  %xmm2,0x28(%rsp)
  movsd  %xmm3,0x30(%rsp)
  cmp    $0x1,%edi
  jle    L171
  test   %esi,%esi
  jle    L209
  test   %ebp,%ebp
  jle    L249
  mov    %rcx,%rax
  lea    0x8(%rdx),%rsi
  add    $0x8,%rax
  mov    %rsi,0x10(%rsp)
  mov    0xb8(%rsp),%rsi
  mov    %rax,0x18(%rsp)
  mov    0xc0(%rsp),%rax
  lea    0x8(%rsi),%r14
  add    $0x8,%rax
  mov    %rax,0x58(%rsp)
  mov    %rax,%r15
  lea    -0x2(%rdi),%eax
  lea    0x10(%rdx,%rax,8),%rax
  mov    %rax,0x50(%rsp)
  nopw   0x0(%rax,%rax,1)
L153:
  xor    %r13d,%r13d
  nopl   0x0(%rax,%rax,1)
L122:
  lea    0x1(%r13),%rax
  mov    $0x4,%r13d
  mov    $0x1,%ebx
  mov    %rax,(%rsp)
  lea    0x0(,%rax,8),%r12
  mov    %r13,%rax
  mov    %r15,%r13
  mov    %rax,%r15
  jmp    L304
  cs nopw 0x0(%rax,%rax,1)
L189:
  add    $0x1,%ebx
  add    $0x4,%r15
  cmp    %ebx,%ebp
  jl     L170
L304:
  mov    0x0(%r13),%rax
  mov    (%rax,%r12,1),%rax
  mov    (%rax,%r15,1),%edi
  call   <isfluid@plt>
  test   %rax,%rax
  je     L189
  mov    0x8(%r13),%rax
  mov    (%rax,%r12,1),%rax
  mov    (%rax,%r15,1),%edi
  call   <isfluid@plt>
  test   %rax,%rax
  je     L189
  mov    0x8(%r14),%rdi
  mov    0x10(%rsp),%rcx
  add    $0x1,%ebx
  movsd  0x8(%rsp),%xmm1
  divsd  0x20(%rsp),%xmm1
  mov    0x18(%rsp),%rax
  mov    (%rdi,%r12,1),%r8
  mov    (%r14),%rdi
  mov    (%rcx),%rsi
  mov    (%rax),%rax
  mov    (%rdi,%r12,1),%rdi
  movsd  (%r8,%r15,2),%xmm0
  mov    (%rsi,%r12,1),%rsi
  mov    (%rax,%r12,1),%rax
  subsd  (%rdi,%r15,2),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  (%rsi,%r15,2),%xmm1
  subsd  %xmm0,%xmm1
  movsd  %xmm1,(%rax,%r15,2)
  add    $0x4,%r15
  cmp    %ebx,%ebp
  jge    L304
  nopl   (%rax)
L170:
  mov    %r13,%r15
  mov    (%rsp),%r13
  lea    0x1(%r13),%eax
  cmp    %eax,0x48(%rsp)
  jge    L122
  addq   $0x8,0x10(%rsp)
  add    $0x8,%r14
  mov    0x10(%rsp),%rax
  add    $0x8,%r15
  addq   $0x8,0x18(%rsp)
  cmp    %rax,0x50(%rsp)
  jne    L153
  cmpl   $0x1,0x48(%rsp)
  jle    L281
L85:
  mov    0x48(%rsp),%eax
  mov    %ebp,(%rsp)
  mov    $0x1,%r14d
  mov    0x58(%rsp),%r15
  shl    $0x3,%rax
  mov    %rax,0x10(%rsp)
  nop
L36:
  mov    $0x8,%r13d
  cs nopw 0x0(%rax,%rax,1)
L238:
  mov    %r13,%rbp
  mov    $0x4,%r12d
  add    $0x8,%r13
  mov    $0x1,%ebx
  jmp    L237
  nopl   0x0(%rax)
L262:
  add    $0x1,%ebx
  add    $0x4,%r12
  cmp    %ebx,(%rsp)
  jl     L287
L237:
  mov    (%r15),%rax
  mov    (%rax,%rbp,1),%rax
  mov    (%rax,%r12,1),%edi
  call   <isfluid@plt>
  test   %rax,%rax
  je     L262
  mov    (%r15),%rax
  mov    (%rax,%r13,1),%rax
  mov    (%rax,%r12,1),%edi
  call   <isfluid@plt>
  test   %rax,%rax
  je     L262
  mov    0xb8(%rsp),%rax
  mov    0xa8(%rsp),%rcx
  add    $0x1,%ebx
  movsd  0x8(%rsp),%xmm1
  divsd  0x28(%rsp),%xmm1
  mov    0x38(%rsp),%rdx
  mov    (%rax,%r14,8),%rax
  mov    (%rcx,%r14,8),%rdi
  mov    (%rdx,%r14,8),%rsi
  mov    (%rax,%r13,1),%r8
  mov    (%rax,%rbp,1),%rax
  mov    (%rdi,%rbp,1),%rdi
  mov    (%rsi,%rbp,1),%rsi
  movsd  (%r8,%r12,2),%xmm0
  subsd  (%rax,%r12,2),%xmm0
  mulsd  %xmm1,%xmm0
  movsd  (%rdi,%r12,2),%xmm1
  subsd  %xmm0,%xmm1
  movsd  %xmm1,(%rsi,%r12,2)
  add    $0x4,%r12
  cmp    %ebx,(%rsp)
  jge    L237
  nop
L287:
  cmp    0x10(%rsp),%r13
  jne    L238
  add    $0x1,%r14
  add    $0x8,%r15
  cmp    %r14d,0x4c(%rsp)
  jge    L36
  movslq (%rsp),%rbp
L182:
  cmp    $0x1,%ebp
  jle    L209
  mov    0xc0(%rsp),%rax
  shl    $0x2,%rbp
  mov    $0x1,%r13d
  lea    0x8(%rax),%r15
  mov    %r15,%r12
  mov    0xb8(%rsp),%r15
  nopl   0x0(%rax)
L128:
  xor    %eax,%eax
  nopw   0x0(%rax,%rax,1)
L214:
  add    $0x1,%rax
  mov    $0x4,%r14d
  mov    %rax,(%rsp)
  lea    0x0(,%rax,8),%rbx
  jmp    L21
L52:
  add    $0x4,%r14
  cmp    %r14,%rbp
  je     L63
L21:
  mov    (%r12),%rax
  mov    (%rax,%rbx,1),%rax
  mov    (%rax,%r14,1),%edi
  call   <isfluid@plt>
  test   %rax,%rax
  je     L52
  mov    (%r12),%rax
  mov    (%rax,%rbx,1),%rax
  mov    0x4(%rax,%r14,1),%edi
  call   <isfluid@plt>
  test   %rax,%rax
  je     L52
  mov    (%r15,%r13,8),%rax
  mov    0xb0(%rsp),%rcx
  movsd  0x8(%rsp),%xmm1
  divsd  0x30(%rsp),%xmm1
  mov    0x40(%rsp),%rdx
  mov    (%rax,%rbx,1),%rax
  mov    (%rcx,%r13,8),%rdi
  mov    (%rdx,%r13,8),%rsi
  movsd  0x8(%rax,%r14,2),%xmm0
  subsd  (%rax,%r14,2),%xmm0
  mov    (%rdi,%rbx,1),%rdi
  mov    (%rsi,%rbx,1),%rsi
  mulsd  %xmm1,%xmm0
  movsd  (%rdi,%r14,2),%xmm1
  subsd  %xmm0,%xmm1
  movsd  %xmm1,(%rsi,%r14,2)
  add    $0x4,%r14
  cmp    %r14,%rbp
  jne    L21
  nopl   0x0(%rax)
L63:
  mov    (%rsp),%rax
  lea    0x1(%rax),%edx
  cmp    %edx,0x48(%rsp)
  jge    L214
  add    $0x1,%r13
  add    $0x8,%r12
  cmp    %r13d,0x4c(%rsp)
  jge    L128
L209:
  add    $0x68,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L171:
  jne    L209
  cmpl   $0x1,0x48(%rsp)
  jle    L281
  test   %ebp,%ebp
  jle    L182
  mov    0xc0(%rsp),%rax
  add    $0x8,%rax
  mov    %rax,0x58(%rsp)
  jmp    L85
L249:
  cmpl   $0x1,0x48(%rsp)
  jg     L182
L281:
  cmpl   $0x1,0x48(%rsp)
  jne    L209
  jmp    L182
```

assistant: ```c
void calculate_uvw(double dt, double dx, double dy, double dz, int imax, int jmax, int kmax, double ***U, double ***V, double ***W, double ***F, double ***G, double ***H, double ***P, int ***Flag) {
  int i, j, k;
  for (i = 1; i < imax; i++) {
    for (j = 1; j < jmax + 1; j++) {
      for (k = 1; k < kmax + 1; k++) {
        if (isfluid(Flag[i][j][k]) && isfluid(Flag[i + 1][j][k])) {
          U[i][j][k] = F[i][j][k] - dt / dx * (P[i + 1][j][k] - P[i][j][k]);
        }
      }
    }
  }
  for (i = 1; i < imax + 1; i++) {
    for (j = 1; j < jmax; j++) {
      for (k = 1; k < kmax + 1; k++) {
        if (isfluid(Flag[i][j][k]) && isfluid(Flag[i][j + 1][k])) {
          V[i][j][k] = G[i][j][k] - dt / dy * (P[i][j + 1][k] - P[i][j][k]);
        }
      }
    }
  }
  for (i = 1; i < imax + 1; i++) {
    for (j = 1; j < jmax + 1; j++) {
      for (k = 1; k < kmax; k++) {
        if (isfluid(Flag[i][j][k]) && isfluid(Flag[i][j][k + 1])) {
          W[i][j][k] = H[i][j][k] - dt / dz * (P[i][j][k + 1] - P[i][j][k]);
        }
      }
    }
  }
}
```