#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
double TamEarthTide(int, int, int, int, int, int /*<<< orphan*/, double, double,
                    double, int /*<<< orphan*/, int /*<<< orphan*/);
double atof(char *);
int atoi(char *);
int /*<<< orphan*/ exit(int /*<<< orphan*/);
int /*<<< orphan*/ printf(char *, ...);
int main(int argc, char *argv[]) {
  int yr, mo, day, hr;
  int i, j, nc;
  double elevation, lat, lon, latsec, lonsec;
  double C;
  if (argc < 7) {
    printf("usage: %s <lat> <lon> <elevation> <year> <month> <day>\n", argv[0]);
    printf("where lat/lon are in decimal degrees, positive north/east;\n");
    printf("      elevation in meters;\n");
    printf("      year is 4 digits, month is 1-12, and day is 1-31 in month\n");
    printf("      output is GMT time and correction.\n");
    exit(0);
  }
  lat = atof(argv[1]);
  lon = atof(argv[2]);
  elevation = atof(argv[3]);
  yr = atoi(argv[4]);
  mo = atoi(argv[5]);
  day = atoi(argv[6]);
  nc = 7;
  hr = 0;
  while (hr < 24) {
    for (i = 0; i < nc - 1; i++) {
      printf("HR:MN  ETC| ");
    }
    printf("HR:MN  ETC");
    printf("\n");
    for (i = 0; i < nc - 1; i++) {
      printf("-----  ---| ");
    }
    printf("-----  ---");
    printf("\n");
    for (i = 0; i < 60; i++) {
      for (j = 0; j < nc - 1; j++) {
        C = TamEarthTide(yr, mo, day, hr + j, i, 0, lon, lat, elevation, 0, 0);
        printf("%02d:%02d %4.0f| ", hr + j, i, C);
      }
      C = TamEarthTide(yr, mo, day, hr + j + 1, i, 0, lon, lat, elevation, 0,
                       0);
      printf("%02d:%02d %4.0f\n", hr + j + 1, i, C);
    }
    hr += 8;
    printf("\n");
  }
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
movl   $0x0,-0x4(%rbp)
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
cmpl   $0x7,-0x8(%rbp)
jge    11c4 <main+0x74>
mov    -0x10(%rbp),%rax
mov    (%rax),%rsi
lea    0xe82(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xeac(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xeda(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xee8(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xf1b(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
xor    %edi,%edi
call   1070 <exit@plt>
mov    -0x10(%rbp),%rax
mov    0x8(%rax),%rdi
call   1030 <atof@plt>
movsd  %xmm0,-0x40(%rbp)
mov    -0x10(%rbp),%rax
mov    0x10(%rax),%rdi
call   1030 <atof@plt>
movsd  %xmm0,-0x48(%rbp)
mov    -0x10(%rbp),%rax
mov    0x18(%rax),%rdi
call   1030 <atof@plt>
movsd  %xmm0,-0x38(%rbp)
mov    -0x10(%rbp),%rax
mov    0x20(%rax),%rdi
call   1060 <atoi@plt>
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
mov    0x28(%rax),%rdi
call   1060 <atoi@plt>
mov    %eax,-0x18(%rbp)
mov    -0x10(%rbp),%rax
mov    0x30(%rax),%rdi
call   1060 <atoi@plt>
mov    %eax,-0x1c(%rbp)
movl   $0x7,-0x2c(%rbp)
movl   $0x0,-0x20(%rbp)
cmpl   $0x18,-0x20(%rbp)
jge    13fd <main+0x2ad>
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    1276 <main+0x126>
lea    0xe9a(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1249 <main+0xf9>
lea    0xe8b(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xe6e(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
movl   $0x0,-0x24(%rbp)
mov    -0x24(%rbp),%eax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    12c6 <main+0x176>
lea    0xe62(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1299 <main+0x149>
lea    0xe53(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
lea    0xe1e(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
movl   $0x0,-0x24(%rbp)
cmpl   $0x3c,-0x24(%rbp)
jge    13e1 <main+0x291>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
mov    -0x2c(%rbp),%ecx
sub    $0x1,%ecx
cmp    %ecx,%eax
jge    1373 <main+0x223>
mov    -0x14(%rbp),%edi
mov    -0x18(%rbp),%esi
mov    -0x1c(%rbp),%edx
mov    -0x20(%rbp),%ecx
add    -0x28(%rbp),%ecx
mov    -0x24(%rbp),%r8d
movsd  -0x48(%rbp),%xmm0
movsd  -0x40(%rbp),%xmm1
movsd  -0x38(%rbp),%xmm2
xor    %r9d,%r9d
movl   $0x0,(%rsp)
movl   $0x0,0x8(%rsp)
call   1050 <TamEarthTide@plt>
movsd  %xmm0,-0x60(%rbp)
mov    -0x20(%rbp),%esi
add    -0x28(%rbp),%esi
mov    -0x24(%rbp),%edx
movsd  -0x60(%rbp),%xmm0
lea    0xdcd(%rip),%rdi
mov    $0x1,%al
call   1040 <printf@plt>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    12fa <main+0x1aa>
mov    -0x14(%rbp),%edi
mov    -0x18(%rbp),%esi
mov    -0x1c(%rbp),%edx
mov    -0x20(%rbp),%ecx
add    -0x28(%rbp),%ecx
add    $0x1,%ecx
mov    -0x24(%rbp),%r8d
movsd  -0x48(%rbp),%xmm0
movsd  -0x40(%rbp),%xmm1
movsd  -0x38(%rbp),%xmm2
xor    %r9d,%r9d
movl   $0x0,(%rsp)
movl   $0x0,0x8(%rsp)
call   1050 <TamEarthTide@plt>
movsd  %xmm0,-0x60(%rbp)
mov    -0x20(%rbp),%esi
add    -0x28(%rbp),%esi
add    $0x1,%esi
mov    -0x24(%rbp),%edx
movsd  -0x60(%rbp),%xmm0
lea    0xd71(%rip),%rdi
mov    $0x1,%al
call   1040 <printf@plt>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    12e9 <main+0x199>
mov    -0x20(%rbp),%eax
add    $0x8,%eax
mov    %eax,-0x20(%rbp)
lea    0xd08(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
jmp    1238 <main+0xe8>
mov    -0x4(%rbp),%eax
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x48,%rsp
mov    %rsi,%rbp
cmp    $0x6,%edi
jle    1530 <main+0x3c0>
mov    0x8(%rbp),%rdi
call   1050 <atof@plt>
movsd  %xmm0,0x18(%rsp)
mov    0x10(%rbp),%rdi
call   1050 <atof@plt>
movsd  %xmm0,0x10(%rsp)
mov    0x18(%rbp),%rdi
call   1050 <atof@plt>
movsd  %xmm0,0x8(%rsp)
mov    0x20(%rbp),%rdi
call   1080 <atoi@plt>
mov    %eax,0x2c(%rsp)
mov    0x28(%rbp),%rdi
call   1080 <atoi@plt>
mov    0x30(%rbp),%rdi
mov    %eax,%ebp
call   1080 <atoi@plt>
mov    %eax,%r14d
xor    %eax,%eax
mov    %rax,0x20(%rsp)
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
lea    0xe41(%rip),%r15
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
lea    0xe0b(%rip),%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    $0xa,%edi
call   1030 <putchar@plt>
lea    0xdfe(%rip),%r15
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    %r15,%rdi
xor    %eax,%eax
call   1060 <printf@plt>
lea    0xdc8(%rip),%rdi
xor    %eax,%eax
call   1060 <printf@plt>
mov    $0xa,%edi
call   1030 <putchar@plt>
mov    0x20(%rsp),%rax
mov    %eax,%ecx
or     $0x1,%ecx
mov    %ecx,0x44(%rsp)
mov    %eax,%ecx
or     $0x2,%ecx
mov    %ecx,0x40(%rsp)
mov    %eax,%ecx
or     $0x3,%ecx
mov    %ecx,0x3c(%rsp)
mov    %eax,%ecx
or     $0x4,%ecx
mov    %ecx,0x38(%rsp)
mov    %eax,%ecx
or     $0x5,%ecx
mov    %ecx,0x34(%rsp)
or     $0x7,%eax
mov    %eax,0x30(%rsp)
xor    %r15d,%r15d
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    0x2c(%rsp),%ebx
mov    %ebx,%edi
mov    %ebp,%esi
mov    %r14d,%r13d
mov    %r14d,%edx
mov    0x20(%rsp),%r12
mov    %r12d,%ecx
mov    %r15d,%r8d
xor    %r9d,%r9d
movsd  0x10(%rsp),%xmm0
movsd  0x18(%rsp),%xmm1
movsd  0x8(%rsp),%xmm2
push   $0x0
push   $0x0
call   1070 <TamEarthTide@plt>
add    $0x10,%rsp
lea    0xd36(%rip),%r14
mov    %r14,%rdi
mov    %r12d,%esi
mov    %r15d,%edx
mov    $0x1,%al
call   1060 <printf@plt>
mov    %ebx,%edi
mov    %ebp,%esi
mov    %r13d,%edx
mov    %ebp,%r12d
mov    0x44(%rsp),%ebp
mov    %ebp,%ecx
mov    %r15d,%r8d
xor    %r9d,%r9d
movsd  0x10(%rsp),%xmm0
movsd  0x18(%rsp),%xmm1
movsd  0x8(%rsp),%xmm2
push   $0x0
push   $0x0
call   1070 <TamEarthTide@plt>
add    $0x10,%rsp
mov    %r14,%rdi
mov    %ebp,%esi
mov    %ebx,%r14d
mov    %r15d,%edx
mov    $0x1,%al
call   1060 <printf@plt>
mov    %ebx,%edi
mov    %r12d,%esi
mov    %r13d,%edx
mov    0x40(%rsp),%ebp
mov    %ebp,%ecx
mov    %r15d,%r8d
xor    %r9d,%r9d
movsd  0x10(%rsp),%xmm0
movsd  0x18(%rsp),%xmm1
movsd  0x8(%rsp),%xmm2
push   $0x0
push   $0x0
call   1070 <TamEarthTide@plt>
add    $0x10,%rsp
lea    0xca5(%rip),%rdi
mov    %ebp,%esi
mov    %r15d,%edx
mov    $0x1,%al
call   1060 <printf@plt>
mov    %ebx,%edi
mov    %r12d,%esi
mov    %r13d,%edx
mov    0x3c(%rsp),%ebx
mov    %ebx,%ecx
mov    %r15d,%r8d
xor    %r9d,%r9d
movsd  0x10(%rsp),%xmm0
movsd  0x18(%rsp),%xmm1
movsd  0x8(%rsp),%xmm2
push   $0x0
push   $0x0
call   1070 <TamEarthTide@plt>
add    $0x10,%rsp
lea    0xc5f(%rip),%rbp
mov    %rbp,%rdi
mov    %ebx,%esi
mov    %r15d,%edx
mov    $0x1,%al
call   1060 <printf@plt>
mov    %r14d,%edi
mov    %r12d,%esi
mov    %r13d,%edx
mov    0x38(%rsp),%ebx
mov    %ebx,%ecx
mov    %r15d,%r8d
xor    %r9d,%r9d
movsd  0x10(%rsp),%xmm0
movsd  0x18(%rsp),%xmm1
movsd  0x8(%rsp),%xmm2
push   $0x0
push   $0x0
call   1070 <TamEarthTide@plt>
add    $0x10,%rsp
mov    %rbp,%rdi
mov    %ebx,%esi
mov    %r15d,%edx
mov    $0x1,%al
call   1060 <printf@plt>
mov    %r14d,%edi
mov    %r12d,%esi
mov    %r13d,%edx
mov    0x34(%rsp),%ebx
mov    %ebx,%ecx
mov    %r15d,%r8d
xor    %r9d,%r9d
movsd  0x10(%rsp),%xmm0
movsd  0x18(%rsp),%xmm1
movsd  0x8(%rsp),%xmm2
push   $0x0
push   $0x0
call   1070 <TamEarthTide@plt>
add    $0x10,%rsp
mov    %rbp,%rdi
mov    %ebx,%esi
mov    %r15d,%edx
mov    $0x1,%al
call   1060 <printf@plt>
mov    %r14d,%edi
mov    %r12d,%ebp
mov    %r12d,%esi
mov    %r13d,%r14d
mov    %r13d,%edx
mov    0x30(%rsp),%ebx
mov    %ebx,%ecx
mov    %r15d,%r8d
xor    %r9d,%r9d
movsd  0x10(%rsp),%xmm0
movsd  0x18(%rsp),%xmm1
movsd  0x8(%rsp),%xmm2
push   $0x0
push   $0x0
call   1070 <TamEarthTide@plt>
add    $0x10,%rsp
lea    0xb9b(%rip),%rdi
mov    %ebx,%esi
mov    %r15d,%edx
mov    $0x1,%al
call   1060 <printf@plt>
add    $0x1,%r15d
cmp    $0x3c,%r15d
jne    12f0 <main+0x180>
mov    0x20(%rsp),%r12
lea    0x8(%r12),%r15d
mov    $0xa,%edi
call   1030 <putchar@plt>
cmp    $0x10,%r12d
mov    %r15d,%eax
mov    %rax,0x20(%rsp)
jb     11f0 <main+0x80>
xor    %eax,%eax
add    $0x48,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
mov    0x0(%rbp),%rsi
lea    0xac5(%rip),%rdi
xor    %eax,%eax
call   1060 <printf@plt>
lea    0xb42(%rip),%rdi
call   1040 <puts@plt>
lea    0xb71(%rip),%rdi
call   1040 <puts@plt>
lea    0xb80(%rip),%rdi
call   1040 <puts@plt>
lea    0xbb4(%rip),%rdi
call   1040 <puts@plt>
xor    %edi,%edi
call   1090 <exit@plt>

LLVM IR (-O0):
@.str = [56 x i8] c"usage: %s <lat> <lon> <elevation> <year> <month> <day>\0A\00"
@.str.1 = [60 x i8] c"where lat/lon are in decimal degrees, positive north/east;\0A\00"
@.str.2 = [28 x i8] c" elevation in meters;\0A\00"
@.str.3 = [65 x i8] c" year is 4 digits, month is 1-12, and day is 1-31 in month\0A\00"
@.str.4 = [42 x i8] c" output is GMT time and correction.\0A\00"
@.str.5 = [13 x i8] c"HR:MN ETC| \00"
@.str.6 = [11 x i8] c"HR:MN ETC\00"
@.str.7 = [2 x i8] c"\0A\00"
@.str.8 = [13 x i8] c"----- ---| \00"
@.str.9 = [11 x i8] c"----- ---\00"
@.str.10 = [18 x i8] c"%02d:%02d %4.0f| \00"
@.str.11 = [17 x i8] c"%02d:%02d %4.0f\0A\00"
define i32 @main(i32 %0, i8** %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca i8**
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
%12 = alloca i32
%13 = alloca double
%14 = alloca double
%15 = alloca double
%16 = alloca double
%17 = alloca double
%18 = alloca double
store i32 0, i32* %3
store i32 %0, i32* %4
store i8** %1, i8*** %5
%19 = load i32, i32* %4
%20 = icmp slt i32 %19, 7
br i1 %20, label %21, label %31
21: ; preds = %2
%22 = load i8**, i8*** %5
%23 = getelementptr inbounds i8*, i8** %22, i64 0
%24 = load i8*, i8** %23
%25 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([56 x i8], [56 x i8]* @.str, i64 0, i64 0), i8* %24)
%26 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([60 x i8], [60 x i8]* @.str.1, i64 0, i64 0))
%27 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([28 x i8], [28 x i8]* @.str.2, i64 0, i64 0))
%28 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([65 x i8], [65 x i8]* @.str.3, i64 0, i64 0))
%29 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([42 x i8], [42 x i8]* @.str.4, i64 0, i64 0))
%30 = call i32 @exit(i32 0)
unreachable
31: ; preds = %2
%32 = load i8**, i8*** %5
%33 = getelementptr inbounds i8*, i8** %32, i64 1
%34 = load i8*, i8** %33
%35 = call double @atof(i8* %34)
store double %35, double* %14
%36 = load i8**, i8*** %5
%37 = getelementptr inbounds i8*, i8** %36, i64 2
%38 = load i8*, i8** %37
%39 = call double @atof(i8* %38)
store double %39, double* %15
%40 = load i8**, i8*** %5
%41 = getelementptr inbounds i8*, i8** %40, i64 3
%42 = load i8*, i8** %41
%43 = call double @atof(i8* %42)
store double %43, double* %13
%44 = load i8**, i8*** %5
%45 = getelementptr inbounds i8*, i8** %44, i64 4
%46 = load i8*, i8** %45
%47 = call i32 @atoi(i8* %46)
store i32 %47, i32* %6
%48 = load i8**, i8*** %5
%49 = getelementptr inbounds i8*, i8** %48, i64 5
%50 = load i8*, i8** %49
%51 = call i32 @atoi(i8* %50)
store i32 %51, i32* %7
%52 = load i8**, i8*** %5
%53 = getelementptr inbounds i8*, i8** %52, i64 6
%54 = load i8*, i8** %53
%55 = call i32 @atoi(i8* %54)
store i32 %55, i32* %8
store i32 7, i32* %12
store i32 0, i32* %9
br label %56
56: ; preds = %139, %31
%57 = load i32, i32* %9
%58 = icmp slt i32 %57, 24
br i1 %58, label %59, label %143
59: ; preds = %56
store i32 0, i32* %10
br label %60
60: ; preds = %67, %59
%61 = load i32, i32* %10
%62 = load i32, i32* %12
%63 = sub nsw i32 %62, 1
%64 = icmp slt i32 %61, %63
br i1 %64, label %65, label %70
65: ; preds = %60
%66 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str.5, i64 0, i64 0))
br label %67
67: ; preds = %65
%68 = load i32, i32* %10
%69 = add nsw i32 %68, 1
store i32 %69, i32* %10
br label %60
70: ; preds = %60
%71 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str.6, i64 0, i64 0))
%72 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.7, i64 0, i64 0))
store i32 0, i32* %10
br label %73
73: ; preds = %80, %70
%74 = load i32, i32* %10
%75 = load i32, i32* %12
%76 = sub nsw i32 %75, 1
%77 = icmp slt i32 %74, %76
br i1 %77, label %78, label %83
78: ; preds = %73
%79 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([13 x i8], [13 x i8]* @.str.8, i64 0, i64 0))
br label %80
80: ; preds = %78
%81 = load i32, i32* %10
%82 = add nsw i32 %81, 1
store i32 %82, i32* %10
br label %73
83: ; preds = %73
%84 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([11 x i8], [11 x i8]* @.str.9, i64 0, i64 0))
%85 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.7, i64 0, i64 0))
store i32 0, i32* %10
br label %86
86: ; preds = %136, %83
%87 = load i32, i32* %10
%88 = icmp slt i32 %87, 60
br i1 %88, label %89, label %139
89: ; preds = %86
store i32 0, i32* %11
br label %90
90: ; preds = %113, %89
%91 = load i32, i32* %11
%92 = load i32, i32* %12
%93 = sub nsw i32 %92, 1
%94 = icmp slt i32 %91, %93
br i1 %94, label %95, label %116
95: ; preds = %90
%96 = load i32, i32* %6
%97 = load i32, i32* %7
%98 = load i32, i32* %8
%99 = load i32, i32* %9
%100 = load i32, i32* %11
%101 = add nsw i32 %99, %100
%102 = load i32, i32* %10
%103 = load double, double* %15
%104 = load double, double* %14
%105 = load double, double* %13
%106 = call double @TamEarthTide(i32 %96, i32 %97, i32 %98, i32 %101, i32 %102, i32 0, double %103, double %104, double %105, i32 0, i32 0)
store double %106, double* %18
%107 = load i32, i32* %9
%108 = load i32, i32* %11
%109 = add nsw i32 %107, %108
%110 = load i32, i32* %10
%111 = load double, double* %18
%112 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([18 x i8], [18 x i8]* @.str.10, i64 0, i64 0), i32 %109, i32 %110, double %111)
br label %113
113: ; preds = %95
%114 = load i32, i32* %11
%115 = add nsw i32 %114, 1
store i32 %115, i32* %11
br label %90
116: ; preds = %90
%117 = load i32, i32* %6
%118 = load i32, i32* %7
%119 = load i32, i32* %8
%120 = load i32, i32* %9
%121 = load i32, i32* %11
%122 = add nsw i32 %120, %121
%123 = add nsw i32 %122, 1
%124 = load i32, i32* %10
%125 = load double, double* %15
%126 = load double, double* %14
%127 = load double, double* %13
%128 = call double @TamEarthTide(i32 %117, i32 %118, i32 %119, i32 %123, i32 %124, i32 0, double %125, double %126, double %127, i32 0, i32 0)
store double %128, double* %18
%129 = load i32, i32* %9
%130 = load i32, i32* %11
%131 = add nsw i32 %129, %130
%132 = add nsw i32 %131, 1
%133 = load i32, i32* %10
%134 = load double, double* %18
%135 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([17 x i8], [17 x i8]* @.str.11, i64 0, i64 0), i32 %132, i32 %133, double %134)
br label %136
136: ; preds = %116
%137 = load i32, i32* %10
%138 = add nsw i32 %137, 1
store i32 %138, i32* %10
br label %86
139: ; preds = %86
%140 = load i32, i32* %9
%141 = add nsw i32 %140, 8
store i32 %141, i32* %9
%142 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.7, i64 0, i64 0))
br label %56
143: ; preds = %56
%144 = load i32, i32* %3
ret i32 %144
}

LLVM IR (-O2):
@.str = [56 x i8] c"usage: %s <lat> <lon> <elevation> <year> <month> <day>\0A\00"
@.str.5 = [13 x i8] c"HR:MN ETC| \00"
@.str.6 = [11 x i8] c"HR:MN ETC\00"
@.str.8 = [13 x i8] c"----- ---| \00"
@.str.9 = [11 x i8] c"----- ---\00"
@.str.10 = [18 x i8] c"%02d:%02d %4.0f| \00"
@.str.11 = [17 x i8] c"%02d:%02d %4.0f\0A\00"
@str = [59 x i8] c"where lat/lon are in decimal degrees, positive north/east;\00"
@str.12 = [27 x i8] c" elevation in meters;\00"
@str.13 = [64 x i8] c" year is 4 digits, month is 1-12, and day is 1-31 in month\00"
@str.14 = [41 x i8] c" output is GMT time and correction.\00"
define i32 @main(i32 %0, i8** nocapture %1) {
%3 = icmp slt i32 %0, 7
br i1 %3, label %4, label %12
4: ; preds = %2
%5 = load i8*, i8** %1
%6 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([56 x i8], [56 x i8]* @.str, i64 0, i64 0), i8* %5)
%7 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([59 x i8], [59 x i8]* @str, i64 0, i64 0))
%8 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([27 x i8], [27 x i8]* @str.12, i64 0, i64 0))
%9 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([64 x i8], [64 x i8]* @str.13, i64 0, i64 0))
%10 = tail call i32 @puts(i8* dereferenceable(1) getelementptr inbounds ([41 x i8], [41 x i8]* @str.14, i64 0, i64 0))
%11 = tail call i32 @exit(i32 0)
unreachable
12: ; preds = %2
%13 = getelementptr inbounds i8*, i8** %1, i64 1
%14 = load i8*, i8** %13
%15 = tail call double @atof(i8* %14)
%16 = getelementptr inbounds i8*, i8** %1, i64 2
%17 = load i8*, i8** %16
%18 = tail call double @atof(i8* %17)
%19 = getelementptr inbounds i8*, i8** %1, i64 3
%20 = load i8*, i8** %19
%21 = tail call double @atof(i8* %20)
%22 = getelementptr inbounds i8*, i8** %1, i64 4
%23 = load i8*, i8** %22
%24 = tail call i32 @atoi(i8* %23)
%25 = getelementptr inbounds i8*, i8** %1, i64 5
%26 = load i8*, i8** %25
%27 = tail call i32 @atoi(i8* %26)
%28 = getelementptr inbounds i8*, i8** %1, i64 6
%29 = load i8*, i8** %28
%30 = tail call i32 @atoi(i8* %29)
br label %31
31: ; preds = %12, %73
%32 = phi i32 [ 0, %12 ], [ %74, %73 ]
%33 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.5, i64 0, i64 0))
%34 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.5, i64 0, i64 0))
%35 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.5, i64 0, i64 0))
%36 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.5, i64 0, i64 0))
%37 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.5, i64 0, i64 0))
%38 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.5, i64 0, i64 0))
%39 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([11 x i8], [11 x i8]* @.str.6, i64 0, i64 0))
%40 = tail call i32 @putchar(i32 10)
%41 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.8, i64 0, i64 0))
%42 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.8, i64 0, i64 0))
%43 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.8, i64 0, i64 0))
%44 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.8, i64 0, i64 0))
%45 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.8, i64 0, i64 0))
%46 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([13 x i8], [13 x i8]* @.str.8, i64 0, i64 0))
%47 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([11 x i8], [11 x i8]* @.str.9, i64 0, i64 0))
%48 = tail call i32 @putchar(i32 10)
%49 = or i32 %32, 1
%50 = or i32 %32, 2
%51 = or i32 %32, 3
%52 = or i32 %32, 4
%53 = or i32 %32, 5
%54 = or i32 %32, 7
br label %55
55: ; preds = %31, %55
%56 = phi i32 [ 0, %31 ], [ %71, %55 ]
%57 = tail call double @TamEarthTide(i32 %24, i32 %27, i32 %30, i32 %32, i32 %56, i32 0, double %18, double %15, double %21, i32 0, i32 0)
%58 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([18 x i8], [18 x i8]* @.str.10, i64 0, i64 0), i32 %32, i32 %56, double %57)
%59 = tail call double @TamEarthTide(i32 %24, i32 %27, i32 %30, i32 %49, i32 %56, i32 0, double %18, double %15, double %21, i32 0, i32 0)
%60 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([18 x i8], [18 x i8]* @.str.10, i64 0, i64 0), i32 %49, i32 %56, double %59)
%61 = tail call double @TamEarthTide(i32 %24, i32 %27, i32 %30, i32 %50, i32 %56, i32 0, double %18, double %15, double %21, i32 0, i32 0)
%62 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([18 x i8], [18 x i8]* @.str.10, i64 0, i64 0), i32 %50, i32 %56, double %61)
%63 = tail call double @TamEarthTide(i32 %24, i32 %27, i32 %30, i32 %51, i32 %56, i32 0, double %18, double %15, double %21, i32 0, i32 0)
%64 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([18 x i8], [18 x i8]* @.str.10, i64 0, i64 0), i32 %51, i32 %56, double %63)
%65 = tail call double @TamEarthTide(i32 %24, i32 %27, i32 %30, i32 %52, i32 %56, i32 0, double %18, double %15, double %21, i32 0, i32 0)
%66 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([18 x i8], [18 x i8]* @.str.10, i64 0, i64 0), i32 %52, i32 %56, double %65)
%67 = tail call double @TamEarthTide(i32 %24, i32 %27, i32 %30, i32 %53, i32 %56, i32 0, double %18, double %15, double %21, i32 0, i32 0)
%68 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([18 x i8], [18 x i8]* @.str.10, i64 0, i64 0), i32 %53, i32 %56, double %67)
%69 = tail call double @TamEarthTide(i32 %24, i32 %27, i32 %30, i32 %54, i32 %56, i32 0, double %18, double %15, double %21, i32 0, i32 0)
%70 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([17 x i8], [17 x i8]* @.str.11, i64 0, i64 0), i32 %54, i32 %56, double %69)
%71 = add nuw nsw i32 %56, 1
%72 = icmp eq i32 %71, 60
br i1 %72, label %73, label %55
73: ; preds = %55
%74 = add nuw nsw i32 %32, 8
%75 = tail call i32 @putchar(i32 10)
%76 = icmp ult i32 %32, 16
br i1 %76, label %31, label %77
77: ; preds = %73
ret i32 0
}