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

```asm
<GPS_Math_Albers_EN_To_LatLon>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x98,%rsp
  movsd  %xmm0,0x58(%rsp)
  movsd  %xmm1,0x60(%rsp)
  mov    %rdi,%r12
  mov    %rsi,%rbx
  movq   %xmm2,%rbp
  movq   %xmm3,%r15
  movapd %xmm4,%xmm0
  movq   %xmm5,%r14
  movsd  %xmm6,0x68(%rsp)
  movsd  %xmm7,0x70(%rsp)
  call   <GPS_Math_Deg_To_Rad@plt>
  movsd  %xmm0,0x10(%rsp)
  movq   %rbp,%xmm0
  call   <GPS_Math_Deg_To_Rad@plt>
  movsd  %xmm0,0x28(%rsp)
  lea    0x88(%rsp),%rdi
  lea    0x80(%rsp),%rsi
  call   <sincos@plt>
  mov    0x80(%rsp),%r13
  mov    0x88(%rsp),%rbp
  movq   %r15,%xmm0
  call   <GPS_Math_Deg_To_Rad@plt>
  movq   %xmm0,%r15
  movq   %r14,%xmm0
  call   <GPS_Math_Deg_To_Rad@plt>
  movsd  %xmm0,0x40(%rsp)
  movsd  0xd0(%rsp),%xmm2
  mulsd  %xmm2,%xmm2
  movsd  %xmm2,0x48(%rsp)
  movsd  0xd8(%rsp),%xmm0
  mulsd  %xmm0,%xmm0
  movapd %xmm2,%xmm1
  subsd  %xmm0,%xmm1
  divsd  %xmm2,%xmm1
  movapd %xmm1,%xmm6
  mov    D365(%rip),%rax
  movq   %rax,%xmm1
  movsd  %xmm6,0x18(%rsp)
  movapd %xmm6,%xmm0
  call   <pow@plt>
  movsd  %xmm0,0x8(%rsp)
  movsd  0x10(%rsp),%xmm0
  call   <sin@plt>
  movq   %xmm0,%r14
  movapd %xmm0,%xmm7
  movsd  0x8(%rsp),%xmm4
  mulsd  %xmm4,%xmm7
  movsd  D152(%rip),%xmm5
  subsd  0x18(%rsp),%xmm5
  movsd  %xmm5,0x20(%rsp)
  movapd %xmm4,%xmm5
  addsd  %xmm4,%xmm5
  movsd  %xmm5,0x78(%rsp)
  movsd  D152(%rip),%xmm2
  divsd  %xmm5,%xmm2
  movsd  %xmm2,0x18(%rsp)
  movsd  D152(%rip),%xmm0
  subsd  %xmm7,%xmm0
  movsd  D152(%rip),%xmm1
  movsd  %xmm7,0x10(%rsp)
  addsd  %xmm7,%xmm1
  divsd  %xmm1,%xmm0
  call   <log@plt>
  movsd  0x10(%rsp),%xmm7
  movapd %xmm7,%xmm1
  mulsd  %xmm7,%xmm1
  movsd  D152(%rip),%xmm3
  subsd  %xmm1,%xmm3
  movq   %r14,%xmm1
  divsd  %xmm3,%xmm1
  mulsd  0x18(%rsp),%xmm0
  subsd  %xmm0,%xmm1
  mulsd  0x20(%rsp),%xmm1
  movq   %xmm1,%r14
  mov    %rbp,0x10(%rsp)
  movq   %rbp,%xmm3
  mulsd  0x8(%rsp),%xmm3
  movapd %xmm3,%xmm0
  movsd  %xmm3,0x30(%rsp)
  mulsd  %xmm3,%xmm0
  movsd  D152(%rip),%xmm6
  subsd  %xmm0,%xmm6
  mov    D365(%rip),%rax
  movq   %rax,%xmm1
  movsd  %xmm6,0x38(%rsp)
  movapd %xmm6,%xmm0
  call   <pow@plt>
  movq   %r13,%xmm4
  divsd  %xmm0,%xmm4
  movsd  %xmm4,0x50(%rsp)
  movsd  D152(%rip),%xmm1
  movsd  0x30(%rsp),%xmm3
  subsd  %xmm3,%xmm1
  movapd %xmm1,%xmm0
  movsd  D152(%rip),%xmm1
  addsd  %xmm3,%xmm1
  divsd  %xmm1,%xmm0
  call   <log@plt>
  movq   %rbp,%xmm1
  divsd  0x38(%rsp),%xmm1
  mulsd  0x18(%rsp),%xmm0
  subsd  %xmm0,%xmm1
  mulsd  0x20(%rsp),%xmm1
  movsd  %xmm1,0x30(%rsp)
  movsd  0x50(%rsp),%xmm4
  mulsd  %xmm4,%xmm4
  movsd  %xmm4,0x38(%rsp)
  movsd  0x28(%rsp),%xmm0
  movq   %r15,%xmm2
  subsd  %xmm2,%xmm0
  andpd  D217(%rip),%xmm0
  comisd D114(%rip),%xmm0
  ja     L102
L161:
  movsd  0x30(%rsp),%xmm0
  movsd  0x10(%rsp),%xmm5
  mulsd  %xmm5,%xmm0
  movapd %xmm0,%xmm3
  addsd  0x38(%rsp),%xmm3
  movsd  %xmm3,0x28(%rsp)
  movq   %r14,%xmm1
  mulsd  %xmm5,%xmm1
  pxor   %xmm0,%xmm0
  comisd %xmm3,%xmm1
  jbe    L50
L136:
  movsd  0x58(%rsp),%xmm5
  subsd  0x68(%rsp),%xmm5
  movsd  0x60(%rsp),%xmm1
  subsd  0x70(%rsp),%xmm1
  movapd %xmm0,%xmm6
  subsd  %xmm1,%xmm6
  movapd %xmm5,%xmm0
  movsd  %xmm5,0x30(%rsp)
  mulsd  %xmm5,%xmm0
  movapd %xmm6,%xmm1
  movsd  %xmm6,0x38(%rsp)
  mulsd  %xmm6,%xmm1
  addsd  %xmm1,%xmm0
  movsd  D365(%rip),%xmm1
  call   <pow@plt>
  movq   %xmm0,%r13
  pxor   %xmm0,%xmm0
  comisd 0x10(%rsp),%xmm0
  ja     L178
L167:
  movq   %r13,%xmm5
  ucomisd D159(%rip),%xmm5
  jp     L221
  mov    D159(%rip),%rbp
  jne    L221
L172:
  movq   %r13,%xmm0
  movsd  0x10(%rsp),%xmm7
  mulsd  %xmm7,%xmm0
  mulsd  %xmm0,%xmm0
  divsd  0x48(%rsp),%xmm0
  movsd  0x28(%rsp),%xmm1
  subsd  %xmm0,%xmm1
  divsd  %xmm7,%xmm1
  movq   %xmm1,%r13
  movsd  D152(%rip),%xmm0
  movsd  0x8(%rsp),%xmm4
  subsd  %xmm4,%xmm0
  movsd  D152(%rip),%xmm1
  addsd  %xmm4,%xmm1
  divsd  %xmm1,%xmm0
  call   <log@plt>
  movsd  0x18(%rsp),%xmm1
  mulsd  %xmm0,%xmm1
  movsd  D152(%rip),%xmm0
  subsd  %xmm1,%xmm0
  movq   D217(%rip),%xmm1
  andpd  %xmm1,%xmm0
  movq   %r13,%xmm2
  andpd  %xmm1,%xmm2
  subsd  %xmm2,%xmm0
  andpd  %xmm1,%xmm0
  comisd D348(%rip),%xmm0
  jbe    L84
  movq   %r13,%xmm0
  mulsd  D365(%rip),%xmm0
  comisd D152(%rip),%xmm0
  jbe    L242
  mov    D293(%rip),%rax
  mov    %rax,(%r12)
L140:
  movq   %rbp,%xmm0
  divsd  0x10(%rsp),%xmm0
  addsd  0x40(%rsp),%xmm0
  comisd D54(%rip),%xmm0
  ja     L130
  movsd  %xmm0,(%rbx)
L18:
  movsd  (%rbx),%xmm0
  movsd  D307(%rip),%xmm1
  comisd %xmm0,%xmm1
  jbe    L195
  addsd  D440(%rip),%xmm0
  movsd  %xmm0,(%rbx)
L195:
  movsd  (%rbx),%xmm0
  comisd D54(%rip),%xmm0
  jbe    L188
  mov    D54(%rip),%rax
  mov    %rax,(%rbx)
L244:
  movsd  (%r12),%xmm0
  call   <GPS_Math_Rad_To_Deg@plt>
  movsd  %xmm0,(%r12)
  movsd  (%rbx),%xmm0
  call   <GPS_Math_Rad_To_Deg@plt>
  movsd  %xmm0,(%rbx)
  add    $0x98,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L102:
  lea    0x88(%rsp),%rdi
  lea    0x80(%rsp),%rsi
  movq   %r15,%xmm0
  call   <sincos@plt>
  mov    0x80(%rsp),%r13
  mov    0x88(%rsp),%rbp
  movq   %rbp,%xmm0
  mulsd  0x8(%rsp),%xmm0
  movsd  %xmm0,0x10(%rsp)
  mulsd  %xmm0,%xmm0
  movsd  D152(%rip),%xmm4
  subsd  %xmm0,%xmm4
  movsd  D365(%rip),%xmm1
  movsd  %xmm4,0x28(%rsp)
  movapd %xmm4,%xmm0
  call   <pow@plt>
  movq   %r13,%xmm1
  divsd  %xmm0,%xmm1
  movsd  %xmm1,0x50(%rsp)
  movsd  D152(%rip),%xmm3
  movsd  0x10(%rsp),%xmm5
  subsd  %xmm5,%xmm3
  movapd %xmm3,%xmm0
  movsd  D152(%rip),%xmm6
  addsd  %xmm5,%xmm6
  divsd  %xmm6,%xmm0
  call   <log@plt>
  movsd  0x50(%rsp),%xmm1
  mulsd  %xmm1,%xmm1
  movsd  0x38(%rsp),%xmm2
  subsd  %xmm1,%xmm2
  movq   %rbp,%xmm3
  divsd  0x28(%rsp),%xmm3
  movapd %xmm0,%xmm1
  mulsd  0x18(%rsp),%xmm1
  subsd  %xmm1,%xmm3
  movapd %xmm3,%xmm0
  mulsd  0x20(%rsp),%xmm0
  subsd  0x30(%rsp),%xmm0
  divsd  %xmm0,%xmm2
  movsd  %xmm2,0x10(%rsp)
  jmp    L161
L50:
  movapd %xmm3,%xmm0
  subsd  %xmm1,%xmm0
  movsd  D365(%rip),%xmm1
  call   <pow@plt>
  movapd %xmm0,%xmm1
  movsd  0xd0(%rsp),%xmm0
  divsd  0x10(%rsp),%xmm0
  mulsd  %xmm1,%xmm0
  jmp    L136
L178:
  movq   D300(%rip),%xmm0
  movq   %r13,%xmm7
  xorpd  %xmm0,%xmm7
  movq   %xmm7,%r13
  movsd  0x30(%rsp),%xmm5
  xorpd  %xmm0,%xmm5
  movsd  %xmm5,0x30(%rsp)
  movsd  0x38(%rsp),%xmm6
  xorpd  %xmm0,%xmm6
  movsd  %xmm6,0x38(%rsp)
  jmp    L167
L221:
  movsd  0x38(%rsp),%xmm1
  movsd  0x30(%rsp),%xmm0
  call   <atan2@plt>
  movq   %xmm0,%rbp
  jmp    L172
L242:
  movsd  D371(%rip),%xmm1
  comisd %xmm0,%xmm1
  jbe    L191
  mov    D153(%rip),%rax
  mov    %rax,(%r12)
  jmp    L140
L191:
  call   <asin@plt>
  movsd  %xmm0,0x18(%rsp)
  movsd  D114(%rip),%xmm0
  comisd 0x8(%rsp),%xmm0
  ja     L38
  movq   %r13,%xmm6
  divsd  0x20(%rsp),%xmm6
  movsd  %xmm6,0x28(%rsp)
  lea    0x88(%rsp),%r15
L251:
  lea    0x80(%rsp),%rsi
  mov    %r15,%rdi
  movsd  0x18(%rsp),%xmm0
  call   <sincos@plt>
  mov    0x80(%rsp),%r14
  mov    0x88(%rsp),%r13
  movq   %r13,%xmm1
  mulsd  0x8(%rsp),%xmm1
  movapd %xmm1,%xmm0
  mulsd  %xmm1,%xmm0
  movsd  D152(%rip),%xmm6
  subsd  %xmm0,%xmm6
  movsd  %xmm6,0x20(%rsp)
  movsd  D152(%rip),%xmm0
  subsd  %xmm1,%xmm0
  addsd  D152(%rip),%xmm1
  divsd  %xmm1,%xmm0
  call   <log@plt>
  movq   %r13,%xmm2
  movsd  0x20(%rsp),%xmm6
  divsd  %xmm6,%xmm2
  movsd  0x28(%rsp),%xmm1
  subsd  %xmm2,%xmm1
  divsd  0x78(%rsp),%xmm0
  addsd  %xmm1,%xmm0
  movapd %xmm6,%xmm1
  mulsd  %xmm6,%xmm1
  movq   %r14,%xmm2
  addsd  %xmm2,%xmm2
  divsd  %xmm2,%xmm1
  mulsd  %xmm1,%xmm0
  movsd  0x18(%rsp),%xmm5
  addsd  %xmm0,%xmm5
  movsd  %xmm5,0x18(%rsp)
  andpd  D217(%rip),%xmm0
  comisd D58(%rip),%xmm0
  ja     L251
L38:
  movsd  0x18(%rsp),%xmm7
  movsd  %xmm7,(%r12)
  comisd D293(%rip),%xmm7
  jbe    L240
  mov    D293(%rip),%rax
  mov    %rax,(%r12)
  jmp    L140
L240:
  movsd  D153(%rip),%xmm0
  comisd 0x18(%rsp),%xmm0
  jbe    L140
  movsd  %xmm0,(%r12)
  jmp    L140
L84:
  movq   %r13,%xmm5
  comisd D159(%rip),%xmm5
  jb     L162
  mov    D293(%rip),%rax
  mov    %rax,(%r12)
  jmp    L140
L162:
  mov    D153(%rip),%rax
  mov    %rax,(%r12)
  jmp    L140
L130:
  subsd  D440(%rip),%xmm0
  movsd  %xmm0,(%rbx)
  jmp    L18
L188:
  movsd  D307(%rip),%xmm1
  comisd %xmm0,%xmm1
  jbe    L244
  movsd  %xmm1,(%rbx)
  jmp    L244
```

