user: 请显示与下面列出的汇编代码相匹配的C语言实现:

```asm
<GPS_Math_TCylEA_LatLon_To_EN>:
  endbr64
  push   %r14
  mov    $0x1,%eax
  push   %r13
  push   %r12
  push   %rbp
  mov    %rdi,%rbp
  push   %rbx
  mov    %rsi,%rbx
  sub    $0xa0,%rsp
  movsd  %xmm0,0x20(%rsp)
  movapd %xmm1,%xmm0
  movsd  %xmm4,0x70(%rsp)
  movsd  %xmm7,0x10(%rsp)
  movsd  %xmm3,0x18(%rsp)
  movsd  %xmm5,0x78(%rsp)
  movsd  %xmm2,(%rsp)
  movsd  %xmm6,0x8(%rsp)
  call   <GPS_Math_Deg_To_Rad@plt>
  pxor   %xmm6,%xmm6
  movsd  0x20(%rsp),%xmm8
  cvtsi2sd %eax,%xmm6
  mov    $0x1,%eax
  movapd %xmm8,%xmm0
  movq   %xmm6,%r14
  call   <GPS_Math_Deg_To_Rad@plt>
  pxor   %xmm6,%xmm6
  movsd  (%rsp),%xmm2
  cvtsi2sd %eax,%xmm6
  mov    $0x1,%eax
  movapd %xmm2,%xmm0
  movq   %xmm6,%r12
  call   <GPS_Math_Deg_To_Rad@plt>
  pxor   %xmm6,%xmm6
  movsd  0x18(%rsp),%xmm3
  cvtsi2sd %eax,%xmm6
  mov    $0x1,%eax
  movapd %xmm3,%xmm0
  movsd  %xmm6,(%rsp)
  call   <GPS_Math_Deg_To_Rad@plt>
  pxor   %xmm4,%xmm4
  movsd  0x10(%rsp),%xmm7
  cmp    $0x3,%eax
  cvtsi2sd %eax,%xmm4
  jle    L3
  subsd  D179(%rip),%xmm4
L3:
  movsd  0x8(%rsp),%xmm6
  mulsd  %xmm7,%xmm7
  mov    D340(%rip),%rax
  movsd  %xmm4,0x88(%rsp)
  movapd %xmm6,%xmm0
  mulsd  %xmm6,%xmm0
  movapd %xmm0,%xmm1
  subsd  %xmm7,%xmm1
  divsd  %xmm0,%xmm1
  movapd %xmm1,%xmm6
  movapd %xmm1,%xmm7
  movapd %xmm1,%xmm4
  mulsd  %xmm1,%xmm6
  movapd %xmm4,%xmm0
  movq   %rax,%xmm1
  movsd  %xmm4,0x10(%rsp)
  mulsd  %xmm6,%xmm7
  movsd  %xmm6,0x50(%rsp)
  movsd  %xmm7,0x58(%rsp)
  call   <pow@plt>
  movsd  D443(%rip),%xmm3
  subsd  0x10(%rsp),%xmm3
  mov    D340(%rip),%rax
  movsd  %xmm0,0x18(%rsp)
  movq   %rax,%xmm1
  movapd %xmm3,%xmm0
  movsd  %xmm3,0x20(%rsp)
  call   <pow@plt>
  movsd  0x18(%rsp),%xmm5
  movsd  D443(%rip),%xmm2
  movsd  D443(%rip),%xmm1
  movapd %xmm5,%xmm3
  subsd  %xmm5,%xmm2
  addsd  %xmm5,%xmm3
  addsd  %xmm5,%xmm1
  movapd %xmm3,%xmm0
  movsd  D443(%rip),%xmm3
  divsd  %xmm0,%xmm3
  movapd %xmm2,%xmm0
  divsd  %xmm1,%xmm0
  movsd  %xmm3,0x28(%rsp)
  call   <log@plt>
  movsd  0x20(%rsp),%xmm5
  movsd  D443(%rip),%xmm1
  mulsd  0x28(%rsp),%xmm0
  movsd  0x10(%rsp),%xmm4
  divsd  %xmm5,%xmm1
  movsd  0x50(%rsp),%xmm6
  movsd  D65(%rip),%xmm2
  movsd  D443(%rip),%xmm3
  movsd  0x58(%rsp),%xmm7
  mulsd  %xmm6,%xmm2
  mulsd  D387(%rip),%xmm6
  subsd  %xmm0,%xmm1
  movsd  D537(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  mulsd  %xmm5,%xmm1
  movsd  D18(%rip),%xmm5
  subsd  %xmm0,%xmm3
  movsd  D233(%rip),%xmm0
  movsd  %xmm1,0x60(%rsp)
  movsd  D449(%rip),%xmm1
  mulsd  %xmm2,%xmm0
  mulsd  D253(%rip),%xmm2
  mulsd  %xmm7,%xmm1
  mulsd  D129(%rip),%xmm1
  subsd  %xmm0,%xmm3
  movsd  D399(%rip),%xmm0
  mulsd  %xmm7,%xmm0
  mulsd  D261(%rip),%xmm7
  mulsd  %xmm5,%xmm0
  subsd  %xmm0,%xmm3
  movsd  D65(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  movapd %xmm7,%xmm4
  divsd  D169(%rip),%xmm4
  movsd  %xmm4,0x48(%rsp)
  mulsd  D477(%rip),%xmm0
  movsd  %xmm3,0x30(%rsp)
  addsd  %xmm2,%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm0,0x38(%rsp)
  movapd %xmm6,%xmm0
  mulsd  %xmm5,%xmm0
  movapd %xmm0,%xmm5
  addsd  %xmm1,%xmm5
  movsd  (%rsp),%xmm1
  movapd %xmm1,%xmm0
  addsd  %xmm1,%xmm0
  movsd  %xmm5,0x40(%rsp)
  call   <sin@plt>
  movsd  D402(%rip),%xmm2
  mulsd  (%rsp),%xmm2
  movsd  %xmm0,0x80(%rsp)
  movapd %xmm2,%xmm0
  call   <sin@plt>
  movsd  D62(%rip),%xmm2
  mulsd  (%rsp),%xmm2
  movsd  %xmm0,0x68(%rsp)
  movapd %xmm2,%xmm0
  call   <sin@plt>
  movsd  (%rsp),%xmm1
  mulsd  0x30(%rsp),%xmm1
  movsd  0x80(%rsp),%xmm3
  mulsd  0x38(%rsp),%xmm3
  movapd %xmm0,%xmm5
  movsd  0x68(%rsp),%xmm2
  mulsd  0x40(%rsp),%xmm2
  movsd  0x88(%rsp),%xmm4
  mulsd  0x48(%rsp),%xmm5
  subsd  %xmm3,%xmm1
  movq   %r14,%xmm3
  subsd  %xmm4,%xmm3
  comisd D505(%rip),%xmm3
  addsd  %xmm2,%xmm1
  subsd  %xmm5,%xmm1
  mulsd  0x8(%rsp),%xmm1
  movsd  %xmm1,0x68(%rsp)
  jbe    L34
  subsd  D179(%rip),%xmm3
L34:
  movsd  D176(%rip),%xmm0
  comisd %xmm3,%xmm0
  jbe    L39
  addsd  D179(%rip),%xmm3
L39:
  movsd  %xmm3,0x80(%rsp)
  movq   %r12,%xmm0
  call   <sin@plt>
  movsd  0x18(%rsp),%xmm2
  movsd  %xmm0,(%rsp)
  mulsd  %xmm0,%xmm2
  movsd  D443(%rip),%xmm0
  subsd  %xmm2,%xmm0
  addsd  D443(%rip),%xmm2
  divsd  %xmm2,%xmm0
  call   <log@plt>
  movsd  (%rsp),%xmm1
  movsd  0x10(%rsp),%xmm2
  movsd  D443(%rip),%xmm4
  mulsd  0x28(%rsp),%xmm0
  movsd  0x80(%rsp),%xmm3
  mulsd  %xmm1,%xmm2
  mulsd  %xmm1,%xmm2
  subsd  %xmm2,%xmm4
  divsd  %xmm4,%xmm1
  subsd  %xmm0,%xmm1
  mulsd  0x20(%rsp),%xmm1
  divsd  0x60(%rsp),%xmm1
  comisd D443(%rip),%xmm1
  jbe    L7
  mov    D443(%rip),%rax
  movq   %rax,%xmm1
L25:
  lea    0x98(%rsp),%r12
  movapd %xmm3,%xmm0
  lea    0x90(%rsp),%r13
  movsd  %xmm1,0x18(%rsp)
  mov    %r13,%rsi
  mov    %r12,%rdi
  call   <sincos@plt>
  movsd  0x18(%rsp),%xmm1
  movsd  0x90(%rsp),%xmm6
  movsd  0x98(%rsp),%xmm7
  movapd %xmm1,%xmm0
  movsd  %xmm6,(%rsp)
  movsd  %xmm7,0x20(%rsp)
  call   <asin@plt>
  movq   %xmm0,%r14
  call   <tan@plt>
  divsd  (%rsp),%xmm0
  call   <atan@plt>
  movapd %xmm0,%xmm1
  andpd  D106(%rip),%xmm0
  subsd  D14(%rip),%xmm0
  comisd D212(%rip),%xmm0
  movsd  %xmm1,(%rsp)
  ja     L59
  movapd %xmm1,%xmm0
  movsd  %xmm1,0x18(%rsp)
  addsd  %xmm1,%xmm0
  call   <sin@plt>
  movsd  0x18(%rsp),%xmm1
  movsd  D402(%rip),%xmm5
  movsd  %xmm0,(%rsp)
  mulsd  %xmm1,%xmm5
  movsd  %xmm1,0x28(%rsp)
  movapd %xmm5,%xmm0
  call   <sin@plt>
  movsd  0x28(%rsp),%xmm1
  movsd  D62(%rip),%xmm4
  movsd  %xmm0,0x18(%rsp)
  mulsd  %xmm1,%xmm4
  movapd %xmm4,%xmm0
  call   <sin@plt>
  movsd  0x50(%rsp),%xmm5
  movsd  D242(%rip),%xmm2
  movsd  0x58(%rsp),%xmm7
  movsd  0x10(%rsp),%xmm6
  divsd  D65(%rip),%xmm6
  movapd %xmm0,%xmm4
  mulsd  %xmm5,%xmm2
  movsd  D80(%rip),%xmm3
  movsd  0x28(%rsp),%xmm1
  divsd  D455(%rip),%xmm2
  addsd  %xmm6,%xmm2
  movsd  D196(%rip),%xmm6
  mulsd  D492(%rip),%xmm5
  mulsd  %xmm7,%xmm3
  mulsd  %xmm7,%xmm6
  divsd  D68(%rip),%xmm3
  mulsd  D72(%rip),%xmm7
  movapd %xmm6,%xmm0
  divsd  D339(%rip),%xmm0
  addsd  %xmm0,%xmm2
  movapd %xmm5,%xmm0
  mulsd  (%rsp),%xmm2
  divsd  D401(%rip),%xmm0
  addsd  %xmm3,%xmm0
  mulsd  0x18(%rsp),%xmm0
  addsd  %xmm1,%xmm2
  addsd  %xmm0,%xmm2
  movapd %xmm7,%xmm0
  divsd  D113(%rip),%xmm0
  mulsd  %xmm4,%xmm0
  addsd  %xmm0,%xmm2
  movsd  %xmm2,(%rsp)
L59:
  movsd  (%rsp),%xmm0
  mov    %r13,%rsi
  mov    %r12,%rdi
  movsd  %xmm1,0x18(%rsp)
  call   <sincos@plt>
  movq   %r14,%xmm0
  movsd  0x90(%rsp),%xmm5
  movsd  0x98(%rsp),%xmm3
  movsd  %xmm5,0x28(%rsp)
  movsd  %xmm3,0x58(%rsp)
  call   <cos@plt>
  movsd  0x18(%rsp),%xmm1
  movsd  %xmm0,0x50(%rsp)
  movapd %xmm1,%xmm0
  call   <cos@plt>
  movsd  0x58(%rsp),%xmm3
  movsd  0x10(%rsp),%xmm6
  movsd  D443(%rip),%xmm7
  mov    D340(%rip),%rax
  movsd  %xmm0,0x18(%rsp)
  mulsd  %xmm3,%xmm6
  movapd %xmm6,%xmm1
  mulsd  %xmm3,%xmm1
  subsd  %xmm1,%xmm7
  movq   %rax,%xmm1
  movapd %xmm7,%xmm0
  call   <pow@plt>
  movsd  0x50(%rsp),%xmm2
  mulsd  0x8(%rsp),%xmm2
  movapd %xmm0,%xmm1
  movsd  0x28(%rsp),%xmm0
  mulsd  0x18(%rsp),%xmm1
  mulsd  %xmm2,%xmm0
  mulsd  0x20(%rsp),%xmm0
  divsd  %xmm1,%xmm0
  movsd  (%rsp),%xmm1
  addsd  0x70(%rsp),%xmm0
  movsd  %xmm0,0x0(%rbp)
  movapd %xmm1,%xmm0
  addsd  %xmm1,%xmm0
  call   <sin@plt>
  movsd  D402(%rip),%xmm7
  mulsd  (%rsp),%xmm7
  movsd  %xmm0,0x10(%rsp)
  movapd %xmm7,%xmm0
  call   <sin@plt>
  movsd  D62(%rip),%xmm7
  mulsd  (%rsp),%xmm7
  movsd  %xmm0,0x18(%rsp)
  movapd %xmm7,%xmm0
  call   <sin@plt>
  movsd  (%rsp),%xmm1
  movsd  0x10(%rsp),%xmm2
  mulsd  0x30(%rsp),%xmm1
  mulsd  0x38(%rsp),%xmm2
  mulsd  0x48(%rsp),%xmm0
  subsd  %xmm2,%xmm1
  movsd  0x18(%rsp),%xmm2
  mulsd  0x40(%rsp),%xmm2
  addsd  %xmm2,%xmm1
  subsd  %xmm0,%xmm1
  mulsd  0x8(%rsp),%xmm1
  subsd  0x68(%rsp),%xmm1
  addsd  0x78(%rsp),%xmm1
  movsd  %xmm1,(%rbx)
  add    $0xa0,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  nopl   0x0(%rax)
L7:
  movsd  D300(%rip),%xmm0
  maxsd  %xmm1,%xmm0
  movapd %xmm0,%xmm1
  jmp    L25
```

