user: Translate the below assembly code into C programming language:

```asm
<GPS_Math_Mercator_EN_To_LatLon>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x58,%rsp
  movq   %xmm0,%r14
  movq   %xmm1,%r15
  mov    %rdi,%rbp
  mov    %rsi,%rbx
  movapd %xmm2,%xmm0
  movq   %xmm3,%r13
  movsd  %xmm4,0x30(%rsp)
  movsd  %xmm5,0x38(%rsp)
  movsd  %xmm6,(%rsp)
  movsd  %xmm7,0x10(%rsp)
  call   <GPS_Math_Deg_To_Rad@plt>
  movq   %xmm0,%r12
  movq   %r13,%xmm0
  call   <GPS_Math_Deg_To_Rad@plt>
  movsd  %xmm0,0x8(%rsp)
  comisd D196(%rip),%xmm0
  jbe    L18
  movapd %xmm0,%xmm6
  subsd  D54(%rip),%xmm6
  movsd  %xmm6,0x8(%rsp)
L18:
  lea    0x48(%rsp),%rdi
  lea    0x40(%rsp),%rsi
  movq   %r12,%xmm0
  call   <sincos@plt>
  mov    0x40(%rsp),%r13
  mov    0x48(%rsp),%r12
  movsd  (%rsp),%xmm2
  movapd %xmm2,%xmm1
  mulsd  %xmm2,%xmm1
  movsd  0x10(%rsp),%xmm5
  mulsd  %xmm5,%xmm5
  movapd %xmm1,%xmm7
  subsd  %xmm5,%xmm7
  movapd %xmm7,%xmm2
  divsd  %xmm1,%xmm2
  movapd %xmm2,%xmm5
  mulsd  %xmm2,%xmm5
  movapd %xmm2,%xmm7
  movsd  %xmm5,0x18(%rsp)
  mulsd  %xmm5,%xmm7
  movapd %xmm2,%xmm6
  movsd  %xmm7,0x20(%rsp)
  mulsd  %xmm7,%xmm6
  movsd  %xmm6,0x28(%rsp)
  mov    D193(%rip),%rax
  movq   %rax,%xmm1
  movsd  %xmm2,0x10(%rsp)
  movapd %xmm2,%xmm0
  call   <pow@plt>
  movq   %r12,%xmm1
  mulsd  0x10(%rsp),%xmm1
  movapd %xmm1,%xmm0
  movq   %r12,%xmm1
  mulsd  %xmm1,%xmm0
  movsd  D356(%rip),%xmm1
  subsd  %xmm0,%xmm1
  movapd %xmm1,%xmm2
  mov    D193(%rip),%rax
  movq   %rax,%xmm1
  movapd %xmm2,%xmm0
  call   <pow@plt>
  movq   %r13,%xmm1
  divsd  %xmm1,%xmm0
  movsd  D356(%rip),%xmm1
  divsd  %xmm0,%xmm1
  mulsd  (%rsp),%xmm1
  movq   %r14,%xmm0
  subsd  0x30(%rsp),%xmm0
  divsd  %xmm1,%xmm0
  addsd  0x8(%rsp),%xmm0
  movsd  %xmm0,(%rbx)
  movq   %r15,%xmm0
  subsd  0x38(%rsp),%xmm0
  divsd  %xmm1,%xmm0
  call   <exp@plt>
  movapd %xmm0,%xmm1
  movsd  D356(%rip),%xmm0
  divsd  %xmm1,%xmm0
  call   <atan@plt>
  addsd  %xmm0,%xmm0
  movsd  D48(%rip),%xmm1
  subsd  %xmm0,%xmm1
  movapd %xmm1,%xmm0
  movsd  %xmm1,(%rsp)
  addsd  %xmm1,%xmm0
  call   <sin@plt>
  movq   %xmm0,%r14
  movsd  (%rsp),%xmm0
  mulsd  D333(%rip),%xmm0
  call   <sin@plt>
  movq   %xmm0,%r13
  movsd  (%rsp),%xmm0
  mulsd  D257(%rip),%xmm0
  call   <sin@plt>
  movq   %xmm0,%r12
  movsd  (%rsp),%xmm0
  mulsd  D86(%rip),%xmm0
  call   <sin@plt>
  movapd %xmm0,%xmm2
  movsd  0x18(%rsp),%xmm5
  movapd %xmm5,%xmm0
  mulsd  D240(%rip),%xmm0
  divsd  D31(%rip),%xmm0
  movsd  D193(%rip),%xmm8
  mulsd  0x10(%rsp),%xmm8
  addsd  %xmm8,%xmm0
  movsd  0x20(%rsp),%xmm7
  movapd %xmm7,%xmm1
  divsd  D19(%rip),%xmm1
  addsd  %xmm1,%xmm0
  movsd  0x28(%rsp),%xmm6
  movapd %xmm6,%xmm1
  mulsd  D10(%rip),%xmm1
  divsd  D281(%rip),%xmm1
  addsd  %xmm1,%xmm0
  movq   %r14,%xmm4
  mulsd  %xmm4,%xmm0
  addsd  (%rsp),%xmm0
  movsd  D245(%rip),%xmm4
  mulsd  %xmm4,%xmm5
  movapd %xmm5,%xmm1
  divsd  D171(%rip),%xmm1
  movapd %xmm7,%xmm3
  mulsd  D140(%rip),%xmm3
  divsd  D334(%rip),%xmm3
  addsd  %xmm3,%xmm1
  movapd %xmm6,%xmm3
  mulsd  D49(%rip),%xmm3
  divsd  D112(%rip),%xmm3
  addsd  %xmm3,%xmm1
  movq   %r13,%xmm5
  mulsd  %xmm5,%xmm1
  addsd  %xmm1,%xmm0
  mulsd  %xmm4,%xmm7
  movapd %xmm7,%xmm1
  divsd  D74(%rip),%xmm1
  movapd %xmm6,%xmm3
  mulsd  D374(%rip),%xmm3
  divsd  D235(%rip),%xmm3
  addsd  %xmm3,%xmm1
  movq   %r12,%xmm7
  mulsd  %xmm7,%xmm1
  addsd  %xmm1,%xmm0
  mulsd  D125(%rip),%xmm6
  movapd %xmm6,%xmm1
  divsd  D61(%rip),%xmm1
  mulsd  %xmm2,%xmm1
  addsd  %xmm1,%xmm0
  comisd D48(%rip),%xmm0
  jbe    L77
  mov    D48(%rip),%rax
  mov    %rax,0x0(%rbp)
L4:
  movsd  (%rbx),%xmm0
  comisd D196(%rip),%xmm0
  jbe    L94
  subsd  D54(%rip),%xmm0
  movsd  %xmm0,(%rbx)
L94:
  movsd  (%rbx),%xmm0
  movsd  D109(%rip),%xmm1
  comisd %xmm0,%xmm1
  jbe    L13
  addsd  D54(%rip),%xmm0
  movsd  %xmm0,(%rbx)
L13:
  movsd  (%rbx),%xmm0
  comisd D196(%rip),%xmm0
  jbe    L93
  mov    D196(%rip),%rax
  mov    %rax,(%rbx)
L65:
  movsd  (%rbx),%xmm0
  call   <GPS_Math_Rad_To_Deg@plt>
  movsd  %xmm0,(%rbx)
  movsd  0x0(%rbp),%xmm0
  call   <GPS_Math_Rad_To_Deg@plt>
  movsd  %xmm0,0x0(%rbp)
  add    $0x58,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L77:
  movsd  D156(%rip),%xmm1
  comisd %xmm0,%xmm1
  ja     L68
  movsd  %xmm0,0x0(%rbp)
  jmp    L4
L68:
  mov    D156(%rip),%rax
  mov    %rax,0x0(%rbp)
  jmp    L4
L93:
  movsd  D109(%rip),%xmm1
  comisd %xmm0,%xmm1
  jbe    L65
  movsd  %xmm1,(%rbx)
  jmp    L65
```