tool_calls: name: parse_data
arguments: label: D365
type: f64
name: parse_data
arguments: label: D152
type: f64[2]
name: parse_data
arguments: label: D217
type: qword[2]
name: parse_data
arguments: label: D114
type: byte[16]
name: parse_data
arguments: label: D159
type: f64[2]
name: parse_data
arguments: label: D348
type: byte[16]
name: parse_data
arguments: label: D293
type: byte[16]
name: parse_data
arguments: label: D54
type: f64[2]
name: parse_data
arguments: label: D307
type: byte[8]
name: parse_data
arguments: label: D440
type: byte[8]
name: parse_data
arguments: label: D300
type: byte[8]
name: parse_data
arguments: label: D371
type: byte[8]
name: parse_data
arguments: label: D153
type: byte[8]
name: parse_data
arguments: label: D58
type: byte[16]

tool: D365: 0.5

tool: {"D152": [1.0,1e-10]}

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

tool: {"D114": [0xbb,0xbd,0xd7,0xd9,0xdf,0x7c,0xdb,0x3d,0x26,0x10,0xc0,0x17,0x70,0xe0,0xbf,0x3e]}

tool: {"D159": [0.0,-0.0]}

tool: {"D348": [0x26,0x10,0xc0,0x17,0x70,0xe0,0xbf,0x3e,0x1e,0x26,0x44,0x54,0xfb,0x21,0xf9,0x3f]}