tool_calls: name: parse_data
arguments: data_label: D179
type_infered: byte[8]
name: parse_data
arguments: data_label: D340
type_infered: byte[8]
name: parse_data
arguments: data_label: D443
type_infered: f64[2]
name: parse_data
arguments: data_label: D65
type_infered: f64
name: parse_data
arguments: data_label: D387
type_infered: f64
name: parse_data
arguments: data_label: D537
type_infered: byte[8]
name: parse_data
arguments: data_label: D18
type_infered: byte[8]
name: parse_data
arguments: data_label: D233
type_infered: byte[8]
name: parse_data
arguments: data_label: D449
type_infered: f64
name: parse_data
arguments: data_label: D253
type_infered: byte[8]
name: parse_data
arguments: data_label: D129
type_infered: byte[8]
name: parse_data
arguments: data_label: D399
type_infered: f64
name: parse_data
arguments: data_label: D261
type_infered: f64
name: parse_data
arguments: data_label: D169
type_infered: f64
name: parse_data
arguments: data_label: D477
type_infered: byte[8]
name: parse_data
arguments: data_label: D402
type_infered: f64
name: parse_data
arguments: data_label: D62
type_infered: f64
name: parse_data
arguments: data_label: D505
type_infered: f64[2]
name: parse_data
arguments: data_label: D176
type_infered: byte[8]
name: parse_data
arguments: data_label: D106
type_infered: qword[2]
name: parse_data
arguments: data_label: D14
type_infered: byte[8]
name: parse_data
arguments: data_label: D212
type_infered: byte[16]
name: parse_data
arguments: data_label: D242
type_infered: f64
name: parse_data
arguments: data_label: D80
type_infered: f64
name: parse_data
arguments: data_label: D455
type_infered: f64
name: parse_data
arguments: data_label: D196
type_infered: f64
name: parse_data
arguments: data_label: D492
type_infered: f64
name: parse_data
arguments: data_label: D68
type_infered: f64
name: parse_data
arguments: data_label: D72
type_infered: f64
name: parse_data
arguments: data_label: D339
type_infered: f64
name: parse_data
arguments: data_label: D401
type_infered: f64
name: parse_data
arguments: data_label: D113
type_infered: f64
name: parse_data
arguments: data_label: D300
type_infered: byte[8]

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

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

