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

```asm
<GPS_Math_Albers_EN_To_LatLon>:
  endbr64
  push   %r15
  movq   %xmm0,%r15
  movapd %xmm4,%xmm0
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  mov    %rdi,%rbp
  push   %rbx
  mov    %rsi,%rbx
  sub    $0x98,%rsp
  movsd  %xmm7,0x40(%rsp)
  lea    0x88(%rsp),%r13
  lea    0x80(%rsp),%r12
  movsd  %xmm5,(%rsp)
  movsd  %xmm1,0x30(%rsp)
  movsd  %xmm3,0x8(%rsp)
  movsd  %xmm6,0x38(%rsp)
  movsd  %xmm2,0x18(%rsp)
  call   <GPS_Math_Deg_To_Rad@plt>
  movsd  0x18(%rsp),%xmm2
  movsd  %xmm0,0x10(%rsp)
  movapd %xmm2,%xmm0
  call   <GPS_Math_Deg_To_Rad@plt>
  mov    %r12,%rsi
  mov    %r13,%rdi
  movsd  %xmm0,0x70(%rsp)
  call   <sincos@plt>
  movsd  0x8(%rsp),%xmm1
  movsd  0x80(%rsp),%xmm6
  movsd  0x88(%rsp),%xmm3
  movapd %xmm1,%xmm0
  movsd  %xmm6,0x68(%rsp)
  movsd  %xmm3,0x50(%rsp)
  call   <GPS_Math_Deg_To_Rad@plt>
  movsd  (%rsp),%xmm5
  movsd  %xmm0,0x60(%rsp)
  movapd %xmm5,%xmm0
  call   <GPS_Math_Deg_To_Rad@plt>
  mov    D150(%rip),%rax
  movsd  0xd0(%rsp),%xmm7
  movsd  %xmm0,0x20(%rsp)
  movsd  0xd8(%rsp),%xmm0
  mulsd  %xmm7,%xmm7
  movq   %rax,%xmm1
  mulsd  %xmm0,%xmm0
  movapd %xmm7,%xmm5
  movsd  %xmm7,0x28(%rsp)
  subsd  %xmm0,%xmm5
  divsd  %xmm7,%xmm5
  movapd %xmm5,%xmm0
  movsd  %xmm5,0x8(%rsp)
  call   <pow@plt>
  movsd  0x10(%rsp),%xmm8
  movsd  %xmm0,(%rsp)
  movapd %xmm8,%xmm0
  call   <sin@plt>
  movsd  (%rsp),%xmm7
  movsd  0x8(%rsp),%xmm5
  movsd  D362(%rip),%xmm4
  movsd  %xmm0,0x48(%rsp)
  movsd  D362(%rip),%xmm3
  movapd %xmm7,%xmm2
  movapd %xmm7,%xmm6
  mulsd  %xmm0,%xmm2
  subsd  %xmm5,%xmm4
  movsd  D362(%rip),%xmm0
  addsd  %xmm7,%xmm6
  movsd  D362(%rip),%xmm5
  divsd  %xmm6,%xmm3
  movsd  %xmm4,0x10(%rsp)
  movsd  %xmm6,0x78(%rsp)
  addsd  %xmm2,%xmm5
  subsd  %xmm2,%xmm0
  movsd  %xmm2,0x18(%rsp)
  divsd  %xmm5,%xmm0
  movsd  %xmm3,0x8(%rsp)
  call   <log@plt>
  movsd  0x18(%rsp),%xmm2
  movsd  D362(%rip),%xmm5
  movsd  0x48(%rsp),%xmm1
  movsd  0x50(%rsp),%xmm3
  mulsd  %xmm2,%xmm2
  mov    D150(%rip),%rax
  movsd  D362(%rip),%xmm8
  mulsd  0x8(%rsp),%xmm0
  movsd  %xmm3,0x58(%rsp)
  subsd  %xmm2,%xmm5
  movsd  (%rsp),%xmm2
  mulsd  %xmm3,%xmm2
  divsd  %xmm5,%xmm1
  movsd  %xmm2,0x50(%rsp)
  subsd  %xmm0,%xmm1
  mulsd  0x10(%rsp),%xmm1
  movapd %xmm2,%xmm0
  mulsd  %xmm2,%xmm0
  movq   %xmm1,%r14
  movq   %rax,%xmm1
  subsd  %xmm0,%xmm8
  movapd %xmm8,%xmm0
  movsd  %xmm8,0x48(%rsp)
  call   <pow@plt>
  movsd  0x68(%rsp),%xmm6
  movsd  0x50(%rsp),%xmm2
  divsd  %xmm0,%xmm6
  movsd  D362(%rip),%xmm0
  subsd  %xmm2,%xmm0
  addsd  D362(%rip),%xmm2
  divsd  %xmm2,%xmm0
  movsd  %xmm6,0x18(%rsp)
  call   <log@plt>
  movsd  0x58(%rsp),%xmm3
  movsd  0x48(%rsp),%xmm8
  movsd  0x18(%rsp),%xmm6
  mulsd  0x8(%rsp),%xmm0
  movapd %xmm3,%xmm5
  movsd  0x60(%rsp),%xmm4
  movsd  0x70(%rsp),%xmm7
  divsd  %xmm8,%xmm5
  mulsd  %xmm6,%xmm6
  subsd  %xmm4,%xmm7
  andpd  D32(%rip),%xmm7
  comisd D147(%rip),%xmm7
  movapd %xmm6,%xmm2
  subsd  %xmm0,%xmm5
  mulsd  0x10(%rsp),%xmm5
  ja     L196
L13:
  mulsd  %xmm3,%xmm5
  movq   %r14,%xmm0
  pxor   %xmm4,%xmm4
  mulsd  %xmm3,%xmm0
  movapd %xmm5,%xmm6
  addsd  %xmm2,%xmm6
  comisd %xmm6,%xmm0
  movsd  %xmm6,0x18(%rsp)
  jbe    L179
L19:
  movsd  0x30(%rsp),%xmm0
  subsd  0x40(%rsp),%xmm0
  movq   %r15,%xmm5
  movsd  %xmm3,0x48(%rsp)
  subsd  0x38(%rsp),%xmm5
  mov    D150(%rip),%rax
  subsd  %xmm0,%xmm4
  movapd %xmm5,%xmm0
  movsd  %xmm5,0x38(%rsp)
  mulsd  %xmm5,%xmm0
  movapd %xmm4,%xmm1
  movsd  %xmm4,0x30(%rsp)
  mulsd  %xmm4,%xmm1
  addsd  %xmm1,%xmm0
  movq   %rax,%xmm1
  call   <pow@plt>
  movsd  0x48(%rsp),%xmm3
  pxor   %xmm7,%xmm7
  movsd  0x30(%rsp),%xmm4
  movsd  0x38(%rsp),%xmm5
  movapd %xmm0,%xmm2
  comisd %xmm3,%xmm7
  jbe    L212
  movq   D200(%rip),%xmm0
  xorpd  %xmm0,%xmm2
  xorpd  %xmm0,%xmm5
  xorpd  %xmm0,%xmm4
L212:
  pxor   %xmm7,%xmm7
  ucomisd %xmm7,%xmm2
  jp     L86
  mov    $0x0,%r14d
  jne    L86
L115:
  mulsd  %xmm3,%xmm2
  movsd  0x18(%rsp),%xmm1
  movsd  (%rsp),%xmm4
  movsd  D362(%rip),%xmm0
  subsd  %xmm4,%xmm0
  mulsd  %xmm2,%xmm2
  divsd  0x28(%rsp),%xmm2
  subsd  %xmm2,%xmm1
  movsd  %xmm3,0x28(%rsp)
  movsd  D362(%rip),%xmm2
  addsd  %xmm4,%xmm2
  divsd  %xmm3,%xmm1
  divsd  %xmm2,%xmm0
  movsd  %xmm1,0x18(%rsp)
  call   <log@plt>
  movsd  0x8(%rsp),%xmm2
  movsd  0x18(%rsp),%xmm1
  movsd  0x28(%rsp),%xmm3
  mulsd  %xmm0,%xmm2
  movsd  D362(%rip),%xmm0
  subsd  %xmm2,%xmm0
  movapd %xmm1,%xmm2
  andpd  D32(%rip),%xmm0
  andpd  D32(%rip),%xmm2
  subsd  %xmm2,%xmm0
  andpd  D32(%rip),%xmm0
  comisd D280(%rip),%xmm0
  jbe    L77
  movsd  D150(%rip),%xmm0
  movsd  D139(%rip),%xmm2
  mulsd  %xmm1,%xmm0
  comisd D362(%rip),%xmm0
  jbe    L36
L155:
  movsd  %xmm2,0x0(%rbp)
L163:
  movq   %r14,%xmm0
  movsd  D205(%rip),%xmm1
  divsd  %xmm3,%xmm0
  addsd  0x20(%rsp),%xmm0
  comisd %xmm1,%xmm0
  jbe    L61
  subsd  D192(%rip),%xmm0
L61:
  movsd  D66(%rip),%xmm2
  movsd  %xmm0,(%rbx)
  comisd %xmm0,%xmm2
  jbe    L215
  addsd  D192(%rip),%xmm0
  movsd  %xmm0,(%rbx)
L215:
  comisd %xmm1,%xmm0
  jbe    L91
  movsd  %xmm1,(%rbx)
L47:
  movsd  0x0(%rbp),%xmm0
  call   <GPS_Math_Rad_To_Deg@plt>
  movsd  %xmm0,0x0(%rbp)
  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
  nopl   0x0(%rax)
L91:
  comisd %xmm0,%xmm2
  jbe    L47
  movsd  %xmm2,(%rbx)
  jmp    L47
  nopl   0x0(%rax)
L36:
  movsd  D95(%rip),%xmm4
  movsd  D39(%rip),%xmm2
  comisd %xmm0,%xmm4
  ja     L155
  movsd  %xmm3,0x8(%rsp)
  movsd  %xmm1,0x18(%rsp)
  call   <asin@plt>
  movsd  D147(%rip),%xmm3
  comisd (%rsp),%xmm3
  movapd %xmm0,%xmm4
  movsd  0x8(%rsp),%xmm3
  ja     L136
  movsd  0x18(%rsp),%xmm1
  movsd  %xmm3,0x30(%rsp)
  divsd  0x10(%rsp),%xmm1
  movq   %xmm1,%r15
  nopw   0x0(%rax,%rax,1)
L105:
  movapd %xmm4,%xmm0
  mov    %r12,%rsi
  mov    %r13,%rdi
  movsd  %xmm4,0x28(%rsp)
  call   <sincos@plt>
  movsd  (%rsp),%xmm0
  movsd  0x88(%rsp),%xmm3
  movsd  D362(%rip),%xmm6
  movsd  D362(%rip),%xmm1
  mulsd  %xmm3,%xmm0
  movsd  %xmm3,0x10(%rsp)
  movsd  0x80(%rsp),%xmm2
  movsd  %xmm2,0x18(%rsp)
  movapd %xmm0,%xmm5
  subsd  %xmm0,%xmm6
  mulsd  %xmm0,%xmm5
  addsd  D362(%rip),%xmm0
  divsd  %xmm0,%xmm6
  subsd  %xmm5,%xmm1
  movsd  %xmm1,0x8(%rsp)
  movapd %xmm6,%xmm0
  call   <log@plt>
  movsd  0x8(%rsp),%xmm1
  movsd  0x10(%rsp),%xmm3
  movsd  0x18(%rsp),%xmm2
  movapd %xmm0,%xmm6
  movq   %r15,%xmm0
  divsd  0x78(%rsp),%xmm6
  divsd  %xmm1,%xmm3
  movsd  0x28(%rsp),%xmm4
  mulsd  %xmm1,%xmm1
  addsd  %xmm2,%xmm2
  divsd  %xmm2,%xmm1
  subsd  %xmm3,%xmm0
  addsd  %xmm0,%xmm6
  mulsd  %xmm6,%xmm1
  addsd  %xmm1,%xmm4
  andpd  D32(%rip),%xmm1
  comisd D443(%rip),%xmm1
  ja     L105
  movsd  0x30(%rsp),%xmm3
L136:
  movsd  D139(%rip),%xmm2
  movsd  %xmm4,0x0(%rbp)
  comisd %xmm2,%xmm4
  ja     L155
  movsd  D39(%rip),%xmm2
  comisd %xmm4,%xmm2
  ja     L155
  jmp    L163
  nopl   0x0(%rax,%rax,1)
L77:
  pxor   %xmm4,%xmm4
  movsd  D139(%rip),%xmm2
  comisd %xmm4,%xmm1
  jae    L155
  movsd  D39(%rip),%xmm2
  jmp    L155
  nopl   0x0(%rax,%rax,1)
L86:
  movapd %xmm4,%xmm1
  movapd %xmm5,%xmm0
  movsd  %xmm3,0x38(%rsp)
  movsd  %xmm2,0x30(%rsp)
  call   <atan2@plt>
  movsd  0x38(%rsp),%xmm3
  movsd  0x30(%rsp),%xmm2
  movq   %xmm0,%r14
  jmp    L115
  nopw   0x0(%rax,%rax,1)
L179:
  movapd %xmm6,%xmm2
  mov    D150(%rip),%rax
  movsd  %xmm3,0x48(%rsp)
  subsd  %xmm0,%xmm2
  movq   %rax,%xmm1
  movapd %xmm2,%xmm0
  call   <pow@plt>
  movsd  0x48(%rsp),%xmm3
  movapd %xmm0,%xmm4
  movsd  0xd0(%rsp),%xmm0
  divsd  %xmm3,%xmm0
  mulsd  %xmm0,%xmm4
  jmp    L19
  nopl   0x0(%rax,%rax,1)
L196:
  mov    %r12,%rsi
  mov    %r13,%rdi
  movapd %xmm4,%xmm0
  movsd  %xmm5,0x60(%rsp)
  movsd  %xmm6,0x68(%rsp)
  call   <sincos@plt>
  movsd  (%rsp),%xmm6
  movsd  0x88(%rsp),%xmm4
  movsd  D362(%rip),%xmm7
  mov    D150(%rip),%rax
  mulsd  %xmm4,%xmm6
  movsd  %xmm4,0x58(%rsp)
  movsd  0x80(%rsp),%xmm3
  movq   %rax,%xmm1
  movsd  %xmm3,0x18(%rsp)
  movapd %xmm6,%xmm0
  movsd  %xmm6,0x50(%rsp)
  mulsd  %xmm6,%xmm0
  subsd  %xmm0,%xmm7
  movapd %xmm7,%xmm0
  movsd  %xmm7,0x48(%rsp)
  call   <pow@plt>
  movsd  0x18(%rsp),%xmm3
  movsd  0x50(%rsp),%xmm6
  divsd  %xmm0,%xmm3
  movsd  D362(%rip),%xmm0
  subsd  %xmm6,%xmm0
  addsd  D362(%rip),%xmm6
  divsd  %xmm6,%xmm0
  movsd  %xmm3,0x18(%rsp)
  call   <log@plt>
  movsd  0x48(%rsp),%xmm7
  movsd  0x58(%rsp),%xmm4
  mulsd  0x8(%rsp),%xmm0
  movsd  0x18(%rsp),%xmm1
  divsd  %xmm7,%xmm4
  movsd  0x68(%rsp),%xmm2
  movsd  0x60(%rsp),%xmm5
  mulsd  %xmm1,%xmm1
  movapd %xmm2,%xmm3
  subsd  %xmm1,%xmm3
  subsd  %xmm0,%xmm4
  mulsd  0x10(%rsp),%xmm4
  subsd  %xmm5,%xmm4
  divsd  %xmm4,%xmm3
  jmp    L13
```

tool_calls: name: unpack_data
arguments: data_tag: D150
data_type: f64
name: unpack_data
arguments: data_tag: D362
data_type: f64[2]
name: unpack_data
arguments: data_tag: D32
data_type: qword[2]
name: unpack_data
arguments: data_tag: D147
data_type: byte[16]
name: unpack_data
arguments: data_tag: D200
data_type: f32[2]
name: unpack_data
arguments: data_tag: D280
data_type: byte[16]
name: unpack_data
arguments: data_tag: D139
data_type: byte[8]
name: unpack_data
arguments: data_tag: D205
data_type: f64
name: unpack_data
arguments: data_tag: D192
data_type: byte[8]
name: unpack_data
arguments: data_tag: D66
data_type: byte[8]
name: unpack_data
arguments: data_tag: D95
data_type: f32[2]
name: unpack_data
arguments: data_tag: D39
data_type: byte[8]
name: unpack_data
arguments: data_tag: D443
data_type: byte[16]

tool: D150: 0.5

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

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

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

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

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

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

tool: D205: 3.141592653589

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

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

tool: {"D95": [0.0,-1.875]}

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

tool: {"D443": [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;
}
```