tool_calls: name: extract_symbolic_data
arguments: data_label: D196
type: f64[2]
name: extract_symbolic_data
arguments: data_label: D54
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D193
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D356
type: f64
name: extract_symbolic_data
arguments: data_label: D48
type: byte[16]
name: extract_symbolic_data
arguments: data_label: D333
type: f64
name: extract_symbolic_data
arguments: data_label: D257
type: f64
name: extract_symbolic_data
arguments: data_label: D86
type: f64
name: extract_symbolic_data
arguments: data_label: D240
type: f64
name: extract_symbolic_data
arguments: data_label: D31
type: f64
name: extract_symbolic_data
arguments: data_label: D19
type: f64
name: extract_symbolic_data
arguments: data_label: D10
type: f64
name: extract_symbolic_data
arguments: data_label: D281
type: f64
name: extract_symbolic_data
arguments: data_label: D245
type: f64
name: extract_symbolic_data
arguments: data_label: D171
type: f64
name: extract_symbolic_data
arguments: data_label: D140
type: f64
name: extract_symbolic_data
arguments: data_label: D334
type: f64
name: extract_symbolic_data
arguments: data_label: D49
type: f64
name: extract_symbolic_data
arguments: data_label: D112
type: f64
name: extract_symbolic_data
arguments: data_label: D74
type: f64
name: extract_symbolic_data
arguments: data_label: D374
type: f64
name: extract_symbolic_data
arguments: data_label: D235
type: f64
name: extract_symbolic_data
arguments: data_label: D125
type: f64
name: extract_symbolic_data
arguments: data_label: D61
type: f64
name: extract_symbolic_data
arguments: data_label: D109
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D156
type: byte[8]