tool: {"D443": [1.0,-1.0]}

tool: D65: 3

tool: D387: 15

tool: {"D537": [0x00,0x00,0x00,0x00,0x00,0x00,0xd0,0x3f]}

tool: {"D18": [0x00,0x00,0x00,0x00,0x00,0x00,0x70,0x3f]}

tool: {"D233": [0x00,0x00,0x00,0x00,0x00,0x00,0x90,0x3f]}

tool: D449: 45

tool: {"D253": [0x00,0x00,0x00,0x00,0x00,0x00,0xa0,0x3f]}

tool: {"D129": [0x00,0x00,0x00,0x00,0x00,0x00,0x50,0x3f]}

tool: D399: 5

tool: D261: 35

tool: D169: 3072

tool: {"D477": [0x00,0x00,0x00,0x00,0x00,0x00,0xc0,0x3f]}

tool: D402: 4

tool: D62: 6

tool: {"D505": [3.141592653589,-3.141592653589]}

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

tool: {"D106": [0x7fffffffffffffff,0x0000000000000000]}

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

tool: {"D212": [0x3a,0x8c,0x30,0xe2,0x8e,0x79,0x45,0x3e,0x00,0x00,0x00,0x00,0x00,0x00,0x3f,0x40]}

tool: D242: 31