tool: {"D293": [0x1e,0x26,0x44,0x54,0xfb,0x21,0xf9,0x3f,0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0xbf]}

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

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

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

tool: {"D300": [0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x80]}

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

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

tool: {"D58": [0x39,0xfe,0xdd,0xe8,0x1a,0xaa,0x00,0x3e,0x1e,0x26,0x44,0x54,0xfb,0x21,0x09,0x40]}

assistant: ```c
void GPS_Math_Albers_EN_To_LatLon(double E, double N, double *phi, double *lambda, double phi1, double phi2, double phi0, double M0, double E0, double N0, double a, double b) {
  double po2;
  double rho;
  double rho0;
  double C;
  double a2;
  double b2;
  double esq;
  double e;
  double phi0s;
  double q0;
  double q1;
  double q2;
  double phi1s;
  double phi1c;
  double phi2s;
  double phi2c;
  double m1;
  double m1sq;
  double m2;
  double n;
  double nq0;
  double dx;
  double dy;
  double rhom;
  double q;
  double qc;
  double qd2;
  double rhon;
  double lat;
  double dphi;
  double phis;
  double ess;
  double om0;
  double theta;
  double tol;
  phi0 = GPS_Math_Deg_To_Rad(phi0);
  phi1 = GPS_Math_Deg_To_Rad(phi1);
  phi2 = GPS_Math_Deg_To_Rad(phi2);
  M0 = GPS_Math_Deg_To_Rad(M0);
  a2 = a * a;
  b2 = b * b;
  esq = (a2 - b2) / a2;
  e = pow(esq, (double)0.5);
  phi0s = sin(phi0);
  ess = e * phi0s;
  om0 = ((double)1.0 - ess * ess);
  q0 = ((double)1.0 - esq) * (phi0s / om0 - ((double)1.0 / (e + e)) * log(((double)1.0 - ess) / ((double)1.0 + ess)));
  phi1s = sin(phi1);
  phi1c = cos(phi1);
  ess = e * phi1s;
  om0 = ((double)1.0 - ess * ess);
  m1 = phi1c / pow(om0, (double)0.5);
  q1 = ((double)1.0 - esq) * (phi1s / om0 - ((double)1.0 / (e + e)) * log(((double)1.0 - ess) / ((double)1.0 + ess)));
  m1sq = m1 * m1;
  if (fabs(phi1 - phi2) > 1.0e-10) {
    phi2s = sin(phi2);
    phi2c = cos(phi2);
    ess = e * phi2s;
    om0 = ((double)1.0 - ess * ess);
    m2 = phi2c / pow(om0, (double)0.5);
    q2 = ((double)1.0 - esq) * (phi2s / om0 - ((double)1.0 / (e + e)) * log(((double)1.0 - ess) / ((double)1.0 + ess)));
    n = (m1sq - m2 * m2) / (q2 - q1);
  } else
    n = phi1s;
  C = m1sq + n * q1;
  nq0 = n * q0;
  if (C < nq0)
    rho0 = (double)0.;
  else
    rho0 = (a / n) * pow(C - nq0, (double)0.5);
  dphi = (double)1.0;
  theta = (double)0.0;
  tol = (double)4.85e-10;
  po2 = (double)3.141592653589 / (double)2.0;
  dy = N - N0;
  dx = E - E0;
  rhom = rho0 - dy;
  rho = pow(dx * dx + rhom * rhom, (double)0.5);
  if (n < 0.0) {
    rho *= (double)-1.0;
    dx *= (double)-1.0;
    dy *= (double)-1.0;
    rhom *= (double)-1.0;
  }
  if (rho)
    theta = atan2(dx, rhom);
  rhon = rho * n;
  q = (C - (rhon * rhon) / a2) / n;
  qc = (double)1.0 - ((double)1.0 / (e + e)) * log(((double)1.0 - e) / ((double)1.0 + e));
  if (fabs(fabs(qc) - fabs(q)) > 1.9e-6) {
    qd2 = q / (double)2.0;
    if (qd2 > 1.0)
      *phi = po2;
    else if (qd2 < -1.0)
      *phi = -po2;
    else {
      lat = asin(qd2);
      if (e < 1.0e-10)
        *phi = lat;
      else {
        while (fabs(dphi) > tol) {
          phis = sin(lat);
          ess = e * phis;
          om0 = ((double)1.0 - ess * ess);
          dphi = (om0 * om0) / ((double)2.0 * cos(lat)) * (q / ((double)1.0 - esq) - phis / om0 + (log(((double)1.0 - ess) / ((double)1.0 + ess)) / (e + e)));
          lat += dphi;
        }
        *phi = lat;
      }
      if (*phi > po2)
        *phi = po2;
      else if (*phi < -po2)
        *phi = -po2;
    }
  } else {
    if (q >= 0.0)
      *phi = po2;
    else
      *phi = -po2;
  }
  *lambda = M0 + theta / n;
  if (*lambda > 3.141592653589)
    *lambda -= 3.141592653589 * (double)2.0;
  if (*lambda < -3.141592653589)
    *lambda += 3.141592653589 * (double)2.0;
  if (*lambda > 3.141592653589)
    *lambda = 3.141592653589;
  else if (*lambda < -3.141592653589)
    *lambda = -3.141592653589;
  *phi = GPS_Math_Rad_To_Deg(*phi);
  *lambda = GPS_Math_Rad_To_Deg(*lambda);
  return;
}
```