tool: {"D196": [3.141592653589,6.283185307178]}

tool: {"D54": [0x1e,0x26,0x44,0x54,0xfb,0x21,0x19,0x40]}

tool: {"D193": [0x00,0x00,0x00,0x00,0x00,0x00,0xe0,0x3f]}

tool: D356: 1

tool: {"D48": [0x1e,0x26,0x44,0x54,0xfb,0x21,0xf9,0x3f,0x00,0x00,0x00,0x00,0x00,0x00,0x10,0x40]}

tool: D333: 4

tool: D257: 6

tool: D86: 8

tool: D240: 5

tool: D31: 24

tool: D19: 12

tool: D10: 13

tool: D281: 360

tool: D245: 7

tool: D171: 48

tool: D140: 29

tool: D334: 240

tool: D49: 811

tool: D112: 11520

tool: D74: 120

tool: D374: 81

tool: D235: 1120

tool: D125: 4279

tool: D61: 161280

tool: {"D109": [0x1e,0x26,0x44,0x54,0xfb,0x21,0x09,0xc0]}

tool: {"D156": [0x1e,0x26,0x44,0x54,0xfb,0x21,0xf9,0xbf]}

assistant: ```c
void GPS_Math_Mercator_EN_To_LatLon(double E, double N, double *phi, double *lambda, double phi0, double lambda0, double E0, double N0, double a, double b) {
  double p2;
  double po2;
  double a2;
  double b2;
  double e2;
  double e4;
  double e3;
  double e;
  double es;
  double ab;
  double bb;
  double cb;
  double db;
  double ml;
  double phi0s;
  double sf;
  double dx;
  double dy;
  double x;
  phi0 = GPS_Math_Deg_To_Rad(phi0);
  lambda0 = GPS_Math_Deg_To_Rad(lambda0);
  ml = ((double)3.141592653589 * (double)89.5) / (double)180.;
  p2 = (double)3.141592653589 * (double)2.0;
  po2 = (double)3.141592653589 / (double)2.0;
  if (lambda0 > 3.141592653589)
    lambda0 -= p2;
  a2 = a * a;
  b2 = b * b;
  es = (a2 - b2) / a2;
  e2 = es * es;
  e3 = e2 * es;
  e4 = e3 * es;
  e = pow(es, (double).5);
  phi0s = sin(phi0);
  sf = (double)1. / (pow((double)1. - es * phi0s * phi0s, (double).5) / cos(phi0));
  ab = es / (double)2. + (double)5. * e2 / (double)24. + e3 / (double)12. + (double)13. * e4 / (double)360.;
  bb = (double)7. * e2 / (double)48. + (double)29. * e3 / (double)240. + (double)811. * e4 / (double)11520.;
  cb = (double)7. * e3 / (double)120. + (double)81. * e4 / (double)1120.;
  db = (double)4279. * e4 / (double)161280.;
  dx = E - E0;
  dy = N - N0;
  *lambda = lambda0 + dx / (sf * a);
  x = (double)3.141592653589 / (double)2. - (double)2. * atan((double)1. / exp(dy / (sf * a)));
  *phi = x + ab * sin((double)2. * x) + bb * sin((double)4. * x) + cb * sin((double)6. * x) + db * sin((double)8. * x);
  if (*phi > po2)
    *phi = po2;
  else if (*phi < -po2)
    *phi = -po2;
  if (*lambda > 3.141592653589)
    *lambda -= p2;
  if (*lambda < -3.141592653589)
    *lambda += p2;
  if (*lambda > 3.141592653589)
    *lambda = 3.141592653589;
  else if (*lambda < -3.141592653589)
    *lambda = -3.141592653589;
  *lambda = GPS_Math_Rad_To_Deg(*lambda);
  *phi = GPS_Math_Rad_To_Deg(*phi);
  return;
}
```