user: Demonstrate the C code that generates the assembly output below:

```asm
<wcsceq>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x10,%rsp
  mov    %rdi,-0x8(%rbp)
  mov    -0x8(%rbp),%rax
  movzbl (%rax),%eax
  cmp    $0x4a,%al
  je     L110
  mov    -0x8(%rbp),%rax
  movzbl (%rax),%eax
  cmp    $0x6a,%al
  je     L110
  mov    -0x8(%rbp),%rax
  movzbl (%rax),%eax
  cmp    $0x42,%al
  je     L110
  mov    -0x8(%rbp),%rax
  movzbl (%rax),%eax
  cmp    $0x62,%al
  jne    L62
L110:
  mov    -0x8(%rbp),%rax
  add    $0x1,%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <atof@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  jmp    L100
L62:
  mov    -0x8(%rbp),%rax
  mov    $0x3,%edx
  lea    D30(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncmp@plt>
  test   %eax,%eax
  je     L136
  mov    -0x8(%rbp),%rax
  mov    $0x3,%edx
  lea    D64(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncmp@plt>
  test   %eax,%eax
  jne    L57
L136:
  movsd  D45(%rip),%xmm0
  jmp    L100
L57:
  mov    -0x8(%rbp),%rax
  mov    $0x3,%edx
  lea    D59(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncmp@plt>
  test   %eax,%eax
  je     L20
  mov    -0x8(%rbp),%rax
  mov    $0x3,%edx
  lea    D83(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncmp@plt>
  test   %eax,%eax
  jne    L93
L20:
  movsd  D61(%rip),%xmm0
  jmp    L100
L93:
  mov    -0x8(%rbp),%rax
  mov    $0x4,%edx
  lea    D0(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncmp@plt>
  test   %eax,%eax
  je     L53
  mov    -0x8(%rbp),%rax
  mov    $0x4,%edx
  lea    D86(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncmp@plt>
  test   %eax,%eax
  jne    L42
L53:
  movsd  D61(%rip),%xmm0
  jmp    L100
L42:
  mov    -0x8(%rbp),%rax
  movzbl (%rax),%eax
  cmp    $0x31,%al
  je     L4
  mov    -0x8(%rbp),%rax
  movzbl (%rax),%eax
  cmp    $0x32,%al
  jne    L21
L4:
  mov    -0x8(%rbp),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <atof@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %eax,%xmm0
  jmp    L100
L21:
  pxor   %xmm0,%xmm0
L100:
  movq   %xmm0,%rax
  movq   %rax,%xmm0
  leave
  ret
```

tool_calls: name: unpack_data
arguments: data_label: D30
type_infered: string
name: unpack_data
arguments: data_label: D64
type_infered: string
name: unpack_data
arguments: data_label: D45
type_infered: f64
name: unpack_data
arguments: data_label: D59
type_infered: string
name: unpack_data
arguments: data_label: D83
type_infered: string
name: unpack_data
arguments: data_label: D61
type_infered: f64
name: unpack_data
arguments: data_label: D0
type_infered: string
name: unpack_data
arguments: data_label: D86
type_infered: string

tool: D30: FK4

tool: D64: fk4

tool: D45: 1950

tool: D59: FK5

tool: D83: fk5

tool: D61: 2000

tool: D0: ICRS

tool: D86: icrs

assistant: ```c
double wcsceq(wcstring)
char *wcstring;
{
  if (wcstring[0] == 'J' || wcstring[0] == 'j' || wcstring[0] == 'B' || wcstring[0] == 'b')
    return (atof(wcstring + 1));
  else if (!strncmp(wcstring, "FK4", 3) || !strncmp(wcstring, "fk4", 3))
    return (1950.0);
  else if (!strncmp(wcstring, "FK5", 3) || !strncmp(wcstring, "fk5", 3))
    return (2000.0);
  else if (!strncmp(wcstring, "ICRS", 4) || !strncmp(wcstring, "icrs", 4))
    return (2000.0);
  else if (wcstring[0] == '1' || wcstring[0] == '2')
    return (atof(wcstring));
  else
    return (0.0);
}
```