LLM4Binary/decompile-bench-makefile huggingface dataset:
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_parse_model_stmt
void
proc_anova_parse_model_stmt(void)
{
	int i;

	nx = 0;

	// parse dependent variable

	scan();

	if (token != NAME)
		expected("variable name");

	for (i = 0; i < dataset->nvar; i++)
		if (strcmp(dataset->spec[i].name, strbuf) == 0)
			break;

	if (i == dataset->nvar)
		expected("variable in data set");

	if (dataset->spec[i].ltab)
		expected("numeric variable");

	yvar = i;

	scan();

	if (token != '=')
		expected("equals sign");

	scan();

	// parse explanatory variables

	for (;;) {

		if (token == ';' || token == '/')
			break;

		if (token != NAME)
			expected("variable name");

		proc_anova_parse_explanatory_variable();
	}

	if (token == '/')
		proc_anova_parse_model_options();

	scan(); // eat the semicolon
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
movl $0x0, 0xf600(%rip)      # 0x143e8
callq 0x2b84
cmpl $0x3e9, 0xaa9d(%rip)    # imm = 0x3E9
jne 0x4e93
movq 0xf0c4(%rip), %r12      # 0x13ec8
movl 0x10(%r12), %r15d
testl %r15d, %r15d
jle 0x4e3d
addq $0x20, %r12
xorl %r14d, %r14d
leaq 0xb274(%rip), %rbx      # 0x10090
movq (%r12), %rdi
movq %rbx, %rsi
callq 0x2160
testl %eax, %eax
je 0x4e40
incq %r14
addq $0x28, %r12
cmpq %r14, %r15
jne 0x4e1c
movl %r15d, %r14d
jmp 0x4e40
xorl %r14d, %r14d
cmpl %r15d, %r14d
je 0x4eb1
movq 0xf07c(%rip), %rax      # 0x13ec8
movl %r14d, %ecx
leaq (%rcx,%rcx,4), %rcx
cmpq $0x0, 0x30(%rax,%rcx,8)
jne 0x4ebd
movl %r14d, 0xf71e(%rip)     # 0x14580
callq 0x2b84
cmpl $0x3d, 0xaa26(%rip)     # 0xf894
jne 0x4ec9
callq 0x2b84
movl 0xaa19(%rip), %eax      # 0xf894
cmpl $0x3e9, %eax            # imm = 0x3E9
jne 0x4e89
callq 0x5f9f
jmp 0x4e75
cmpl $0x2f, %eax
je 0x4e9f
cmpl $0x3b, %eax
je 0x4ea4
leaq 0x684c(%rip), %rdi      # 0xb6e6
callq 0x25f2
callq 0x611d
popq %rbx
popq %r12
popq %r14
popq %r15
popq %rbp
jmp 0x2b84
leaq 0x683c(%rip), %rdi      # 0xb6f4
callq 0x25f2
leaq 0x6845(%rip), %rdi      # 0xb709
callq 0x25f2
leaq 0x6561(%rip), %rdi      # 0xb431
callq 0x25f2
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_model
void
proc_anova_model(void)
{
	proc_anova_regression();

	print_title();

	if (nmiss) {
		snprintf(bigbuf, BIGBUFLEN, "%d observations deleted due to missing data", nmiss);
		emit_line(bigbuf);
	}

	emit_line_center("Analysis of Variance");
	emit_line("");

	print_anova_table_part1();

	print_anova_table_part2();

	print_anova_table_part3();
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %rbx
pushq %rax
callq 0x66d0
callq 0x4a74
movl 0xfb55(%rip), %ecx      # 0x14a40
testl %ecx, %ecx
je 0x4f14
leaq 0xdfca(%rip), %rbx      # 0x12ec0
leaq 0x691c(%rip), %rdx      # 0xb819
movl $0xfa0, %esi            # imm = 0xFA0
movq %rbx, %rdi
xorl %eax, %eax
callq 0x20e0
movq %rbx, %rdi
callq 0x2070
leaq 0x692a(%rip), %rdi      # 0xb845
callq 0x408b
movl $0xa, %edi
callq 0x2050
callq 0x67f9
callq 0x6ae9
addq $0x8, %rsp
popq %rbx
popq %rbp
jmp 0x6c4a
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_parse_means_item
void
proc_anova_parse_means_item(void)
{
	if (token != NAME)
		expected("variable name");

	if (strlen(strbuf) + 1 > BIGBUFLEN)
		stop("Buffer overrun");

	strcpy(bigbuf, strbuf);

	scan();

	while (token == '*') {
		scan();
		if (token != NAME)
			expected("variable name");
		if (strlen(bigbuf) + strlen(strbuf) + 2 > BIGBUFLEN)
			stop("Buffer overrun");
		strcat(bigbuf, "*");
		strcat(bigbuf, strbuf);
		scan();
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
cmpl $0x3e9, 0xa941(%rip)    # imm = 0x3E9
jne 0x5009
leaq 0xb130(%rip), %rdi      # 0x10090
callq 0x20b0
addq $-0xfa0, %rax           # imm = 0xF060
cmpq $-0xfa2, %rax           # imm = 0xF05E
jbe 0x5015
leaq 0xdf42(%rip), %rbx      # 0x12ec0
leaq 0xb10b(%rip), %rsi      # 0x10090
movq %rbx, %rdi
callq 0x2060
callq 0x2b84
cmpl $0x2a, 0xa8fb(%rip)     # 0xf894
jne 0x4ffe
leaq 0xb0ee(%rip), %r14      # 0x10090
callq 0x2b84
cmpl $0x3e9, 0xa8e3(%rip)    # imm = 0x3E9
jne 0x5009
movq %rbx, %rdi
callq 0x20b0
movq %rax, %r15
movq %r14, %rdi
callq 0x20b0
addq %r15, %rax
addq $-0xf9f, %rax           # imm = 0xF061
cmpq $-0xfa2, %rax           # imm = 0xF05E
jbe 0x5015
movq %rbx, %rdi
callq 0x20b0
movw $0x2a, (%rax,%rbx)
movq %rbx, %rdi
movq %r14, %rsi
callq 0x21e0
callq 0x2b84
cmpl $0x2a, 0xa898(%rip)     # 0xf894
je 0x4fa2
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
retq
leaq 0x66d6(%rip), %rdi      # 0xb6e6
callq 0x25f2
callq 0xa74a
leaq 0x66a5(%rip), %rdi      # 0xb6c6
callq 0x4081
leaq 0x10bb3(%rip), %rdi     # 0x15be0
movl $0x1, %esi
callq 0x21b0
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_compute_means
void
proc_anova_compute_means(int x)
{
	int i, level, n;
	double t, y;

	n = dataset->spec[x].num_levels;

	if (n > MAXLVL)
		stop("Too many levels");

	for (i = 0; i < n; i++) {
		mean[i] = 0;
		variance[i] = 0;
		count[i] = 0;
	}

	for (i = 0; i < dataset->nobs; i++) {
		if (miss[i])
			continue;
		y = dataset->spec[yvar].v[i];
		level = dataset->spec[x].v[i];
		count[level]++;
		t = mean[level];
		mean[level] += (y - t) / count[level];
		variance[level] += (y - t) * (y - mean[level]);
	}

	for (i = 0; i < n; i++)
		variance[i] /= (count[i] - 1);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r12
pushq %rbx
movq 0xee7f(%rip), %r15      # 0x13ec8
movslq %edi, %rax
leaq (%rax,%rax,4), %r12
movslq 0x2c(%r15,%r12,8), %r14
cmpq $0x64, %r14
jg 0x51a1
testl %r14d, %r14d
jle 0x50a4
leaq (,%r14,8), %rbx
leaq 0xff4d(%rip), %rdi      # 0x14fc0
xorl %esi, %esi
movq %rbx, %rdx
callq 0x2100
leaq 0x1025c(%rip), %rdi     # 0x152e0
xorl %esi, %esi
movq %rbx, %rdx
callq 0x2100
leaq (,%r14,4), %rdx
leaq 0x10563(%rip), %rdi     # 0x15600
xorl %esi, %esi
callq 0x2100
cmpl $0x0, 0x14(%r15)
jle 0x515a
leaq 0x20(%r15), %rdx
movq 0xf9fe(%rip), %rax      # 0x14ab8
movslq 0xf4bf(%rip), %rcx      # 0x14580
leaq (%rcx,%rcx,4), %rcx
leaq (%rdx,%rcx,8), %rcx
addq $0x20, %rcx
leaq (%rdx,%r12,8), %rdx
addq $0x20, %rdx
xorl %esi, %esi
leaq 0x10522(%rip), %rdi     # 0x15600
leaq 0xfedb(%rip), %r8       # 0x14fc0
leaq 0x101f4(%rip), %r9      # 0x152e0
cmpl $0x0, (%rax,%rsi,4)
jne 0x514e
movq (%rdx), %r10
cvttsd2si (%r10,%rsi,8), %r10d
movq (%rcx), %r11
movsd (%r11,%rsi,8), %xmm0
movslq %r10d, %r10
movl (%rdi,%r10,4), %r11d
incl %r11d
movl %r11d, (%rdi,%r10,4)
movsd (%r8,%r10,8), %xmm1
movapd %xmm0, %xmm2
subsd %xmm1, %xmm2
xorps %xmm3, %xmm3
cvtsi2sd %r11d, %xmm3
movapd %xmm2, %xmm4
divsd %xmm3, %xmm4
addsd %xmm1, %xmm4
movsd %xmm4, (%r8,%r10,8)
subsd %xmm4, %xmm0
mulsd %xmm2, %xmm0
addsd (%r9,%r10,8), %xmm0
movsd %xmm0, (%r9,%r10,8)
incq %rsi
movslq 0x14(%r15), %r10
cmpq %r10, %rsi
jl 0x50ec
testl %r14d, %r14d
jle 0x5198
shlq $0x2, %r14
leaq 0x10176(%rip), %rax     # 0x152e0
xorl %ecx, %ecx
leaq 0x1048d(%rip), %rdx     # 0x15600
movl (%rcx,%rdx), %esi
decl %esi
xorps %xmm0, %xmm0
cvtsi2sd %esi, %xmm0
movsd (%rax), %xmm1
divsd %xmm0, %xmm1
movsd %xmm1, (%rax)
addq $0x8, %rax
addq $0x4, %rcx
cmpq %rcx, %r14
jne 0x5173
popq %rbx
popq %r12
popq %r14
popq %r15
popq %rbp
retq
callq 0xa74a
leaq 0x6722(%rip), %rdi      # 0xb8cf
callq 0x4081
leaq 0x10a27(%rip), %rdi     # 0x15be0
movl $0x1, %esi
callq 0x21b0
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_parse_explanatory_variable
void
proc_anova_parse_explanatory_variable(void)
{
	int n = 1;

	xx[0] = proc_anova_get_var_index();

	scan();

	switch (token) {

	case '*': // name * name ...

		do {
			scan();
			if (token != NAME)
				expected("variable name");
			if (n == MAXVAR)
				stop("Too many interaction terms");
			xx[n++] = proc_anova_get_var_index();
			scan();
		} while (token == '*');
		proc_anova_add_interaction(n);
		break;

	case '|': // name | name ...

		do {
			scan();
			if (token != NAME)
				expected("variable name");
			if (n == MAXVAR)
				stop("Too many interaction terms");
			xx[n++] = proc_anova_get_var_index();
			scan();
		} while (token == '|');
		proc_anova_add_factorial(n);
		break;

	case '(': // name(name name ...)

		scan();
		while (token == NAME) {
			if (n == MAXVAR)
				stop("Too many interaction terms");
			xx[n++] = proc_anova_get_var_index();
			scan();
		};
		if (token != ')')
			expected("right parenthesis ')'");
		scan();
		proc_anova_add_nested(n);
		break;

	default:
		if (nx == MAXVAR)
			stop("Too many explanatory variables");
		xtab[nx++] = xx[0];
		break;
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r14
pushq %rbx
callq 0x6158
movl %eax, 0xe5df(%rip)      # 0x14590
callq 0x2b84
movl 0x98d8(%rip), %eax      # 0xf894
cmpl $0x7c, %eax
je 0x605d
cmpl $0x2a, %eax
je 0x600d
cmpl $0x28, %eax
jne 0x609c
movl $0x1, %ebx
leaq 0xe5b1(%rip), %r14      # 0x14590
callq 0x2b84
movl 0x98aa(%rip), %eax      # 0xf894
cmpl $0x3e9, %eax            # imm = 0x3E9
jne 0x60c7
cmpq $0x64, %rbx
je 0x60d5
callq 0x6158
movl %eax, (%r14,%rbx,4)
incq %rbx
jmp 0x5fdf
movl $0x1, %ebx
leaq 0xe577(%rip), %r14      # 0x14590
callq 0x2b84
cmpl $0x3e9, 0x986c(%rip)    # imm = 0x3E9
jne 0x60f7
cmpq $0x64, %rbx
je 0x60d5
callq 0x6158
movl %eax, (%r14,%rbx,4)
incq %rbx
callq 0x2b84
cmpl $0x2a, 0x9844(%rip)     # 0xf894
je 0x6019
movl %ebx, %edi
popq %rbx
popq %r14
popq %rbp
jmp 0x621c
movl $0x1, %ebx
leaq 0xe527(%rip), %r14      # 0x14590
callq 0x2b84
cmpl $0x3e9, 0x981c(%rip)    # imm = 0x3E9
jne 0x60f7
cmpq $0x64, %rbx
je 0x60d5
callq 0x6158
movl %eax, (%r14,%rbx,4)
incq %rbx
callq 0x2b84
cmpl $0x7c, 0x97fc(%rip)     # 0xf894
je 0x6069
jmp 0x60c2
movslq 0xe345(%rip), %rax      # 0x143e8
cmpq $0x64, %rax
je 0x610f
movl 0xe4e1(%rip), %ecx      # 0x14590
leal 0x1(%rax), %edx
movl %edx, 0xe330(%rip)      # 0x143e8
leaq 0xe661(%rip), %rdx      # 0x14720
movl %ecx, (%rdx,%rax,4)
popq %rbx
popq %r14
popq %rbp
retq
cmpl $0x29, %eax
jne 0x6103
popq %rbx
popq %r14
popq %rbp
jmp 0x2b84
callq 0xa74a
leaq 0x5656(%rip), %rdi      # 0xb737
callq 0x4081
leaq 0xfaf3(%rip), %rdi      # 0x15be0
movl $0x1, %esi
callq 0x21b0
leaq 0x55e8(%rip), %rdi      # 0xb6e6
callq 0x25f2
leaq 0x5648(%rip), %rdi      # 0xb752
callq 0x25f2
callq 0xa74a
leaq 0x564d(%rip), %rdi      # 0xb768
jmp 0x60e1
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_get_var_index
int
proc_anova_get_var_index(void)
{
	int i, n;
	n = dataset->nvar;
	for (i = 0; i < n; i++)
		if (strcmp(dataset->spec[i].name, strbuf) == 0)
			break;
	if (i == n) {
		snprintf(errbuf, ERRBUFLEN, "The variable name \"%s\" is not in the data set", strbuf);
		stop(errbuf);
	}
	if (dataset->spec[i].ltab == NULL) {
		snprintf(errbuf, ERRBUFLEN, "The variable \"%s\" is numeric, please change to categorical in the data step", strbuf);
		stop(errbuf);
	}
	return i;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movq 0xdd5b(%rip), %r15      # 0x13ec8
movl 0x10(%r15), %r12d
testl %r12d, %r12d
jle 0x61a4
leaq 0x20(%r15), %r13
xorl %ebx, %ebx
leaq 0x9f0d(%rip), %r14      # 0x10090
movq (%r13), %rdi
movq %r14, %rsi
callq 0x2160
testl %eax, %eax
je 0x61a6
incq %rbx
addq $0x28, %r13
cmpq %rbx, %r12
jne 0x6183
movl %r12d, %ebx
jmp 0x61a6
xorl %ebx, %ebx
cmpl %r12d, %ebx
je 0x61ca
movl %ebx, %eax
leaq (%rax,%rax,4), %rax
cmpq $0x0, 0x30(%r15,%rax,8)
je 0x61da
movl %ebx, %eax
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
leaq 0x96df(%rip), %rbx      # 0xf8b0
leaq 0x55af(%rip), %rdx      # 0xb787
jmp 0x61e8
leaq 0x96cf(%rip), %rbx      # 0xf8b0
leaq 0x55cd(%rip), %rdx      # 0xb7b5
leaq 0x9ea1(%rip), %rcx      # 0x10090
movl $0x7d0, %esi            # imm = 0x7D0
movq %rbx, %rdi
xorl %eax, %eax
callq 0x20e0
callq 0xa74a
movq %rbx, %rdi
callq 0x4081
leaq 0xf9ce(%rip), %rdi      # 0x15be0
movl $0x1, %esi
callq 0x21b0
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_create_interaction_level_names
void
proc_anova_create_interaction_level_names(int n)
{
	int i, j, k, len, m, x;
	char *name, *s;

	m = dataset->nvar - 1; // index of new interaction column

	for (i = 0; i < n; i++)
		kk[i] = 0;

	for (i = 0; i < dataset->spec[m].num_levels; i++) {

		len = n;

		for (j = 0; j < n; j++) {
			x = xx[j];
			k = kk[j];
			s = dataset->spec[x].ltab[k];
			len += strlen(s);
		}

		name = (char *) xmalloc(len);

		name[0] = 0;

		for (j = 0; j < n; j++) {
			if (j > 0)
				strcat(name, "*");
			x = xx[j];
			k = kk[j];
			s = dataset->spec[x].ltab[k];
			strcat(name, s);
		}

		dataset->spec[m].ltab[i] = name;

		// increment indices

		for (j = n - 1; j >= 0; j--) {
			x = xx[j];
			if (++kk[j] < dataset->spec[x].num_levels)
				break;
			kk[j] = 0;
		}
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x28, %rsp
movq 0xd993(%rip), %rax      # 0x13ec8
movslq 0x10(%rax), %rbx
decq %rbx
movl %edi, %r14d
movl %edi, -0x2c(%rbp)
testl %edi, %edi
jle 0x655c
leaq (,%r14,4), %rdx
leaq 0xe35b(%rip), %rdi      # 0x148b0
xorl %esi, %esi
callq 0x2100
movq 0xd965(%rip), %r15      # 0x13ec8
leaq (%rbx,%rbx,4), %rdi
cmpl $0x0, 0x2c(%r15,%rdi,8)
jle 0x66c1
leaq (,%r14,4), %r9
incq %r14
movq %r14, -0x40(%rbp)
xorl %r8d, %r8d
leaq 0xe004(%rip), %rbx      # 0x14590
leaq 0xe31d(%rip), %r13      # 0x148b0
movq %rdi, -0x48(%rbp)
movq %r9, -0x38(%rbp)
movq %r8, -0x50(%rbp)
movl -0x2c(%rbp), %eax
movl %eax, %r14d
testl %eax, %eax
jle 0x65ee
addq $0x20, %r15
xorl %r12d, %r12d
movl -0x2c(%rbp), %r14d
leaq 0xdfd5(%rip), %rax      # 0x14590
movslq (%r12,%rax), %rax
movslq (%r12,%r13), %rcx
leaq (%rax,%rax,4), %rax
movq 0x10(%r15,%rax,8), %rax
movq (%rax,%rcx,8), %rdi
movq %r9, %rbx
callq 0x20b0
movq %rbx, %r9
addl %eax, %r14d
leaq 0xdfab(%rip), %rbx      # 0x14590
addq $0x4, %r12
cmpq %r12, %r9
jne 0x65b4
movl %r14d, %edi
callq 0x2bda
movq %rax, %r14
movb $0x0, (%rax)
cmpl $0x0, -0x2c(%rbp)
jle 0x664b
movq 0xd8bf(%rip), %r15      # 0x13ec8
addq $0x20, %r15
xorl %r12d, %r12d
testq %r12, %r12
je 0x6624
movq %r14, %rdi
callq 0x20b0
movw $0x2a, (%r14,%rax)
movslq (%r12,%rbx), %rax
movslq (%r12,%r13), %rcx
leaq (%rax,%rax,4), %rax
movq 0x10(%r15,%rax,8), %rax
movq (%rax,%rcx,8), %rsi
movq %r14, %rdi
callq 0x21e0
addq $0x4, %r12
cmpq %r12, -0x38(%rbp)
jne 0x6610
movq 0xd876(%rip), %rax      # 0x13ec8
movq -0x48(%rbp), %rdi
movq 0x30(%rax,%rdi,8), %rax
movq -0x50(%rbp), %r8
movq %r14, (%rax,%r8,8)
cmpl $0x0, -0x2c(%rbp)
movq -0x38(%rbp), %r9
jle 0x66a9
movq 0xd854(%rip), %rax      # 0x13ec8
addq $0x20, %rax
movq -0x40(%rbp), %rcx
movslq -0x8(%rbx,%rcx,4), %rdx
movl -0x8(%r13,%rcx,4), %esi
incl %esi
movl %esi, -0x8(%r13,%rcx,4)
leaq (%rdx,%rdx,4), %rdx
cmpl 0xc(%rax,%rdx,8), %esi
jl 0x66a9
movl $0x0, -0x8(%r13,%rcx,4)
decq %rcx
cmpq $0x1, %rcx
jg 0x667c
incq %r8
movq 0xd815(%rip), %r15      # 0x13ec8
movslq 0x2c(%r15,%rdi,8), %rax
cmpq %rax, %r8
jl 0x659b
addq $0x28, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_regression
void
proc_anova_regression(void)
{
	proc_anova_prelim();

	proc_anova_fit();

	dfe = nobs - npar;

	mse = sse / dfe;

	rootmse = sqrt(mse);

	msr = ssr / (npar - 1);

	fval = msr / mse;

	pval = 1 - fdist(fval, npar - 1, nobs - npar);

	rsquare = 1 - sse / css;

	adjrsq = 1 - (double) (nobs - 1) / (nobs - npar) * sse / css;

	cv = 100 * rootmse / ybar;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
callq 0x6ef7
callq 0x720b
movl 0xe360(%rip), %eax      # 0x14a44
subl 0xe35e(%rip), %eax      # 0x14a48
cvtsi2sd %eax, %xmm1
movsd %xmm1, 0xe35a(%rip)     # 0x14a50
movsd 0xe35a(%rip), %xmm0     # 0x14a58
divsd %xmm1, %xmm0
movsd %xmm0, 0xe356(%rip)     # 0x14a60
xorpd %xmm1, %xmm1
ucomisd %xmm1, %xmm0
jb 0x671a
sqrtsd %xmm0, %xmm0
jmp 0x671f
callq 0x2200
movsd %xmm0, 0xe341(%rip)     # 0x14a68
movsd 0xe341(%rip), %xmm0     # 0x14a70
movl 0xe313(%rip), %eax      # 0x14a48
leal -0x1(%rax), %ecx
xorps %xmm1, %xmm1
cvtsi2sd %ecx, %xmm1
divsd %xmm1, %xmm0
movsd %xmm0, 0xe32d(%rip)     # 0x14a78
divsd 0xe30d(%rip), %xmm0     # 0x14a60
movsd %xmm0, 0xe325(%rip)     # 0x14a80
movl 0xe2e3(%rip), %ecx      # 0x14a44
subl %eax, %ecx
cvtsi2sd %ecx, %xmm2
callq 0x7339
movsd 0x4b84(%rip), %xmm1     # 0xb2f8
movapd %xmm1, %xmm2
subsd %xmm0, %xmm2
movsd %xmm2, 0xe304(%rip)     # 0x14a88
movsd 0xe2cc(%rip), %xmm0     # 0x14a58
movsd 0xe2fc(%rip), %xmm2     # 0x14a90
movl 0xe2aa(%rip), %eax      # 0x14a44
leal -0x1(%rax), %ecx
cvtsi2sd %ecx, %xmm3
subl 0xe2a1(%rip), %eax      # 0x14a48
cvtsi2sd %eax, %xmm4
divsd %xmm4, %xmm3
mulsd %xmm0, %xmm3
divsd %xmm2, %xmm0
movapd %xmm1, %xmm4
subsd %xmm0, %xmm4
movsd %xmm4, 0xe2d1(%rip)     # 0x14a98
divsd %xmm2, %xmm3
subsd %xmm3, %xmm1
movsd 0xe291(%rip), %xmm0     # 0x14a68
mulsd 0x4b59(%rip), %xmm0     # 0xb338
movsd %xmm1, 0xe2b9(%rip)     # 0x14aa0
divsd 0xe2b9(%rip), %xmm0     # 0x14aa8
movsd %xmm0, 0xe2b9(%rip)     # 0x14ab0
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: print_anova_table_part2
void
print_anova_table_part2(void)
{
	char **a;

	a = (char **) xmalloc(8 * sizeof (char *));

	A(0, 0) = strdup("R-Square");
	A(0, 1) = strdup("Coeff Var");
	A(0, 2) = strdup("Root MSE");

	snprintf(bigbuf, BIGBUFLEN, "%s Mean", dataset->spec[yvar].name);
	A(0, 3) = strdup(bigbuf);

	snprintf(bigbuf, BIGBUFLEN, "%0.6f", rsquare);
	A(1, 0) = strdup(bigbuf);

	snprintf(bigbuf, BIGBUFLEN, "%0.6f", cv);
	A(1, 1) = strdup(bigbuf);

	snprintf(bigbuf, BIGBUFLEN, "%0.6f", rootmse);
	A(1, 2) = strdup(bigbuf);

	snprintf(bigbuf, BIGBUFLEN, "%0.6f", ybar);
	A(1, 3) = strdup(bigbuf);

	bigbuf[0] = 0; // right justified
	bigbuf[1] = 0;
	bigbuf[2] = 0;
	bigbuf[3] = 0;

	print_table_and_free(a, 2, 4, bigbuf);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
movl $0x40, %edi
callq 0x2180
testq %rax, %rax
je 0x6c40
movq %rax, %rbx
leaq 0x4d90(%rip), %rdi      # 0xb8a0
callq 0x2210
movq %rax, (%rbx)
leaq 0x4d8a(%rip), %rdi      # 0xb8a9
callq 0x2210
movq %rax, 0x8(%rbx)
leaq 0x4d84(%rip), %rdi      # 0xb8b3
callq 0x2210
movq %rax, 0x10(%rbx)
movq 0xd389(%rip), %rax      # 0x13ec8
movslq 0xda3a(%rip), %rcx      # 0x14580
leaq (%rcx,%rcx,4), %rcx
movq 0x20(%rax,%rcx,8), %rcx
leaq 0xc36a(%rip), %r14      # 0x12ec0
leaq 0x4d5f(%rip), %rdx      # 0xb8bc
movl $0xfa0, %esi            # imm = 0xFA0
movq %r14, %rdi
xorl %eax, %eax
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, 0x18(%rbx)
movsd 0xdf18(%rip), %xmm0     # 0x14a98
leaq 0x4815(%rip), %r15      # 0xb39c
movl $0xfa0, %esi            # imm = 0xFA0
movq %r14, %rdi
movq %r15, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, 0x20(%rbx)
movsd 0xdf03(%rip), %xmm0     # 0x14ab0
movl $0xfa0, %esi            # imm = 0xFA0
movq %r14, %rdi
movq %r15, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, 0x28(%rbx)
movsd 0xde95(%rip), %xmm0     # 0x14a68
movl $0xfa0, %esi            # imm = 0xFA0
movq %r14, %rdi
movq %r15, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, 0x30(%rbx)
movsd 0xdeaf(%rip), %xmm0     # 0x14aa8
movl $0xfa0, %esi            # imm = 0xFA0
movq %r14, %rdi
movq %r15, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, 0x38(%rbx)
movl $0x0, 0xc29f(%rip)      # 0x12ec0
movq %rbx, %rdi
movl $0x2, %esi
movl $0x4, %edx
movq %r14, %rcx
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x4767
movl $0x1, %edi
callq 0x21f0
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_fit
void
proc_anova_fit(void)
{
	int i, j, n, x;

	// put in intercept

	for (i = 0; i < nobs; i++)
		X(i, 0) = 1;

	npar = 1;

	// fit explanatory variables

	for (i = 0; i < nx; i++) {
		x = xtab[i];
		n = dataset->spec[x].num_levels;
		for (j = 0; j < n; j++)
			proc_anova_fit1(x, j); // fit next column
		df[i] = npar;
		if (gstate == -1)
			proc_anova_compute_G();
		proc_anova_compute_B();
		proc_anova_compute_Yhat();
		proc_anova_compute_ss();
		ss[i] = ssr;
	}

	// differentials

	for (i = nx - 1; i > 0; i--) {
		df[i] -= df[i - 1];
		ss[i] -= ss[i - 1];
	}

	df[0]--; // subtract 1 for intercept
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movslq 0xd824(%rip), %rax      # 0x14a44
testq %rax, %rax
jle 0x724c
movq 0xd8ac(%rip), %rcx      # 0x14ad8
movslq 0xd8bd(%rip), %rdx      # 0x14af0
shlq $0x3, %rdx
movabsq $0x3ff0000000000000, %rsi # imm = 0x3FF0000000000000
movq %rsi, (%rcx)
addq %rdx, %rcx
decq %rax
jne 0x7241
movl $0x1, 0xd7f2(%rip)      # 0x14a48
movl 0xd18c(%rip), %eax      # 0x143e8
leaq 0xd89d(%rip), %r15      # 0x14b00
testl %eax, %eax
jle 0x72ee
xorl %r12d, %r12d
leaq 0xd4ab(%rip), %rax      # 0x14720
movslq (%rax,%r12,4), %rbx
movq 0xcc48(%rip), %rax      # 0x13ec8
leaq (%rbx,%rbx,4), %rcx
movl 0x2c(%rax,%rcx,8), %r13d
testl %r13d, %r13d
jle 0x72a3
xorl %r14d, %r14d
movl %ebx, %edi
movl %r14d, %esi
callq 0x73f1
incl %r14d
cmpl %r14d, %r13d
jne 0x7291
movl 0xd79f(%rip), %eax      # 0x14a48
movl %eax, (%r15,%r12,4)
cmpl $-0x1, 0xd9dc(%rip)     # 0x14c90
jne 0x72bb
callq 0x7495
callq 0x78b6
callq 0x7982
callq 0x79f1
movsd 0xd79e(%rip), %xmm0     # 0x14a70
leaq 0xd9c7(%rip), %rax      # 0x14ca0
movsd %xmm0, (%rax,%r12,8)
incq %r12
movslq 0xd0ff(%rip), %rax      # 0x143e8
cmpq %rax, %r12
jl 0x726e
cmpl $0x2, %eax
jl 0x7324
movl %eax, %eax
incq %rax
leaq 0xd9a1(%rip), %rcx      # 0x14ca0
movl -0xc(%r15,%rax,4), %edx
subl %edx, -0x8(%r15,%rax,4)
movsd -0x10(%rcx,%rax,8), %xmm0
subsd -0x18(%rcx,%rax,8), %xmm0
movsd %xmm0, -0x10(%rcx,%rax,8)
decq %rax
cmpq $0x2, %rax
jg 0x72ff
decl 0xd7d6(%rip)            # 0x14b00
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: fdist
double
fdist(double t, double df1, double df2)
{
	if (isnan(t) || !isfinite(df1) || !isfinite(df2) || df1 <= 0.0 || df2 <= 0.0)
		return NAN;
	if (t == INFINITY)
		return 1.0; // pf(Inf,1,1) == 1
	if (t <= 0.0)
		return 0.0; // pf(0,1,1) == 0
	return incbeta(df1 / 2.0, df2 / 2.0, t / (t + df2 / df1));
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
movapd %xmm0, %xmm3
ucomisd %xmm0, %xmm0
movq %xmm1, %rcx
setp %dl
btrq $0x3f, %rcx
movabsq $0x7fefffffffffffff, %rax # imm = 0x7FEFFFFFFFFFFFFF
cmpq %rax, %rcx
setg %cl
orb %dl, %cl
movsd 0x3f84(%rip), %xmm0     # 0xb2f0
jne 0x73de
movq %xmm2, %rcx
btrq $0x3f, %rcx
cmpq %rax, %rcx
setg %al
xorpd %xmm4, %xmm4
ucomisd %xmm2, %xmm4
jae 0x73de
ucomisd %xmm1, %xmm4
jae 0x73de
testb %al, %al
jne 0x73de
ucomisd 0x3f8e(%rip), %xmm3     # 0xb328
jb 0x73a6
movsd 0x3f54(%rip), %xmm0     # 0xb2f8
jmp 0x73de
xorpd %xmm0, %xmm0
ucomisd %xmm3, %xmm0
jae 0x73de
movsd 0x3f90(%rip), %xmm4     # 0xb348
movapd %xmm1, %xmm0
mulsd %xmm4, %xmm0
mulsd %xmm2, %xmm4
divsd %xmm1, %xmm2
addsd %xmm3, %xmm2
divsd %xmm2, %xmm3
movapd %xmm4, %xmm1
movapd %xmm3, %xmm2
popq %rbp
jmp 0x3c3d
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_fit1
void
proc_anova_fit1(int x, int level)
{
	int i, k = 0;

	for (i = 0; i < dataset->nobs; i++) {
		if (miss[i])
			continue;
		X(k++, npar) = (dataset->spec[x].v[i] == level) ? 1 : 0;
	}

	npar++;

	gstate = proc_anova_compute_G();

	if (gstate == -1)
		npar--; // X'X is singular hence remove column
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
movq 0xcacc(%rip), %rdx      # 0x13ec8
movslq 0x14(%rdx), %rax
testq %rax, %rax
jle 0x7477
movq 0xd6ac(%rip), %rcx      # 0x14ab8
movslq %edi, %rdi
leaq (%rdi,%rdi,4), %rdi
leaq (%rdx,%rdi,8), %rdx
addq $0x40, %rdx
cvtsi2sd %esi, %xmm0
movslq 0xd622(%rip), %rsi      # 0x14a48
shlq $0x3, %rsi
addq 0xd6a7(%rip), %rsi      # 0x14ad8
movslq 0xd6b8(%rip), %rdi      # 0x14af0
xorl %r8d, %r8d
movsd 0x3eb5(%rip), %xmm1     # 0xb2f8
xorl %r9d, %r9d
cmpl $0x0, (%rcx,%r8,4)
jne 0x746f
movq (%rdx), %r10
movsd (%r10,%r8,8), %xmm2
cmpeqsd %xmm0, %xmm2
andpd %xmm1, %xmm2
movslq %r9d, %r10
incl %r9d
imulq %rdi, %r10
movlpd %xmm2, (%rsi,%r10,8)
incq %r8
cmpq %r8, %rax
jne 0x7446
incl 0xd5cb(%rip)            # 0x14a48
callq 0x7495
movl %eax, 0xd808(%rip)      # 0x14c90
cmpl $-0x1, %eax
jne 0x7493
decl 0xd5b5(%rip)            # 0x14a48
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_compute_B
void
proc_anova_compute_B(void)
{
	int i, j;
	double t;

	for (i = 0; i < npar; i++) {
		t = 0;
		for (j = 0; j < nobs; j++)
			t += X(j, i) * Y[j];
		T(0, i) = t;
	}

	for (i = 0; i < npar; i++) {
		t = 0;
		for (j = 0; j < npar; j++)
			t += G(i, j) * T(0, j);
		B[i] = t;
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
movslq 0xd187(%rip), %rax      # 0x14a48
testq %rax, %rax
jle 0x7929
movl 0xd178(%rip), %ecx      # 0x14a44
movq 0xd205(%rip), %rdx      # 0x14ad8
movslq 0xd216(%rip), %rsi      # 0x14af0
movq 0xd1ff(%rip), %rdi      # 0x14ae0
movq 0xd1e8(%rip), %r8       # 0x14ad0
shlq $0x3, %rsi
xorl %r9d, %r9d
xorpd %xmm0, %xmm0
testl %ecx, %ecx
jle 0x7917
movq %rdx, %r10
xorl %r11d, %r11d
movsd (%r10), %xmm1
mulsd (%rdi,%r11,8), %xmm1
addsd %xmm1, %xmm0
incq %r11
addq %rsi, %r10
cmpq %r11, %rcx
jne 0x78fd
movsd %xmm0, (%r8,%r9,8)
incq %r9
addq $0x8, %rdx
cmpq %rax, %r9
jne 0x78ef
testl %eax, %eax
jle 0x7980
movq 0xd194(%rip), %rcx      # 0x14ac8
movslq 0xd1b5(%rip), %rdx      # 0x14af0
movq 0xd18e(%rip), %rsi      # 0x14ad0
movq 0xd177(%rip), %rdi      # 0x14ac0
shlq $0x3, %rdx
xorl %r8d, %r8d
xorpd %xmm0, %xmm0
xorl %r9d, %r9d
movsd (%rcx,%r9,8), %xmm1
mulsd (%rsi,%r9,8), %xmm1
addsd %xmm1, %xmm0
incq %r9
cmpq %r9, %rax
jne 0x7957
movsd %xmm0, (%rdi,%r8,8)
incq %r8
addq %rdx, %rcx
cmpq %rax, %r8
jne 0x7950
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_compute_Yhat
void
proc_anova_compute_Yhat(void)
{
	int i, j;
	double t;

	for (i = 0; i < nobs; i++) {
		t = 0;
		for (j = 0; j < npar; j++)
			t += X(i, j) * B[j];
		Yhat[i] = t;
	}
}

// Assembly:
movslq 0xd0bb(%rip), %rax      # 0x14a44
testq %rax, %rax
jle 0x79f0
pushq %rbp
movq %rsp, %rbp
movl 0xd0b0(%rip), %ecx      # 0x14a48
movq 0xd139(%rip), %rdx      # 0x14ad8
movslq 0xd14a(%rip), %rsi      # 0x14af0
movq 0xd113(%rip), %rdi      # 0x14ac0
movq 0xd134(%rip), %r8       # 0x14ae8
shlq $0x3, %rsi
xorl %r9d, %r9d
xorpd %xmm0, %xmm0
testl %ecx, %ecx
jle 0x79de
xorl %r10d, %r10d
movsd (%rdx,%r10,8), %xmm1
mulsd (%rdi,%r10,8), %xmm1
addsd %xmm1, %xmm0
incq %r10
cmpq %r10, %rcx
jne 0x79c6
movsd %xmm0, (%r8,%r9,8)
incq %r9
addq %rsi, %rdx
cmpq %rax, %r9
jne 0x79bb
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_anova_compute_ss
void
proc_anova_compute_ss(void)
{
	int i;

	ssr = 0;
	sse = 0;

	for (i = 0; i < nobs; i++) {
		ssr += (Yhat[i] - ybar) * (Yhat[i] - ybar);
		sse += (Y[i] - Yhat[i]) * (Y[i] - Yhat[i]);
	}
}

// Assembly:
xorl %eax, %eax
movq %rax, 0xd076(%rip)      # 0x14a70
movq %rax, 0xd057(%rip)      # 0x14a58
movslq 0xd03c(%rip), %rax      # 0x14a44
testq %rax, %rax
jle 0x7a75
pushq %rbp
movq %rsp, %rbp
movsd 0xd03f(%rip), %xmm0     # 0x14a58
movsd 0xd04f(%rip), %xmm1     # 0x14a70
movq 0xd0c0(%rip), %rcx      # 0x14ae8
movsd 0xd078(%rip), %xmm2     # 0x14aa8
movq 0xd0a9(%rip), %rdx      # 0x14ae0
xorl %esi, %esi
movsd (%rcx,%rsi,8), %xmm3
subsd %xmm2, %xmm3
mulsd %xmm3, %xmm3
addsd %xmm3, %xmm1
movsd %xmm1, 0xd01e(%rip)     # 0x14a70
movsd (%rdx,%rsi,8), %xmm3
subsd (%rcx,%rsi,8), %xmm3
mulsd %xmm3, %xmm3
addsd %xmm3, %xmm0
movsd %xmm0, 0xcfec(%rip)     # 0x14a58
incq %rsi
cmpq %rsi, %rax
jne 0x7a39
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: qt
double
qt(double p, double df)
{
	int i;
	double a, t, t1, t2;
	if (isnan(p) || p < 0.0 || p > 1.0 || !isfinite(df) || df <= 0.0)
		return NAN;
	if (p == 0.0)
		return -INFINITY; // qt(0,1) == -Inf
	if (p == 1.0)
		return INFINITY; // qt(1,1) == Inf
	t1 = -1e5;
	t2 = 1e5;
	for (i = 0; i < 100; i++) {
		t = 0.5 * (t1 + t2);
		a = tdist(t, df);
		if (fabs(a - p) < 1e-9)
			break;
		if (a < p)
			t1 = t;
		else
			t2 = t;
	}
	return t;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %rbx
subq $0x38, %rsp
movapd %xmm0, %xmm2
xorpd %xmm0, %xmm0
ucomisd %xmm0, %xmm2
movsd 0x385d(%rip), %xmm3     # 0xb2f0
jb 0x7be9
ucomisd 0x3857(%rip), %xmm2     # 0xb2f8
ja 0x7be9
movq %xmm1, %rax
movq %rax, %rcx
btrq $0x3f, %rcx
leaq -0x1(%rcx), %rdx
movabsq $0xfffffffffffff, %rsi  # imm = 0xFFFFFFFFFFFFF
cmpq %rsi, %rdx
setb %dl
testq %rax, %rax
sets %al
andb %al, %dl
testq %rcx, %rcx
sete %sil
movabsq $0x7ff0000000000000, %rdi # imm = 0x7FF0000000000000
cmpq %rdi, %rcx
setg %dil
sete %r8b
orb %sil, %r8b
orb %dil, %r8b
orb %dl, %r8b
movabsq $-0x10000000000000, %rdx # imm = 0xFFF0000000000000
addq %rcx, %rdx
shrq $0x35, %rdx
cmpl $0x3ff, %edx            # imm = 0x3FF
setb %cl
andb %al, %cl
orb %r8b, %cl
jne 0x7be9
ucomisd %xmm0, %xmm2
jne 0x7b2f
jp 0x7b2f
movsd 0x382e(%rip), %xmm3     # 0xb358
jmp 0x7be9
ucomisd 0x37c1(%rip), %xmm2     # 0xb2f8
jne 0x7b48
jp 0x7b48
movsd 0x37e5(%rip), %xmm3     # 0xb328
jmp 0x7be9
movsd 0x3810(%rip), %xmm4     # 0xb360
movsd 0x3810(%rip), %xmm0     # 0xb368
movsd %xmm0, -0x10(%rbp)
movl $0x64, %ebx
movq %xmm1, -0x18(%rbp)
movsd %xmm2, -0x20(%rbp)
movapd %xmm4, -0x40(%rbp)
movapd %xmm4, %xmm0
addsd -0x10(%rbp), %xmm0
mulsd 0x37c6(%rip), %xmm0     # 0xb348
movapd %xmm0, -0x30(%rbp)
callq 0x7bf4
movsd -0x20(%rbp), %xmm2
movapd %xmm0, %xmm1
subsd %xmm2, %xmm1
andpd 0x372f(%rip), %xmm1     # 0xb2d0
movsd 0x37c7(%rip), %xmm3     # 0xb370
ucomisd %xmm1, %xmm3
ja 0x7be4
ucomisd %xmm0, %xmm2
movapd -0x30(%rbp), %xmm3
ja 0x7bbf
movsd %xmm3, -0x10(%rbp)
cmpltsd %xmm2, %xmm0
movapd %xmm0, %xmm1
andpd %xmm3, %xmm1
andnpd -0x40(%rbp), %xmm0
orpd %xmm1, %xmm0
movapd %xmm0, %xmm4
decl %ebx
movq -0x18(%rbp), %xmm1
jne 0x7b6c
jmp 0x7be9
movapd -0x30(%rbp), %xmm3
movapd %xmm3, %xmm0
addq $0x38, %rsp
popq %rbx
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: tdist
double
tdist(double t, double df)
{
	double x;
	if (isnan(t) || !isfinite(df) || df <= 0.0)
		return NAN;
	if (t == INFINITY)
		return 1.0; // pt(Inf,1) == 1
	if (t == -INFINITY)
		return 0.0; // pt(-Inf,1) == 0
	x = (t + sqrt(t * t + df)) / (2.0 * sqrt(t * t + df));
	return incbeta(df / 2.0, df / 2.0, x);
}

// Assembly:
movapd %xmm0, %xmm3
movsd 0x36f0(%rip), %xmm0     # 0xb2f0
ucomisd %xmm3, %xmm3
jp 0x7c9d
movq %xmm1, %rax
movq %rax, %rcx
btrq $0x3f, %rcx
leaq -0x1(%rcx), %rdx
movabsq $0xfffffffffffff, %rsi  # imm = 0xFFFFFFFFFFFFF
cmpq %rsi, %rdx
setb %dl
testq %rax, %rax
sets %al
andb %al, %dl
testq %rcx, %rcx
sete %sil
movabsq $0x7ff0000000000000, %rdi # imm = 0x7FF0000000000000
cmpq %rdi, %rcx
setg %dil
sete %r8b
orb %sil, %r8b
orb %dil, %r8b
orb %dl, %r8b
movabsq $-0x10000000000000, %rdx # imm = 0xFFF0000000000000
addq %rcx, %rdx
shrq $0x35, %rdx
cmpl $0x3ff, %edx            # imm = 0x3FF
setb %cl
andb %al, %cl
orb %r8b, %cl
jne 0x7c9d
ucomisd 0x36a7(%rip), %xmm3     # 0xb328
jb 0x7c8c
movsd 0x366d(%rip), %xmm0     # 0xb2f8
retq
xorps %xmm0, %xmm0
movsd 0x36c1(%rip), %xmm2     # 0xb358
ucomisd %xmm3, %xmm2
jb 0x7c9e
retq
pushq %rbp
movq %rsp, %rbp
subq $0x20, %rsp
movapd %xmm3, %xmm4
mulsd %xmm3, %xmm4
addsd %xmm1, %xmm4
xorps %xmm0, %xmm0
sqrtsd %xmm4, %xmm0
xorpd %xmm5, %xmm5
ucomisd %xmm5, %xmm4
movapd %xmm0, %xmm2
movsd %xmm1, -0x10(%rbp)
jae 0x7d00
movsd %xmm0, -0x20(%rbp)
movapd %xmm4, %xmm0
movsd %xmm3, -0x8(%rbp)
movsd %xmm4, -0x18(%rbp)
callq 0x2200
xorpd %xmm5, %xmm5
movsd -0x18(%rbp), %xmm4
movsd -0x8(%rbp), %xmm3
movsd -0x10(%rbp), %xmm1
movapd %xmm0, %xmm2
movsd -0x20(%rbp), %xmm0
addsd %xmm3, %xmm2
ucomisd %xmm5, %xmm4
jae 0x7d22
movapd %xmm4, %xmm0
movsd %xmm2, -0x8(%rbp)
callq 0x2200
movsd -0x8(%rbp), %xmm2
movsd -0x10(%rbp), %xmm1
addsd %xmm0, %xmm0
mulsd 0x361a(%rip), %xmm1     # 0xb348
divsd %xmm0, %xmm2
movapd %xmm1, %xmm0
addq $0x20, %rsp
popq %rbp
jmp 0x3c3d
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_means
void
proc_means(void)
{
	parse_proc_means_stmt();

	if (dataset == NULL)
		stop("No data set");

	parse_proc_means_body();

	print_title();

	run_proc_means();
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
callq 0x7d85
cmpq $0x0, 0xc177(%rip)      # 0x13ec8
je 0x7d63
callq 0x7e66
callq 0x4a74
popq %rbp
jmp 0x7ebc
callq 0xa74a
leaq 0x390d(%rip), %rdi      # 0xb67c
callq 0x4081
leaq 0xde65(%rip), %rdi      # 0x15be0
movl $0x1, %esi
callq 0x21b0
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: parse_proc_means_stmt
void
parse_proc_means_stmt(void)
{
	for (;;) {
		scan();
		keyword();
		switch (token) {
		case ';':
			scan(); // eat the semicolon
			return;
		case KALPHA:
			parse_alpha_option();
			break;
		case KDATA:
			parse_data_option();
			break;
		case KMAXDEC:
			parse_maxdec_option();
			break;
		case KCLM:
			if (nstats + 2 > MAXSTAT)
				stop("Too many statistics keywords");
			stats[nstats++] = KCLM1;
			stats[nstats++] = KCLM2;
			break;
		case KLCLM:
		case KMAX:
		case KMEAN:
		case KMIN:
		case KN:
		case KSUM:
		case KSTD:
		case KSTDDEV:
		case KSTDERR:
		case KSTDMEAN:
		case KUCLM:
		case KVAR:
			if (nstats == MAXSTAT)
				stop("Too many statistics keywords");
			stats[nstats++] = token;
			break;
		default:
			expected("proc means option");
		}
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %rbx
pushq %rax
leaq 0xda0a(%rip), %rbx      # 0x157a0
leaq 0x32f3(%rip), %r14      # 0xb090
movabsq $0x13400000133, %r15    # imm = 0x13400000133
callq 0x2b84
callq 0x2593
movl 0x7add(%rip), %eax      # 0xf894
leal -0x12d(%rax), %ecx
cmpl $0x22, %ecx
ja 0x7de6
movslq (%r14,%rcx,4), %rcx
addq %r14, %rcx
jmpq *%rcx
movslq 0xd9be(%rip), %rcx      # 0x15790
cmpq $0xc, %rcx
je 0x7e38
leal 0x1(%rcx), %edx
movl %edx, 0xd9af(%rip)      # 0x15790
movl %eax, (%rbx,%rcx,4)
jmp 0x7da7
leal -0x156(%rax), %ecx
cmpl $0x2, %ecx
jb 0x7dcb
jmp 0x7e24
callq 0x43f2
jmp 0x7da7
movslq 0xd98f(%rip), %rax      # 0x15790
cmpq $0xb, %rax
jge 0x7e38
movq %r15, (%rbx,%rax,4)
addl $0x2, %eax
movl %eax, 0xd97c(%rip)      # 0x15790
jmp 0x7da7
callq 0x4392
jmp 0x7da7
callq 0x4321
jmp 0x7da7
cmpl $0x3b, %eax
jne 0x7e5a
addq $0x8, %rsp
popq %rbx
popq %r14
popq %r15
popq %rbp
jmp 0x2b84
callq 0xa74a
leaq 0x3b2d(%rip), %rdi      # 0xb971
callq 0x4081
leaq 0xdd90(%rip), %rdi      # 0x15be0
movl $0x1, %esi
callq 0x21b0
leaq 0x3b2d(%rip), %rdi      # 0xb98e
callq 0x25f2
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: parse_proc_means_body
void
parse_proc_means_body(void)
{
	for (;;) {
		keyword();
		switch (token) {
		case 0:
		case KDATA:
		case KPROC:
		case KRUN:
			return;
		case KCLASS:
			parse_class_stmt();
			break;
		case KVAR:
			parse_var_stmt();
			break;
		default:
			parse_default();
			break;
		}
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
callq 0x2593
movl 0x7a1f(%rip), %eax      # 0xf894
cmpl $0x146, %eax            # imm = 0x146
jg 0x7e8a
cmpl $0x131, %eax            # imm = 0x131
jne 0x7e98
callq 0x4571
jmp 0x7e6a
cmpl $0x157, %eax            # imm = 0x157
jne 0x7ea5
callq 0x467b
jmp 0x7e6a
testl %eax, %eax
je 0x7eba
cmpl $0x135, %eax            # imm = 0x135
jne 0x7eb3
jmp 0x7eba
cmpl $0x14a, %eax            # imm = 0x14A
je 0x7eba
cmpl $0x147, %eax            # imm = 0x147
je 0x7eba
callq 0x2ac5
jmp 0x7e6a
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: f
void
f(int k)
{
	int i, n, varnum;

	if (k == nclass) {
		g();
		return;
	}

	varnum = class[k];

	// number of levels

	n = dataset->spec[varnum].num_levels;

	// for each level...

	for (i = 0; i < n; i++) {
		filtertab[k] = i;
		f(k + 1);
	}
}

// Assembly:
cmpl %edi, 0xbf7d(%rip)      # 0x14220
je 0x830b
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
movl %edi, %ebx
movslq %edi, %r14
leaq 0xbdcd(%rip), %rax      # 0x14090
movslq (%rax,%r14,4), %rax
movq 0xbbfa(%rip), %rcx      # 0x13ec8
leaq (%rax,%rax,4), %rax
movl 0x2c(%rcx,%rax,8), %r15d
testl %r15d, %r15d
jle 0x82fc
incl %ebx
xorl %r12d, %r12d
leaq 0xd588(%rip), %r13      # 0x15870
movl %r12d, (%r13,%r14,4)
movl %ebx, %edi
callq 0x829d
incl %r12d
cmpl %r12d, %r15d
jne 0x82e8
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: g
void
g(void)
{
	int i, j, level, varnum;

	// for each numeric variable...

	for (i = 0; i < nvar; i++) {

		// level names

		if (i == 0)
			for (j = 0; j < nclass; j++) {
				varnum = class[j];
				level = filtertab[j];
				A(row, j) = strdup(dataset->spec[varnum].ltab[level]);
			}
		else
			for (j = 0; j < nclass; j++)
				A(row, j) = strdup("");

		varnum = var[i];

		// name of the variable

		A(row, nclass) = strdup(dataset->spec[varnum].name);

		h(varnum);

		row++;
	}
}

// Assembly:
cmpl $0x0, 0xc0ae(%rip)      # 0x143c0
jle 0x8455
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
pushq %rax
xorl %r15d, %r15d
leaq 0x31c3(%rip), %rbx      # 0xb4f3
movl 0xbee9(%rip), %r14d     # 0x14220
testq %r15, %r15
je 0x8374
testl %r14d, %r14d
jle 0x83de
movslq 0xd494(%rip), %rax      # 0x157e0
movslq 0xc79d(%rip), %r12      # 0x14af0
imulq %rax, %r12
movq %rbx, %rdi
callq 0x2210
movq 0xd472(%rip), %rcx      # 0x157d8
movq %rax, (%rcx,%r12,8)
incq %r12
decq %r14
jne 0x8357
jmp 0x83de
testl %r14d, %r14d
jle 0x83de
movslq 0xd460(%rip), %rax      # 0x157e0
movslq 0xc769(%rip), %r12      # 0x14af0
imulq %rax, %r12
shlq $0x3, %r12
shlq $0x2, %r14
xorl %r13d, %r13d
leaq 0xbcf3(%rip), %rax      # 0x14090
movslq (%r13,%rax), %rax
leaq 0xd4c7(%rip), %rcx      # 0x15870
movslq (%r13,%rcx), %rcx
movq 0xbb13(%rip), %rdx      # 0x13ec8
leaq (%rax,%rax,4), %rax
movq 0x30(%rdx,%rax,8), %rax
movq (%rax,%rcx,8), %rdi
callq 0x2210
movq 0xd40a(%rip), %rcx      # 0x157d8
addq %r12, %rcx
movq %rax, (%rcx,%r13,2)
addq $0x4, %r13
cmpq %r13, %r14
jne 0x8396
leaq 0xbe4b(%rip), %rax      # 0x14230
movslq (%rax,%r15,4), %r14
movq 0xbad8(%rip), %rax      # 0x13ec8
leaq (%r14,%r14,4), %rcx
movq 0x20(%rax,%rcx,8), %rdi
callq 0x2210
movslq 0xd3db(%rip), %rcx      # 0x157e0
movslq 0xc6e4(%rip), %rdx      # 0x14af0
imulq %rcx, %rdx
shlq $0x3, %rdx
addq 0xd3bd(%rip), %rdx      # 0x157d8
movslq 0xbdfe(%rip), %rcx      # 0x14220
movq %rax, (%rdx,%rcx,8)
movl %r14d, %edi
callq 0x8456
incl 0xd3ac(%rip)            # 0x157e0
incq %r15
movslq 0xbf82(%rip), %rax      # 0x143c0
cmpq %rax, %r15
jl 0x8330
addq $0x8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_print
void
proc_print(void)
{
	parse_proc_print_stmt();

	if (dataset == NULL)
		stop("No data set");

	parse_proc_print_body();

	run_proc_print();
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
callq 0x88ed
cmpq $0x0, 0xb60a(%rip)      # 0x13ec8
je 0x88cb
callq 0x8948
popq %rbp
jmp 0x8990
callq 0xa74a
leaq 0x2da5(%rip), %rdi      # 0xb67c
callq 0x4081
leaq 0xd2fd(%rip), %rdi      # 0x15be0
movl $0x1, %esi
callq 0x21b0
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: parse_proc_print_stmt
void
parse_proc_print_stmt(void)
{
	for (;;) {
		get_next_token();
		switch (token) {
		case ';':
			scan();
			return;
		case KDATA:
			parse_data_option();
			break;
		default:
			stop("';' expected");
		}
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
callq 0x2b84
cmpl $0x3e9, 0x6f94(%rip)    # imm = 0x3E9
jne 0x8907
callq 0x2593
movl 0x6f87(%rip), %eax      # 0xf894
cmpl $0x135, %eax            # imm = 0x135
jne 0x891b
callq 0x4392
jmp 0x88f1
cmpl $0x3b, %eax
jne 0x8926
popq %rbp
jmp 0x2b84
callq 0xa74a
leaq 0x2bd2(%rip), %rdi      # 0xb504
callq 0x4081
leaq 0xd2a2(%rip), %rdi      # 0x15be0
movl $0x1, %esi
callq 0x21b0
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: parse_proc_print_body
void
parse_proc_print_body(void)
{
	for (;;) {
		keyword();
		switch (token) {
		case 0:
		case KDATA:
		case KPROC:
		case KRUN:
			return;
		case KVAR:
			parse_var_stmt();
			break;
		default:
			parse_default();
			break;
		}
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
callq 0x2593
movl 0x6f3d(%rip), %eax      # 0xf894
cmpl $0x149, %eax            # imm = 0x149
jle 0x896c
cmpl $0x157, %eax            # imm = 0x157
jne 0x8980
callq 0x467b
jmp 0x894c
testl %eax, %eax
je 0x898e
cmpl $0x135, %eax            # imm = 0x135
je 0x898e
cmpl $0x147, %eax            # imm = 0x147
jne 0x8987
jmp 0x898e
cmpl $0x14a, %eax            # imm = 0x14A
je 0x898e
callq 0x2ac5
jmp 0x894c
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_reg
void
proc_reg(void)
{
	num_x = 0;
	num_y = 0;

	proc_reg_parse_stmt();

	if (dataset == NULL)
		stop("No data set");

	proc_reg_parse_body();

	proc_reg_regress();

	print_title();

	emit_line_center("Analysis of Variance");
	emit_line("");

	proc_reg_print_anova_table();
	proc_reg_print_diag_table();

	emit_line_center("Parameter Estimates");
	emit_line("");

	proc_reg_print_parameter_estimates();
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
xorl %eax, %eax
movl %eax, 0xcd79(%rip)      # 0x15a00
movl %eax, 0xcd77(%rip)      # 0x15a04
callq 0x8d09
cmpq $0x0, 0xb22e(%rip)      # 0x13ec8
je 0x8ce7
callq 0x8d50
callq 0x8d98
callq 0x4a74
leaq 0x2b93(%rip), %rdi      # 0xb845
callq 0x408b
movl $0xa, %edi
callq 0x2050
callq 0x912d
callq 0x9449
leaq 0x2d33(%rip), %rdi      # 0xba05
callq 0x408b
movl $0xa, %edi
callq 0x2050
popq %rbp
jmp 0x95eb
callq 0xa74a
leaq 0x2989(%rip), %rdi      # 0xb67c
callq 0x4081
leaq 0xcee1(%rip), %rdi      # 0x15be0
movl $0x1, %esi
callq 0x21b0
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_reg_parse_body
void
proc_reg_parse_body(void)
{
	for (;;) {
		keyword();
		switch (token) {
		case 0:
		case KDATA:
		case KPROC:
		case KRUN:
			return;
		case KMODEL:
			proc_reg_parse_model_stmt();
			break;
		default:
			parse_default();
			break;
		}
	}
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
callq 0x2593
movl 0x6b35(%rip), %eax      # 0xf894
cmpl $0x142, %eax            # imm = 0x142
jle 0x8d84
cmpl $0x143, %eax            # imm = 0x143
jne 0x8d74
callq 0x991b
jmp 0x8d54
cmpl $0x14a, %eax            # imm = 0x14A
je 0x8d96
cmpl $0x147, %eax            # imm = 0x147
jne 0x8d8f
jmp 0x8d96
testl %eax, %eax
je 0x8d96
cmpl $0x135, %eax            # imm = 0x135
je 0x8d96
callq 0x2ac5
jmp 0x8d54
popq %rbp
retq
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_reg_print_diag_table
void
proc_reg_print_diag_table(void)
{
	char *a[3][4], buf[100];

	a[0][0] = "Root MSE";
	a[1][0] = "Dependent Mean";
	a[2][0] = "Coeff Var";

	a[0][2] = "R-Square";
	a[1][2] = "Adj R-Sq";
	a[2][2] = "";

	snprintf(buf, sizeof buf, "%0.5f", rootmse);
	a[0][1] = strdup(buf);

	snprintf(buf, sizeof buf, "%0.5f", ybar);
	a[1][1] = strdup(buf);

	snprintf(buf, sizeof buf, "%0.5f", cv);
	a[2][1] = strdup(buf);

	snprintf(buf, sizeof buf, "%0.4f", rsquare);
	a[0][3] = strdup(buf);

	snprintf(buf, sizeof buf, "%0.4f", adjrsq);
	a[1][3] = strdup(buf);

	a[2][3] = "";

	buf[0] = 1; // left justify
	buf[1] = 0;
	buf[2] = 1;
	buf[3] = 0;

	print_table(&a[0][0], 3, 4, buf);

	free(a[0][1]);
	free(a[1][1]);
	free(a[2][1]);

	free(a[0][3]);
	free(a[1][3]);
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0xe8, %rsp
leaq 0x244f(%rip), %rax      # 0xb8b3
leaq -0xa0(%rbp), %rbx
movq %rax, (%rbx)
leaq 0x262d(%rip), %rax      # 0xbaa2
movq %rax, 0x20(%rbx)
leaq 0x2429(%rip), %rax      # 0xb8a9
movq %rax, 0x40(%rbx)
leaq 0x2415(%rip), %rax      # 0xb8a0
movq %rax, 0x10(%rbx)
leaq 0x261b(%rip), %rax      # 0xbab1
movq %rax, 0x30(%rbx)
leaq 0x2052(%rip), %rax      # 0xb4f3
movq %rax, 0x50(%rbx)
movsd 0xb5bb(%rip), %xmm0     # 0x14a68
leaq 0x1ee2(%rip), %r15      # 0xb396
leaq -0x110(%rbp), %r14
movl $0x64, %esi
movq %r14, %rdi
movq %r15, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, -0x38(%rbp)
movq %rax, 0x8(%rbx)
movsd 0xb5c3(%rip), %xmm0     # 0x14aa8
movl $0x64, %esi
movq %r14, %rdi
movq %r15, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, -0x30(%rbp)
movq %rax, 0x28(%rbx)
movsd 0xb5a1(%rip), %xmm0     # 0x14ab0
movl $0x64, %esi
movq %r14, %rdi
movq %r15, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, %r13
movq %rax, 0x48(%rbx)
movsd 0xb560(%rip), %xmm0     # 0x14a98
leaq 0x1e51(%rip), %r12      # 0xb390
movl $0x64, %esi
movq %r14, %rdi
movq %r12, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, %r15
movq %rax, 0x18(%rbx)
movsd 0xb538(%rip), %xmm0     # 0x14aa0
movl $0x64, %esi
movq %r14, %rdi
movq %r12, %rdx
movb $0x1, %al
callq 0x20e0
movq %r14, %rdi
callq 0x2210
movq %rax, %r12
movq %rax, 0x38(%rbx)
leaq 0x1f63(%rip), %rax      # 0xb4f3
movq %rax, 0x58(%rbx)
movl $0x10001, (%r14)        # imm = 0x10001
movq %rbx, %rdi
movl $0x3, %esi
movl $0x4, %edx
movq %r14, %rcx
callq 0x47e3
movq -0x38(%rbp), %rdi
callq 0x2040
movq -0x30(%rbp), %rdi
callq 0x2040
movq %r13, %rdi
callq 0x2040
movq %r15, %rdi
callq 0x2040
movq %r12, %rdi
addq $0xe8, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x2040
// File: /workspace/github_c_makefile_star2_O1/georgeweigt[P]sassafras/sassafras.c
// Function: proc_reg_compute_X
void
proc_reg_compute_X(void)
{
	int i, j, k, l, m, n, x, y;
	double v;

	l = 0;

	for (i = 0; i < nrow; i++) {

		// check for missing data

		y = ytab[0];

		v = dataset->spec[y].v[i];

		if (isnan(v))
			continue;

		Y[l] = v;

		if (noint)
			m = 0;
		else {
			m = 1;
			X(l, 0) = 1;
		}

		for (j = 0; j < num_x; j++) {

			x = xtab[j];

			v = dataset->spec[x].v[i];

			if (isnan(v))
				break;

			if (dataset->spec[x].ltab == NULL)
				X(l, m++) = v;
			else {

				// categorical variable

				n = dataset->spec[x].num_levels;

				for (k = 0; k < n; k++)
					if (k == v)
						X(l, m + k) = 1;
					else
						X(l, m + k) = 0;

				m += n;
			}
		}

		if (j == num_x)
			l++; // full row, no nans
	}

	// missing data may reduce nrow

	nrow = l;
}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
movslq 0xbca3(%rip), %rax      # 0x157d0
testq %rax, %rax
jle 0x9c9d
movslq 0xbed3(%rip), %rdx      # 0x15a10
movq 0xa384(%rip), %rcx      # 0x13ec8
leaq (%rdx,%rdx,4), %rdx
movq 0x40(%rcx,%rdx,8), %rdx
movq %rdx, -0x48(%rbp)
addq $0x20, %rcx
movq 0xaf84(%rip), %rdx      # 0x14ae0
movq %rdx, -0x40(%rbp)
movl 0xbea2(%rip), %edx      # 0x15a08
movl %edx, -0x2c(%rbp)
movq 0xaf68(%rip), %rdx      # 0x14ad8
movq %rdx, -0x38(%rbp)
movl 0xaf75(%rip), %r9d      # 0x14af0
movl 0xbe7e(%rip), %r10d     # 0x15a00
xorl %r11d, %r11d
leaq 0xab94(%rip), %r15      # 0x14720
movsd 0x1764(%rip), %xmm0     # 0xb2f8
xorl %ebx, %ebx
movq -0x48(%rbp), %rdx
movsd (%rdx,%r11,8), %xmm1
ucomisd %xmm1, %xmm1
jp 0x9c8f
xorl %r12d, %r12d
movslq %ebx, %rdx
movq -0x40(%rbp), %rsi
movsd %xmm1, (%rsi,%rdx,8)
movl $0x0, %r13d
cmpl $0x0, -0x2c(%rbp)
jne 0x9be6
movl %r9d, %edx
imull %ebx, %edx
movslq %edx, %rdx
movq -0x38(%rbp), %rsi
movabsq $0x3ff0000000000000, %rdi # imm = 0x3FF0000000000000
movq %rdi, (%rsi,%rdx,8)
movl $0x1, %r13d
testl %r10d, %r10d
jle 0x9c85
movl %r9d, %edx
imull %ebx, %edx
movslq %edx, %r14
shlq $0x3, %r14
movq 0xaed5(%rip), %r8       # 0x14ad8
addq %r14, %r8
xorl %r12d, %r12d
movslq (%r15,%r12,4), %rdx
leaq (%rdx,%rdx,4), %rdx
movq 0x20(%rcx,%rdx,8), %rsi
movsd (%rsi,%r11,8), %xmm1
ucomisd %xmm1, %xmm1
jp 0x9c85
leaq (%rcx,%rdx,8), %rdx
cmpq $0x0, 0x10(%rdx)
je 0x9c6e
movslq 0xc(%rdx), %rdx
testq %rdx, %rdx
jle 0x9c66
movq 0xae9b(%rip), %rsi      # 0x14ad8
addq %r14, %rsi
movslq %r13d, %rdi
leaq (%rsi,%rdi,8), %rsi
xorl %edi, %edi
xorps %xmm2, %xmm2
cvtsi2sd %edi, %xmm2
cmpeqsd %xmm1, %xmm2
andpd %xmm0, %xmm2
movlpd %xmm2, (%rsi,%rdi,8)
incq %rdi
cmpq %rdi, %rdx
jne 0x9c49
addl %r13d, %edx
movl %edx, %r13d
jmp 0x9c7a
movslq %r13d, %rdx
incl %r13d
movsd %xmm1, (%r8,%rdx,8)
incq %r12
cmpq %r10, %r12
jne 0x9c09
movl %r10d, %r12d
xorl %edx, %edx
cmpl %r10d, %r12d
sete %dl
addl %edx, %ebx
incq %r11
cmpq %rax, %r11
jne 0x9b96
jmp 0x9c9f
xorl %ebx, %ebx
movl %ebx, 0xbb2b(%rip)      # 0x157d0
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq