main(ac, av) int ac;
char **av;
{
  float elat, elon, mlat, mlon;
  float kperd_n, kperd_e, xtop, ytop;
  float x0, y0, cosR, sinR;
  double cosA, sinA, e2, den, g2, h2, lat0;
  float rotate = 0.0;
  double rperd = 0.017453292;
  double rad = 6378.139;
  double f = 298.256;
  setpar(ac, av);
  mstpar("elat", "f", &elat);
  mstpar("elon", "f", &elon);
  mstpar("mlat", "f", &mlat);
  mstpar("mlon", "f", &mlon);
  getpar("rotate", "f", &rotate);
  endpar();
  f = 1.0 / f;
  e2 = 2.0 * f - f * f;
  h2 = (1.0 - f) * (1.0 - f);
  g2 = e2 / h2;
  lat0 = atan((1.0 - f) * tan(0.5 * (elat + mlat) * rperd));
  cosA = cos(lat0);
  sinA = sin(lat0);
  den = sqrt(1.0 / (1.0 + g2 * sinA * sinA));
  kperd_e = rperd * rad * cosA * den;
  kperd_n = rperd * rad * (sqrt(1.0 + g2 * sinA * sinA * (2.0 + g2))) * den *
            den * den;
  cosR = cos(rotate * rperd);
  sinR = sin(rotate * rperd);
  x0 = (elon - mlon) * kperd_e;
  y0 = (mlat - elat) * kperd_n;
  xtop = x0 * cosR + y0 * sinR;
  ytop = -x0 * sinR + y0 * cosR;
  printf("%10.4f %10.4f\n", xtop, ytop);
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0xb0,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
xorps  %xmm0,%xmm0
movss  %xmm0,-0x7c(%rbp)
movsd  0xe66(%rip),%xmm0
movsd  %xmm0,-0x88(%rbp)
ff
movsd  0xe4e(%rip),%xmm0
movsd  %xmm0,-0x90(%rbp)
ff
movsd  0xe36(%rip),%xmm0
movsd  %xmm0,-0x98(%rbp)
ff
mov    -0x4(%rbp),%edi
mov    -0x10(%rbp),%rsi
mov    $0x0,%al
call   1030 <setpar@plt>
lea    0xe31(%rip),%rdi
lea    0xe2f(%rip),%rsi
lea    -0x14(%rbp),%rdx
mov    $0x0,%al
call   1040 <mstpar@plt>
lea    0xe1f(%rip),%rdi
lea    0xe16(%rip),%rsi
lea    -0x18(%rbp),%rdx
mov    $0x0,%al
call   1040 <mstpar@plt>
lea    0xe0b(%rip),%rdi
lea    0xdfd(%rip),%rsi
lea    -0x1c(%rbp),%rdx
mov    $0x0,%al
call   1040 <mstpar@plt>
lea    0xdf7(%rip),%rdi
lea    0xde4(%rip),%rsi
lea    -0x20(%rbp),%rdx
mov    $0x0,%al
call   1040 <mstpar@plt>
lea    0xde3(%rip),%rdi
lea    0xdcb(%rip),%rsi
lea    -0x7c(%rbp),%rdx
mov    $0x0,%al
call   1090 <getpar@plt>
mov    $0x0,%al
call   10b0 <endpar@plt>
movsd  0xd7c(%rip),%xmm0
divsd  -0x98(%rbp),%xmm0
ff
movsd  %xmm0,-0x98(%rbp)
ff
movsd  -0x98(%rbp),%xmm0
ff
movsd  -0x98(%rbp),%xmm1
ff
mulsd  -0x98(%rbp),%xmm1
ff
movq   %xmm1,%rax
movabs $0x8000000000000000,%rcx
xor    %rcx,%rax
movq   %rax,%xmm1
addsd  %xmm0,%xmm0
addsd  %xmm1,%xmm0
movsd  %xmm0,-0x58(%rbp)
movsd  0xd28(%rip),%xmm0
subsd  -0x98(%rbp),%xmm0
ff
movsd  0xd18(%rip),%xmm1
subsd  -0x98(%rbp),%xmm1
ff
mulsd  %xmm1,%xmm0
movsd  %xmm0,-0x70(%rbp)
movsd  -0x58(%rbp),%xmm0
divsd  -0x70(%rbp),%xmm0
movsd  %xmm0,-0x68(%rbp)
movsd  0xcf0(%rip),%xmm0
subsd  -0x98(%rbp),%xmm0
ff
movsd  %xmm0,-0xa8(%rbp)
ff
movss  -0x14(%rbp),%xmm0
addss  -0x1c(%rbp),%xmm0
cvtss2sd %xmm0,%xmm1
movsd  0xcda(%rip),%xmm0
mulsd  %xmm1,%xmm0
mulsd  -0x88(%rbp),%xmm0
ff
call   1080 <tan@plt>
movaps %xmm0,%xmm1
movsd  -0xa8(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
call   1070 <atan@plt>
movsd  %xmm0,-0x78(%rbp)
movsd  -0x78(%rbp),%xmm0
call   10a0 <cos@plt>
movsd  %xmm0,-0x48(%rbp)
movsd  -0x78(%rbp),%xmm0
call   1060 <sin@plt>
movsd  %xmm0,-0x50(%rbp)
movsd  -0x68(%rbp),%xmm1
mulsd  -0x50(%rbp),%xmm1
movsd  -0x50(%rbp),%xmm0
mulsd  %xmm0,%xmm1
movsd  0xc67(%rip),%xmm0
addsd  %xmm0,%xmm1
movsd  0xc5b(%rip),%xmm0
divsd  %xmm1,%xmm0
call   10c0 <sqrt@plt>
movsd  %xmm0,-0x60(%rbp)
movsd  -0x88(%rbp),%xmm0
ff
mulsd  -0x90(%rbp),%xmm0
ff
mulsd  -0x48(%rbp),%xmm0
mulsd  -0x60(%rbp),%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x28(%rbp)
movsd  -0x88(%rbp),%xmm0
ff
mulsd  -0x90(%rbp),%xmm0
ff
movsd  %xmm0,-0xa0(%rbp)
ff
movsd  -0x68(%rbp),%xmm0
mulsd  -0x50(%rbp),%xmm0
mulsd  -0x50(%rbp),%xmm0
movsd  0xc03(%rip),%xmm1
addsd  -0x68(%rbp),%xmm1
mulsd  %xmm1,%xmm0
movsd  0xbea(%rip),%xmm1
addsd  %xmm1,%xmm0
call   10c0 <sqrt@plt>
movaps %xmm0,%xmm1
movsd  -0xa0(%rbp),%xmm0
ff
mulsd  %xmm1,%xmm0
mulsd  -0x60(%rbp),%xmm0
mulsd  -0x60(%rbp),%xmm0
mulsd  -0x60(%rbp),%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x24(%rbp)
movss  -0x7c(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
mulsd  -0x88(%rbp),%xmm0
ff
call   10a0 <cos@plt>
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x3c(%rbp)
movss  -0x7c(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
mulsd  -0x88(%rbp),%xmm0
ff
call   1060 <sin@plt>
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,-0x40(%rbp)
movss  -0x18(%rbp),%xmm0
subss  -0x20(%rbp),%xmm0
mulss  -0x28(%rbp),%xmm0
movss  %xmm0,-0x34(%rbp)
movss  -0x1c(%rbp),%xmm0
subss  -0x14(%rbp),%xmm0
mulss  -0x24(%rbp),%xmm0
movss  %xmm0,-0x38(%rbp)
movss  -0x34(%rbp),%xmm0
movss  -0x3c(%rbp),%xmm2
movss  -0x38(%rbp),%xmm1
mulss  -0x40(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x2c(%rbp)
movss  -0x34(%rbp),%xmm0
movd   %xmm0,%eax
xor    $0x80000000,%eax
movd   %eax,%xmm0
movss  -0x40(%rbp),%xmm2
movss  -0x38(%rbp),%xmm1
mulss  -0x3c(%rbp),%xmm1
mulss  %xmm2,%xmm0
addss  %xmm1,%xmm0
movss  %xmm0,-0x30(%rbp)
movss  -0x2c(%rbp),%xmm0
cvtss2sd %xmm0,%xmm0
movss  -0x30(%rbp),%xmm1
cvtss2sd %xmm1,%xmm1
lea    0xb39(%rip),%rdi
mov    $0x2,%al
call   1050 <printf@plt>
xor    %eax,%eax
add    $0xb0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbx
sub    $0x30,%rsp
movl   $0x0,0xc(%rsp)
xor    %eax,%eax
call   1030 <setpar@plt>
lea    0xe7d(%rip),%rdi
lea    0xe7b(%rip),%rbx
lea    0x14(%rsp),%rdx
mov    %rbx,%rsi
xor    %eax,%eax
call   1040 <mstpar@plt>
lea    0xe67(%rip),%rdi
lea    0x2c(%rsp),%rdx
mov    %rbx,%rsi
xor    %eax,%eax
call   1040 <mstpar@plt>
lea    0xe56(%rip),%rdi
lea    0x10(%rsp),%rdx
mov    %rbx,%rsi
xor    %eax,%eax
call   1040 <mstpar@plt>
lea    0xe45(%rip),%rdi
lea    0x28(%rsp),%rdx
mov    %rbx,%rsi
xor    %eax,%eax
call   1040 <mstpar@plt>
lea    0xe34(%rip),%rdi
lea    0xc(%rsp),%rdx
mov    %rbx,%rsi
xor    %eax,%eax
call   1090 <getpar@plt>
xor    %eax,%eax
call   10b0 <endpar@plt>
movss  0x14(%rsp),%xmm0
addss  0x10(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
mulsd  0xdb8(%rip),%xmm0
mulsd  0xdb8(%rip),%xmm0
call   1080 <tan@plt>
mulsd  0xdb3(%rip),%xmm0
call   1070 <atan@plt>
movsd  %xmm0,(%rsp)
call   10a0 <cos@plt>
movsd  %xmm0,0x18(%rsp)
movsd  (%rsp),%xmm0
call   1060 <sin@plt>
movsd  0xd94(%rip),%xmm2
mulsd  %xmm0,%xmm2
mulsd  %xmm0,%xmm2
movsd  0xd8c(%rip),%xmm0
movapd %xmm2,%xmm1
addsd  %xmm0,%xmm1
divsd  %xmm1,%xmm0
xorpd  %xmm3,%xmm3
ucomisd %xmm3,%xmm0
jb     12b3 <main+0x113>
xorps  %xmm1,%xmm1
sqrtsd %xmm0,%xmm1
jmp    12ca <main+0x12a>
movsd  %xmm2,(%rsp)
call   10c0 <sqrt@plt>
xorpd  %xmm3,%xmm3
movsd  (%rsp),%xmm2
movapd %xmm0,%xmm1
movsd  0x18(%rsp),%xmm0
mulsd  0xd50(%rip),%xmm0
mulsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,0x18(%rsp)
mulsd  0xd42(%rip),%xmm2
addsd  0xd2a(%rip),%xmm2
ucomisd %xmm3,%xmm2
jb     1305 <main+0x165>
xorps  %xmm0,%xmm0
sqrtsd %xmm2,%xmm0
jmp    1318 <main+0x178>
movapd %xmm2,%xmm0
movsd  %xmm1,(%rsp)
call   10c0 <sqrt@plt>
movsd  (%rsp),%xmm1
mulsd  0xd08(%rip),%xmm0
mulsd  %xmm1,%xmm0
mulsd  %xmm1,%xmm0
mulsd  %xmm1,%xmm0
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,(%rsp)
movss  0xc(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
mulsd  0xcc1(%rip),%xmm0
call   10a0 <cos@plt>
cvtsd2ss %xmm0,%xmm0
movss  %xmm0,0x24(%rsp)
movss  0xc(%rsp),%xmm0
cvtss2sd %xmm0,%xmm0
mulsd  0xca0(%rip),%xmm0
call   1060 <sin@plt>
cvtsd2ss %xmm0,%xmm0
movss  0x2c(%rsp),%xmm1
subss  0x28(%rsp),%xmm1
mulss  0x18(%rsp),%xmm1
movss  0x10(%rsp),%xmm2
subss  0x14(%rsp),%xmm2
mulss  (%rsp),%xmm2
movaps %xmm2,%xmm3
mulss  %xmm0,%xmm3
movaps %xmm1,%xmm4
movss  0x24(%rsp),%xmm5
mulss  %xmm5,%xmm4
addss  %xmm3,%xmm4
mulss  %xmm5,%xmm2
mulss  %xmm0,%xmm1
subss  %xmm1,%xmm2
xorps  %xmm0,%xmm0
cvtss2sd %xmm4,%xmm0
xorps  %xmm1,%xmm1
cvtss2sd %xmm2,%xmm1
lea    0xc88(%rip),%rdi
mov    $0x2,%al
call   1050 <printf@plt>
xor    %eax,%eax
add    $0x30,%rsp
pop    %rbx
ret

LLVM IR (-O0):
@.str = [5 x i8] c"elat\00"
@.str.1 = [2 x i8] c"f\00"
@.str.2 = [5 x i8] c"elon\00"
@.str.3 = [5 x i8] c"mlat\00"
@.str.4 = [5 x i8] c"mlon\00"
@.str.5 = [7 x i8] c"rotate\00"
@.str.6 = [15 x i8] c"%10.4f %10.4f\0A\00"
define i32 @main(i32 %0, i8** %1) {
%3 = alloca i32
%4 = alloca i8**
%5 = alloca float
%6 = alloca float
%7 = alloca float
%8 = alloca float
%9 = alloca float
%10 = alloca float
%11 = alloca float
%12 = alloca float
%13 = alloca float
%14 = alloca float
%15 = alloca float
%16 = alloca float
%17 = alloca double
%18 = alloca double
%19 = alloca double
%20 = alloca double
%21 = alloca double
%22 = alloca double
%23 = alloca double
%24 = alloca float
%25 = alloca double
%26 = alloca double
%27 = alloca double
store i32 %0, i32* %3
store i8** %1, i8*** %4
store float 0.000000e+00, float* %24
store double 0x3F91DF469963E11D, double* %25
store double 0x40B8EA2395810625, double* %26
store double 2.982560e+02, double* %27
%28 = load i32, i32* %3
%29 = load i8**, i8*** %4
%30 = call i32 (i32, i8**, ...) bitcast (i32 (...)* @setpar to i32 (i32, i8**, ...)*)(i32 %28, i8** %29)
%31 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @mstpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %5)
%32 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @mstpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.2, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %6)
%33 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @mstpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %7)
%34 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @mstpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.4, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %8)
%35 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @getpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.5, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %24)
%36 = call i32 (...) @endpar()
%37 = load double, double* %27
%38 = fdiv double 1.000000e+00, %37
store double %38, double* %27
%39 = load double, double* %27
%40 = load double, double* %27
%41 = load double, double* %27
%42 = fmul double %40, %41
%43 = fneg double %42
%44 = call double @llvm.fmuladd.f64(double 2.000000e+00, double %39, double %43)
store double %44, double* %19
%45 = load double, double* %27
%46 = fsub double 1.000000e+00, %45
%47 = load double, double* %27
%48 = fsub double 1.000000e+00, %47
%49 = fmul double %46, %48
store double %49, double* %22
%50 = load double, double* %19
%51 = load double, double* %22
%52 = fdiv double %50, %51
store double %52, double* %21
%53 = load double, double* %27
%54 = fsub double 1.000000e+00, %53
%55 = load float, float* %5
%56 = load float, float* %7
%57 = fadd float %55, %56
%58 = fpext float %57 to double
%59 = fmul double 5.000000e-01, %58
%60 = load double, double* %25
%61 = fmul double %59, %60
%62 = call double @tan(double %61)
%63 = fmul double %54, %62
%64 = call double @atan(double %63)
store double %64, double* %23
%65 = load double, double* %23
%66 = call double @cos(double %65)
store double %66, double* %17
%67 = load double, double* %23
%68 = call double @sin(double %67)
store double %68, double* %18
%69 = load double, double* %21
%70 = load double, double* %18
%71 = fmul double %69, %70
%72 = load double, double* %18
%73 = call double @llvm.fmuladd.f64(double %71, double %72, double 1.000000e+00)
%74 = fdiv double 1.000000e+00, %73
%75 = call double @sqrt(double %74)
store double %75, double* %20
%76 = load double, double* %25
%77 = load double, double* %26
%78 = fmul double %76, %77
%79 = load double, double* %17
%80 = fmul double %78, %79
%81 = load double, double* %20
%82 = fmul double %80, %81
%83 = fptrunc double %82 to float
store float %83, float* %10
%84 = load double, double* %25
%85 = load double, double* %26
%86 = fmul double %84, %85
%87 = load double, double* %21
%88 = load double, double* %18
%89 = fmul double %87, %88
%90 = load double, double* %18
%91 = fmul double %89, %90
%92 = load double, double* %21
%93 = fadd double 2.000000e+00, %92
%94 = call double @llvm.fmuladd.f64(double %91, double %93, double 1.000000e+00)
%95 = call double @sqrt(double %94)
%96 = fmul double %86, %95
%97 = load double, double* %20
%98 = fmul double %96, %97
%99 = load double, double* %20
%100 = fmul double %98, %99
%101 = load double, double* %20
%102 = fmul double %100, %101
%103 = fptrunc double %102 to float
store float %103, float* %9
%104 = load float, float* %24
%105 = fpext float %104 to double
%106 = load double, double* %25
%107 = fmul double %105, %106
%108 = call double @cos(double %107)
%109 = fptrunc double %108 to float
store float %109, float* %15
%110 = load float, float* %24
%111 = fpext float %110 to double
%112 = load double, double* %25
%113 = fmul double %111, %112
%114 = call double @sin(double %113)
%115 = fptrunc double %114 to float
store float %115, float* %16
%116 = load float, float* %6
%117 = load float, float* %8
%118 = fsub float %116, %117
%119 = load float, float* %10
%120 = fmul float %118, %119
store float %120, float* %13
%121 = load float, float* %7
%122 = load float, float* %5
%123 = fsub float %121, %122
%124 = load float, float* %9
%125 = fmul float %123, %124
store float %125, float* %14
%126 = load float, float* %13
%127 = load float, float* %15
%128 = load float, float* %14
%129 = load float, float* %16
%130 = fmul float %128, %129
%131 = call float @llvm.fmuladd.f32(float %126, float %127, float %130)
store float %131, float* %11
%132 = load float, float* %13
%133 = fneg float %132
%134 = load float, float* %16
%135 = load float, float* %14
%136 = load float, float* %15
%137 = fmul float %135, %136
%138 = call float @llvm.fmuladd.f32(float %133, float %134, float %137)
store float %138, float* %12
%139 = load float, float* %11
%140 = fpext float %139 to double
%141 = load float, float* %12
%142 = fpext float %141 to double
%143 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([15 x i8], [15 x i8]* @.str.6, i64 0, i64 0), double %140, double %142)
ret i32 0
}

LLVM IR (-O2):
@.str = [5 x i8] c"elat\00"
@.str.1 = [2 x i8] c"f\00"
@.str.2 = [5 x i8] c"elon\00"
@.str.3 = [5 x i8] c"mlat\00"
@.str.4 = [5 x i8] c"mlon\00"
@.str.5 = [7 x i8] c"rotate\00"
@.str.6 = [15 x i8] c"%10.4f %10.4f\0A\00"
define i32 @main(i32 %0, i8** %1) {
%3 = alloca float
%4 = alloca float
%5 = alloca float
%6 = alloca float
%7 = alloca float
%8 = bitcast float* %3 to i8*
%9 = bitcast float* %4 to i8*
%10 = bitcast float* %5 to i8*
%11 = bitcast float* %6 to i8*
%12 = bitcast float* %7 to i8*
store float 0.000000e+00, float* %7
%13 = tail call i32 (i32, i8**, ...) bitcast (i32 (...)* @setpar to i32 (i32, i8**, ...)*)(i32 %0, i8** %1)
%14 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @mstpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %3)
%15 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @mstpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.2, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %4)
%16 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @mstpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.3, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %5)
%17 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @mstpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str.4, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %6)
%18 = call i32 (i8*, i8*, float*, ...) bitcast (i32 (...)* @getpar to i32 (i8*, i8*, float*, ...)*)(i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str.5, i64 0, i64 0), i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0), float* %7)
%19 = call i32 (...) @endpar()
%20 = load float, float* %3
%21 = load float, float* %5
%22 = fadd float %20, %21
%23 = fpext float %22 to double
%24 = fmul double %23, 5.000000e-01
%25 = fmul double %24, 0x3F91DF469963E11D
%26 = call double @tan(double %25)
%27 = fmul double %26, 0x3FEFE4889E18A326
%28 = call double @atan(double %27)
%29 = call double @cos(double %28)
%30 = call double @sin(double %28)
%31 = fmul double %30, 0x3F7B9AE75725652C
%32 = call double @llvm.fmuladd.f64(double %31, double %30, double 1.000000e+00)
%33 = fdiv double 1.000000e+00, %32
%34 = call double @sqrt(double %33)
%35 = fmul double %29, 0x405BD4730E02F66D
%36 = fmul double %35, %34
%37 = fptrunc double %36 to float
%38 = fmul double %30, %31
%39 = call double @llvm.fmuladd.f64(double %38, double 0x40000DCD73AB92B3, double 1.000000e+00)
%40 = call double @sqrt(double %39)
%41 = fmul double %40, 0x405BD4730E02F66D
%42 = fmul double %34, %41
%43 = fmul double %34, %42
%44 = fmul double %34, %43
%45 = fptrunc double %44 to float
%46 = load float, float* %7
%47 = fpext float %46 to double
%48 = fmul double %47, 0x3F91DF469963E11D
%49 = call double @cos(double %48)
%50 = fptrunc double %49 to float
%51 = load float, float* %7
%52 = fpext float %51 to double
%53 = fmul double %52, 0x3F91DF469963E11D
%54 = call double @sin(double %53)
%55 = fptrunc double %54 to float
%56 = load float, float* %4
%57 = load float, float* %6
%58 = fsub float %56, %57
%59 = fmul float %58, %37
%60 = load float, float* %5
%61 = load float, float* %3
%62 = fsub float %60, %61
%63 = fmul float %62, %45
%64 = fmul float %63, %55
%65 = call float @llvm.fmuladd.f32(float %59, float %50, float %64)
%66 = fneg float %59
%67 = fmul float %63, %50
%68 = call float @llvm.fmuladd.f32(float %66, float %55, float %67)
%69 = fpext float %65 to double
%70 = fpext float %68 to double
%71 = call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([15 x i8], [15 x i8]* @.str.6, i64 0, i64 0), double %69, double %70)
ret i32 0
}