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

```asm
<GeogProjSetFmStr>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x40,%rsp
  mov    %rdi,-0x38(%rbp)
  mov    %rsi,-0x40(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  lea    -0x20(%rbp),%rcx
  lea    -0x28(%rbp),%rdx
  mov    -0x38(%rbp),%rax
  lea    D186(%rip),%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <sscanf@plt>
  cmp    $0x2,%eax
  jne    L113
  movsd  -0x20(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm0,%xmm2
  movsd  -0x28(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movq   %xmm1,%rax
  mov    -0x40(%rbp),%rdx
  mov    %rdx,%rdi
  movapd %xmm2,%xmm1
  movq   %rax,%xmm0
  call   <GeogProjSetCylEqDist@plt>
  jmp    L128
L113:
  lea    -0x28(%rbp),%rdx
  mov    -0x38(%rbp),%rax
  lea    D202(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <sscanf@plt>
  cmp    $0x1,%eax
  jne    L78
  movsd  -0x28(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movq   %xmm1,%rax
  mov    -0x40(%rbp),%rdx
  mov    %rdx,%rdi
  movq   %rax,%xmm0
  call   <GeogProjSetCylEqArea@plt>
  jmp    L128
L78:
  lea    -0x28(%rbp),%rdx
  mov    -0x38(%rbp),%rax
  lea    D116(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <sscanf@plt>
  cmp    $0x1,%eax
  jne    L71
  movsd  -0x28(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movq   %xmm1,%rax
  mov    -0x40(%rbp),%rdx
  mov    %rdx,%rdi
  movq   %rax,%xmm0
  call   <GeogProjSetMercator@plt>
  jmp    L128
L71:
  lea    -0x10(%rbp),%rdi
  lea    -0x18(%rbp),%rsi
  lea    -0x20(%rbp),%rcx
  lea    -0x28(%rbp),%rdx
  mov    -0x38(%rbp),%rax
  mov    %rdi,%r9
  mov    %rsi,%r8
  lea    D130(%rip),%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <sscanf@plt>
  cmp    $0x4,%eax
  jne    L64
  movsd  -0x10(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  movapd %xmm1,%xmm3
  mulsd  %xmm0,%xmm3
  movsd  -0x18(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm0,%xmm2
  movsd  -0x20(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  movapd %xmm1,%xmm4
  mulsd  %xmm0,%xmm4
  movsd  -0x28(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movq   %xmm1,%rax
  mov    -0x40(%rbp),%rdx
  mov    %rdx,%rdi
  movapd %xmm4,%xmm1
  movq   %rax,%xmm0
  call   <GeogProjSetLambertConfConic@plt>
  jmp    L128
L64:
  lea    -0x20(%rbp),%rcx
  lea    -0x28(%rbp),%rdx
  mov    -0x38(%rbp),%rax
  lea    D148(%rip),%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <sscanf@plt>
  cmp    $0x2,%eax
  jne    L72
  movsd  -0x20(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm0,%xmm2
  movsd  -0x28(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movq   %xmm1,%rax
  mov    -0x40(%rbp),%rdx
  mov    %rdx,%rdi
  movapd %xmm2,%xmm1
  movq   %rax,%xmm0
  call   <GeogProjSetLambertEqArea@plt>
  jmp    L128
L72:
  lea    -0x20(%rbp),%rcx
  lea    -0x28(%rbp),%rdx
  mov    -0x38(%rbp),%rax
  lea    D153(%rip),%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <sscanf@plt>
  cmp    $0x2,%eax
  jne    L107
  movsd  -0x20(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm0,%xmm2
  movsd  -0x28(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movq   %xmm1,%rax
  mov    -0x40(%rbp),%rdx
  mov    %rdx,%rdi
  movapd %xmm2,%xmm1
  movq   %rax,%xmm0
  call   <GeogProjSetStereographic@plt>
  jmp    L128
L107:
  lea    -0x20(%rbp),%rcx
  lea    -0x28(%rbp),%rdx
  mov    -0x38(%rbp),%rax
  lea    D46(%rip),%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <sscanf@plt>
  cmp    $0x2,%eax
  jne    L120
  movsd  -0x20(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  movapd %xmm1,%xmm2
  mulsd  %xmm0,%xmm2
  movsd  -0x28(%rbp),%xmm1
  movsd  D136(%rip),%xmm0
  mulsd  %xmm0,%xmm1
  movq   %xmm1,%rax
  mov    -0x40(%rbp),%rdx
  mov    %rdx,%rdi
  movapd %xmm2,%xmm1
  movq   %rax,%xmm0
  call   <GeogProjSetOrthographic@plt>
  jmp    L128
L120:
  mov    $0x0,%eax
L128:
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L139
  call   <__stack_chk_fail@plt>
L139:
  leave
  ret
```

tool_calls: name: retrieve_data
arguments: tag: D186
type_guessed: string
name: retrieve_data
arguments: tag: D136
type_guessed: f64
name: retrieve_data
arguments: tag: D202
type_guessed: string
name: retrieve_data
arguments: tag: D116
type_guessed: string
name: retrieve_data
arguments: tag: D130
type_guessed: string
name: retrieve_data
arguments: tag: D148
type_guessed: string
name: retrieve_data
arguments: tag: D153
type_guessed: string
name: retrieve_data
arguments: tag: D46
type_guessed: string

tool: D186: CylEqDist %lf %lf

tool: D136: 0.017453292519943295

tool: D202: CylEqArea %lf

tool: D116: Mercator %lf

tool: D130: LambertConfConic %lf %lf %lf %lf

tool: D148: LambertEqArea %lf %lf

tool: D153: Stereographic %lf %lf

tool: D46: Orthographic %lf %lf

assistant: ```c
int GeogProjSetFmStr(char *l, struct GeogProj *projPtr) {
  double lon0, lat0, lat1, lat2;
  if (sscanf(l, "CylEqDist %lf %lf", &lon0, &lat0) == 2) {
    return GeogProjSetCylEqDist(lon0 * 0.01745329251994329576, lat0 * 0.01745329251994329576, projPtr);
  } else if (sscanf(l, "CylEqArea %lf", &lon0) == 1) {
    return GeogProjSetCylEqArea(lon0 * 0.01745329251994329576, projPtr);
  } else if (sscanf(l, "Mercator %lf", &lon0) == 1) {
    return GeogProjSetMercator(lon0 * 0.01745329251994329576, projPtr);
  } else if (sscanf(l, "LambertConfConic %lf %lf %lf %lf", &lon0, &lat0, &lat1, &lat2) == 4) {
    return GeogProjSetLambertConfConic(lon0 * 0.01745329251994329576, lat0 * 0.01745329251994329576, lat1 * 0.01745329251994329576, lat2 * 0.01745329251994329576, projPtr);
  } else if (sscanf(l, "LambertEqArea %lf %lf", &lon0, &lat0) == 2) {
    return GeogProjSetLambertEqArea(lon0 * 0.01745329251994329576, lat0 * 0.01745329251994329576, projPtr);
  } else if (sscanf(l, "Stereographic %lf %lf", &lon0, &lat0) == 2) {
    return GeogProjSetStereographic(lon0 * 0.01745329251994329576, lat0 * 0.01745329251994329576, projPtr);
  } else if (sscanf(l, "Orthographic %lf %lf", &lon0, &lat0) == 2) {
    return GeogProjSetOrthographic(lon0 * 0.01745329251994329576, lat0 * 0.01745329251994329576, projPtr);
  }
  return 0;
}
```