tool: D80: 251

tool: D455: 180

tool: D196: 517

tool: D492: 23

tool: D68: 3780

tool: D72: 761

tool: D339: 5040

tool: D401: 360

tool: D113: 45360

tool: {"D300": [0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0xbf]}

assistant: ```c
void GPS_Math_TCylEA_LatLon_To_EN(double phi, double lambda, double *E, double *N, double phi0, double M0, double E0, double N0, double a, double b) {
  double p2;
  double po2;
  double a2;
  double b2;
  double e;
  double e2;
  double e4;
  double e6;
  double AM0;
  double qp;
  double om;
  double oo;
  double c0;
  double c1;
  double c2;
  double c3;
  double b0;
  double b1;
  double B2;
  double b3;
  double A0;
  double A1;
  double A2;
  double sf;
  double x;
  double som;
  double phis;
  double j;
  double te4;
  double lat;
  double phi0s2;
  double phi0s4;
  double phi0s6;
  double E1;
  double E2;
  double E3;
  double E4;
  double dlam;
  double qq;
  double qqo;
  double bt;
  double btc;
  double PHI;
  double PHIs2;
  double PHIs4;
  double PHIs6;
  double bts2;
  double bts4;
  double bts6;
  double PHIc;
  double PHIcs;
  double Mc;
  sf = (double)1.0;
  lambda = GPS_Math_Deg_To_Rad(lambda);
  phi = GPS_Math_Deg_To_Rad(phi);
  phi0 = GPS_Math_Deg_To_Rad(phi0);
  M0 = GPS_Math_Deg_To_Rad(M0);
  p2 = (double)3.141592653589 * (double)2.0;
  po2 = (double)3.141592653589 / (double)2.0;
  if (M0 > 3.141592653589)
    M0 -= p2;
  a2 = a * a;
  b2 = b * b;
  e2 = (a2 - b2) / a2;
  e4 = e2 * e2;
  e6 = e2 * e4;
  e = pow(e2, (double).5);
  om = (double)1. - e2;
  som = pow(om, (double).5);
  oo = (double)1. / ((double)2. * e);
  phis = sin(po2);
  x = e * phis;
  qp = om * (phis / ((double)1. - e2 * phis * phis) - oo * log(((double)1. - x) / ((double)1. + x)));
  A0 = e2 / (double)3. + (double)31. * e4 / (double)180. + (double)517. * e6 / (double)5040.;
  A1 = (double)23. * e4 / (double)360. + (double)251. * e6 / (double)3780.;
  A2 = (double)761. * e6 / (double)45360.;
  E1 = ((double)1.0 - som) / ((double)1.0 + som);
  E2 = E1 * E1;
  E3 = E2 * E1;
  E4 = E3 * E1;
  b0 = (double)3. * E1 / (double)2. - (double)27. * E3 / (double)32.;
  b1 = (double)21. * E2 / (double)16. - (double)55. * E4 / (double)32.;
  B2 = (double)151. * E3 / (double)96.;
  b3 = (double)1097. * E4 / (double)512.;
  j = (double)45.0 * e6 / (double)1024.0;
  te4 = (double)3.0 * e4;
  c0 = (double)1.0 - e2 / (double)4.0 - te4 / (double)64.0 - (double)5.0 * e6 / (double)256.0;
  c1 = (double)3.0 * e2 / (double)8.0 + te4 / (double)32.0 + j;
  c2 = (double)15.0 * e4 / (double)256.0 + j;
  c3 = (double)35.0 * e6 / (double)3072.0;
  lat = c0 * phi0;
  phi0s2 = c1 * sin((double)2.0 * phi0);
  phi0s4 = c2 * sin((double)4.0 * phi0);
  phi0s6 = c3 * sin((double)6.0 * phi0);
  AM0 = a * (lat - phi0s2 + phi0s4 - phi0s6);
  dlam = lambda - M0;
  if (dlam > 3.141592653589)
    dlam -= p2;
  if (dlam < -3.141592653589)
    dlam += p2;
  phis = sin(phi);
  if (phi == po2) {
    qq = qp;
    qqo = (double)1.;
  } else {
    x = e * phis;
    qq = om * (phis / ((double)1. - e2 * phis * phis) - oo * log(((double)1. - x) / ((double)1. + x)));
    qqo = qq / qp;
  }
  if (qqo > (double)1.)
    qqo = (double)1.;
  else if (qqo < (double)-1.)
    qqo = (double)-1.;
  bt = asin(qqo);
  btc = atan(tan(bt) / cos(dlam));
  if ((fabs(btc) - po2) > (double)1.0e-8)
    PHIc = btc;
  else {
    bts2 = A0 * sin((double)2.0 * btc);
    bts4 = A1 * sin((double)4.0 * btc);
    bts6 = A2 * sin((double)6.0 * btc);
    PHIc = btc + bts2 + bts4 + bts6;
  }
  PHIcs = sin(PHIc);
  *E = a * cos(bt) * cos(PHIc) * sin(dlam) / (sf * cos(btc) * pow((double)1. - e2 * PHIcs * PHIcs, (double).5)) + E0;
  PHI = c0 * PHIc;
  PHIs2 = c1 * sin((double)2.0 * PHIc);
  PHIs4 = c2 * sin((double)4.0 * PHIc);
  PHIs6 = c3 * sin((double)6.0 * PHIc);
  Mc = a * (PHI - PHIs2 + PHIs4 - PHIs6);
  *N = sf * (Mc - AM0) + N0;
  return;
}
```