user: 请从给定的汇编指令推导出C源代码:

```asm
<calculate_row>:
  endbr64
  test   %r9,%r9
  je     L41
  lea    0x0(,%rdx,4),%r11
  push   %r15
  mov    %rsi,%r10
  movaps %xmm0,%xmm1
  push   %r14
  lea    -0x1(%r9),%rax
  lea    (%rsi,%r11,1),%rsi
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  cmp    $0x1,%r8
  jne    L12
  lea    0x4(%r10,%r11,1),%r8
  lea    0x0(,%r9,4),%rbp
  lea    (%r9,%rdx,1),%r12
  lea    (%rcx,%rbp,1),%r10
  shl    $0x2,%r12
  cmp    %r8,%rcx
  setae  %r8b
  cmp    %r10,%rsi
  lea    -0x8(%r12),%rbx
  setae  %r10b
  or     %r10d,%r8d
  cmp    $0x1,%r9
  setne  %r10b
  test   %r10b,%r8b
  je     L2
  lea    -0x4(%rcx,%rbp,1),%r8
  add    %rdi,%rbx
  sub    %rbx,%r8
  add    $0x8,%r8
  cmp    $0x8,%r8
  jbe    L2
  cmp    $0x2,%rax
  jbe    L71
  mov    %r9,%r11
  movss  (%rsi),%xmm3
  movaps %xmm0,%xmm4
  lea    -0x10(%rcx,%rbp,1),%r10
  shr    $0x2,%r11
  lea    -0x10(%rdi,%r12,1),%r12
  xor    %r8d,%r8d
  shufps $0x0,%xmm4,%xmm4
  neg    %r11
  shufps $0x0,%xmm3,%xmm3
  shl    $0x4,%r11
  nopl   0x0(%rax)
L201:
  movups (%r12,%r8,1),%xmm0
  movups (%r10,%r8,1),%xmm2
  shufps $0x1b,%xmm0,%xmm0
  mulps  %xmm4,%xmm0
  shufps $0x1b,%xmm2,%xmm2
  mulps  %xmm3,%xmm0
  addps  %xmm2,%xmm0
  shufps $0x1b,%xmm0,%xmm0
  movups %xmm0,(%r10,%r8,1)
  sub    $0x10,%r8
  cmp    %r8,%r11
  jne    L201
  mov    %r9,%r8
  and    $0xfffffffffffffffc,%r8
  sub    %r8,%rax
  cmp    %r8,%r9
  je     L186
  sub    %r8,%r9
  cmp    $0x1,%r9
  je     L110
L115:
  neg    %r8
  movaps %xmm1,%xmm4
  movss  (%rsi),%xmm3
  shl    $0x2,%r8
  shufps $0xe0,%xmm4,%xmm4
  movq   (%rbx,%r8,1),%xmm0
  lea    -0x8(%rbp,%r8,1),%r10
  shufps $0xe0,%xmm3,%xmm3
  mov    %r9,%r8
  add    %rcx,%r10
  and    $0xfffffffffffffffe,%r8
  shufps $0xe1,%xmm0,%xmm0
  movq   (%r10),%xmm2
  sub    %r8,%rax
  mulps  %xmm4,%xmm0
  shufps $0xe1,%xmm2,%xmm2
  mulps  %xmm3,%xmm0
  addps  %xmm2,%xmm0
  shufps $0xe1,%xmm0,%xmm0
  movlps %xmm0,(%r10)
  cmp    %r9,%r8
  je     L186
L110:
  add    %rax,%rdx
  lea    (%rcx,%rax,4),%rcx
  mulss  (%rdi,%rdx,4),%xmm1
  mulss  (%rsi),%xmm1
  addss  (%rcx),%xmm1
  movss  %xmm1,(%rcx)
L186:
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   0x0(%rax)
L12:
  mov    %r8,%rbp
  lea    0x0(,%r9,4),%r14
  xor    %r12d,%r12d
  imul   %rax,%rbp
  lea    -0x4(%rcx,%r14,1),%r13
  mov    %r13,-0x18(%rsp)
  mov    %r12,%r13
  lea    (%rdx,%rbp,1),%rbx
  neg    %rbp
  lea    0x0(,%rbx,4),%r15
  mov    %r8,%rbx
  shl    $0x2,%rbp
  neg    %rbx
  mov    %rbx,-0x10(%rsp)
  shl    $0x2,%rbx
  cmovs  %rbp,%r13
  add    %r15,%r13
  add    %rdi,%r13
  cmp    %r13,-0x18(%rsp)
  setb   %r13b
  test   %rbx,%rbx
  cmovs  %r12,%rbp
  add    %r15,%rbp
  add    %rdi,%rbp
  cmp    %rbp,%rcx
  seta   %bpl
  or     %r13b,%bpl
  je     L43
  lea    0x4(%r10,%r11,1),%r10
  lea    (%rcx,%r14,1),%r11
  cmp    %r10,%rcx
  setae  %r10b
  cmp    %r11,%rsi
  setae  %r11b
  or     %r11d,%r10d
  cmp    $0x1,%r9
  setne  %r11b
  test   %r11b,%r10b
  je     L43
  cmp    $0x2,%rax
  jbe    L50
  mov    %r9,%rbp
  lea    -0x10(%rcx,%r14,1),%r11
  lea    (%rdi,%r15,1),%r10
  movss  (%rsi),%xmm4
  shr    $0x2,%rbp
  mov    %r11,%r13
  mov    %r10,-0x18(%rsp)
  mov    %r8,%r10
  shl    $0x4,%rbp
  mov    -0x10(%rsp),%r12
  movaps %xmm0,%xmm5
  shufps $0x0,%xmm4,%xmm4
  sub    %rbp,%r13
  lea    0x0(,%r8,4),%rbp
  shufps $0x0,%xmm5,%xmm5
  sub    %rbp,%r10
  shl    $0x4,%r12
  lea    0x0(,%r10,4),%rbp
  mov    -0x18(%rsp),%r10
L31:
  movss  (%r10,%rbp,1),%xmm0
  movss  (%r10,%rbx,2),%xmm2
  sub    $0x10,%r11
  movss  (%r10,%rbx,1),%xmm3
  unpcklps %xmm0,%xmm2
  movss  (%r10),%xmm0
  add    %r12,%r10
  unpcklps %xmm3,%xmm0
  movlhps %xmm2,%xmm0
  movups 0x10(%r11),%xmm2
  mulps  %xmm5,%xmm0
  shufps $0x1b,%xmm2,%xmm2
  mulps  %xmm4,%xmm0
  addps  %xmm2,%xmm0
  shufps $0x1b,%xmm0,%xmm0
  movups %xmm0,0x10(%r11)
  cmp    %r11,%r13
  jne    L31
  mov    %r9,%r10
  and    $0xfffffffffffffffc,%r10
  sub    %r10,%rax
  cmp    %r10,%r9
  je     L186
  sub    %r10,%r9
  cmp    $0x1,%r9
  je     L79
L180:
  mov    %r10,%r11
  imul   %rbx,%r10
  movss  (%rsi),%xmm3
  neg    %r11
  lea    -0x8(%r14,%r11,4),%r11
  shufps $0xe0,%xmm3,%xmm3
  add    %r15,%r10
  add    %rcx,%r11
  add    %rdi,%r10
  movq   (%r11),%xmm2
  movss  (%r10,%rbx,1),%xmm4
  movss  (%r10),%xmm0
  mov    %r9,%r10
  shufps $0xe1,%xmm2,%xmm2
  and    $0xfffffffffffffffe,%r10
  unpcklps %xmm4,%xmm0
  movaps %xmm1,%xmm4
  sub    %r10,%rax
  shufps $0xe0,%xmm4,%xmm4
  mulps  %xmm4,%xmm0
  mulps  %xmm3,%xmm0
  addps  %xmm2,%xmm0
  shufps $0xe1,%xmm0,%xmm0
  movlps %xmm0,(%r11)
  cmp    %r10,%r9
  je     L186
L79:
  imul   %rax,%r8
  lea    (%rcx,%rax,4),%rcx
  add    %rdx,%r8
  mulss  (%rdi,%r8,4),%xmm1
  mulss  (%rsi),%xmm1
  addss  (%rcx),%xmm1
  movss  %xmm1,(%rcx)
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   (%rax)
L2:
  add    %r11,%rdi
  nopl   0x0(%rax,%rax,1)
L113:
  movss  (%rdi,%rax,4),%xmm0
  mulss  %xmm1,%xmm0
  mulss  (%rsi),%xmm0
  addss  (%rcx,%rax,4),%xmm0
  movss  %xmm0,(%rcx,%rax,4)
  sub    $0x1,%rax
  jae    L113
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L41:
  ret
L71:
  xor    %r8d,%r8d
  jmp    L115
L43:
  lea    (%rcx,%rax,4),%rdx
  lea    (%rdi,%r15,1),%rax
  nopl   0x0(%rax)
L66:
  movss  (%rax),%xmm0
  mov    %rdx,%rdi
  add    %rbx,%rax
  sub    $0x4,%rdx
  mulss  %xmm1,%xmm0
  mulss  (%rsi),%xmm0
  addss  0x4(%rdx),%xmm0
  movss  %xmm0,0x4(%rdx)
  cmp    %rcx,%rdi
  jne    L66
  jmp    L186
L50:
  xor    %r10d,%r10d
  jmp    L180
```

assistant: ```c
void calculate_row(float *principal_components, float *pc_deviations, float coefficient_difference, size_t row, float *face, size_t dimensions, size_t vertices) {
  while (vertices-- > 0) {
    face[vertices] += principal_components[vertices * dimensions + row] * coefficient_difference * pc_deviations[row];
  }
}
```