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

```asm
<init_amsr_averaged>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xc8,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0xb8(%rsp)
  xor    %eax,%eax
  lea    D3(%rip),%rax
  mov    %rax,(%rsp)
  lea    D12(%rip),%rax
  mov    %rax,0x8(%rsp)
  lea    D51(%rip),%rax
  mov    %rax,0x10(%rsp)
  lea    D31(%rip),%rax
  mov    %rax,0x18(%rsp)
  lea    D48(%rip),%rax
  mov    %rax,0x20(%rsp)
  lea    D65(%rip),%rax
  mov    %rax,0x30(%rsp)
  lea    D67(%rip),%rax
  mov    %rax,0x38(%rsp)
  lea    D98(%rip),%rax
  mov    %rax,0x40(%rsp)
  mov    %rax,0x48(%rsp)
  lea    D9(%rip),%rax
  mov    %rax,0x50(%rsp)
  mov    D17(%rip),%rax
  mov    %rax,0x60(%rsp)
  mov    D93(%rip),%rax
  mov    %rax,0x68(%rsp)
  mov    D91(%rip),%rax
  mov    %rax,0x70(%rsp)
  mov    D125(%rip),%rax
  mov    %rax,0x78(%rsp)
  mov    D33(%rip),%rax
  mov    %rax,0x80(%rsp)
  mov    D134(%rip),%rax
  mov    %rax,0x90(%rsp)
  movq   $0x0,0x98(%rsp)
  movq   $0x0,0xa0(%rsp)
  movq   $0x0,0xa8(%rsp)
  movq   $0x0,0xb0(%rsp)
  test   %ecx,%ecx
  jle    L29
  mov    %edi,%ebp
  mov    %esi,%r14d
  mov    %edx,%r15d
  mov    %ecx,%r13d
  mov    $0x0,%r12d
L23:
  mov    $0x1,%ecx
  mov    %r15d,%edx
  mov    %r14d,%esi
  mov    %ebp,%edi
  call   <vlistDefVar@plt>
  mov    %eax,%ebx
  mov    (%rsp,%r12,8),%rdx
  mov    %eax,%esi
  mov    %ebp,%edi
  call   <vlistDefVarName@plt>
  mov    0x30(%rsp,%r12,8),%rdx
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <vlistDefVarUnits@plt>
  mov    $0xd8,%edx
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <vlistDefVarDatatype@plt>
  mov    $0xfe,%edx
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <vlistDefVarMissval@plt>
  movsd  0x60(%rsp,%r12,8),%xmm0
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <vlistDefVarScalefactor@plt>
  movsd  0x90(%rsp,%r12,8),%xmm0
  mov    %ebx,%esi
  mov    %ebp,%edi
  call   <vlistDefVarAddoffset@plt>
  add    $0x1,%r12
  cmp    %r13,%r12
  jne    L23
L29:
  mov    0xb8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L27
  add    $0xc8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L27:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: retrieve_data
arguments: label: D3
datatype: string
name: retrieve_data
arguments: label: D12
datatype: string
name: retrieve_data
arguments: label: D51
datatype: string
name: retrieve_data
arguments: label: D31
datatype: string
name: retrieve_data
arguments: label: D48
datatype: string
name: retrieve_data
arguments: label: D65
datatype: string
name: retrieve_data
arguments: label: D67
datatype: string
name: retrieve_data
arguments: label: D98
datatype: string
name: retrieve_data
arguments: label: D9
datatype: string
name: retrieve_data
arguments: label: D17
datatype: f64
name: retrieve_data
arguments: label: D93
datatype: f64
name: retrieve_data
arguments: label: D91
datatype: f64
name: retrieve_data
arguments: label: D125
datatype: f64
name: retrieve_data
arguments: label: D33
datatype: f64
name: retrieve_data
arguments: label: D134
datatype: f32[2]

tool: D3: sst

tool: D12: wind

tool: D51: vapor

tool: D31: cloud

tool: D48: rain

tool: D65: deg Celcius

tool: D67: m/s

tool: D98: mm

tool: D9: mm/h

tool: D17: 0.15

tool: D93: 0.2

tool: D91: 0.3

tool: D125: 0.01

tool: D33: 0.1

tool: {"D134": [0.0,-2.125]}

assistant: ```c
void init_amsr_averaged(int vlistID, int gridID, int zaxisID, int nvars) {
  char *name[] = {"sst", "wind", "vapor", "cloud", "rain"};
  char *units[] = {"deg Celcius", "m/s", "mm", "mm", "mm/h"};
  double xscale[] = {0.15, 0.2, 0.3, 0.01, 0.1};
  double xminval[] = {-3., 0., 0., 0., 0.};
  int i, varID;
  for (i = 0; i < nvars; ++i) {
    varID = vlistDefVar(vlistID, gridID, zaxisID, 1);
    vlistDefVarName(vlistID, varID, name[i]);
    vlistDefVarUnits(vlistID, varID, units[i]);
    vlistDefVarDatatype(vlistID, varID, 216);
    vlistDefVarMissval(vlistID, varID, 254);
    vlistDefVarScalefactor(vlistID, varID, xscale[i]);
    vlistDefVarAddoffset(vlistID, varID, xminval[i]);
  }
}
```