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

```asm
<fort_lambert_getval_>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x60,%rsp
  mov    %rdi,-0x38(%rbp)
  mov    %rsi,-0x40(%rbp)
  mov    %rdx,-0x48(%rbp)
  mov    %rcx,-0x50(%rbp)
  mov    %r8,-0x58(%rbp)
  mov    %r9,-0x60(%rbp)
  movl   $0x0,-0x28(%rbp)
  jmp    L20
L53:
  mov    -0x28(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  cmp    $0x20,%al
  jne    L5
  mov    -0x28(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movb   $0x0,(%rax)
L5:
  addl   $0x1,-0x28(%rbp)
L20:
  cmpl   $0x4f,-0x28(%rbp)
  jle    L53
  movl   $0x0,-0x28(%rbp)
  jmp    L27
L21:
  mov    -0x28(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x40(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  cmp    $0x20,%al
  jne    L15
  mov    -0x28(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x40(%rbp),%rax
  add    %rdx,%rax
  movb   $0x0,(%rax)
L15:
  addl   $0x1,-0x28(%rbp)
L27:
  cmpl   $0x4f,-0x28(%rbp)
  jle    L21
  mov    -0x48(%rbp),%rax
  mov    (%rax),%eax
  cltq
  mov    %rax,-0x10(%rbp)
  mov    -0x60(%rbp),%rax
  mov    (%rax),%eax
  mov    %eax,-0x24(%rbp)
  mov    0x10(%rbp),%rax
  mov    (%rax),%eax
  mov    %eax,-0x20(%rbp)
  mov    0x18(%rbp),%rax
  mov    (%rax),%eax
  mov    %eax,-0x1c(%rbp)
  mov    -0x24(%rbp),%r9d
  mov    -0x58(%rbp),%r8
  mov    -0x50(%rbp),%rcx
  mov    -0x10(%rbp),%rdx
  mov    -0x40(%rbp),%rsi
  mov    -0x38(%rbp),%rax
  mov    -0x1c(%rbp),%edi
  push   %rdi
  mov    -0x20(%rbp),%edi
  push   %rdi
  mov    %rax,%rdi
  call   <lambert_getval@plt>
  add    $0x10,%rsp
  mov    %rax,-0x8(%rbp)
  movq   $0x0,-0x18(%rbp)
  jmp    L61
L70:
  mov    -0x18(%rbp),%rax
  lea    0x0(,%rax,4),%rdx
  mov    -0x8(%rbp),%rax
  add    %rax,%rdx
  mov    -0x18(%rbp),%rax
  lea    0x0(,%rax,4),%rcx
  mov    0x20(%rbp),%rax
  add    %rcx,%rax
  movss  (%rdx),%xmm0
  movss  %xmm0,(%rax)
  addq   $0x1,-0x18(%rbp)
L61:
  mov    -0x18(%rbp),%rax
  cmp    -0x10(%rbp),%rax
  jl     L70
  nop
  nop
  leave
  ret
```

assistant: ```c
void fort_lambert_getval_(char *pFileN, char *pFileS, void *pNGal, float *pGall, float *pGalb, void *pQInterp, void *pQNoloop, void *pQVerbose, float *pOutput) {
  int iChar;
  int qInterp;
  int qNoloop;
  int qVerbose;
  long iGal;
  long nGal;
  float *pTemp;
  for (iChar = 0; iChar < 80; iChar++)
    if (pFileN[iChar] == ' ')
      pFileN[iChar] = '\0';
  for (iChar = 0; iChar < 80; iChar++)
    if (pFileS[iChar] == ' ')
      pFileS[iChar] = '\0';
  if (sizeof(short) == 4) {
    nGal = *((short *)pNGal);
    qInterp = *((short *)pQInterp);
    qNoloop = *((short *)pQNoloop);
    qVerbose = *((short *)pQVerbose);
  } else if (sizeof(int) == 4) {
    nGal = *((int *)pNGal);
    qInterp = *((int *)pQInterp);
    qNoloop = *((int *)pQNoloop);
    qVerbose = *((int *)pQVerbose);
  } else if (sizeof(long) == 4) {
    nGal = *((long *)pNGal);
    qInterp = *((long *)pQInterp);
    qNoloop = *((long *)pQNoloop);
    qVerbose = *((long *)pQVerbose);
  }
  pTemp = lambert_getval(pFileN, pFileS, nGal, pGall, pGalb, qInterp, qNoloop, qVerbose);
  for (iGal = 0; iGal < nGal; iGal++)
    pOutput[iGal] = pTemp[iGal];
}
```