// File: /workspace/github_cpp_makefile_star2_O1/myudelson[P]hmm-scalable/HMMProblemPiGK.cpp
// Function: HMMProblemPiGK::toFile(char const*)
void HMMProblemPiGK::toFile(const char *filename) {
	FILE *fid = fopen(filename,"w");
	if(fid == NULL) {
		fprintf(stderr,"Can't write output model file %s\n",filename);
		exit(1);
	}
    
    // write solved id
    writeSolverInfo(fid, this->p);
    
	fprintf(fid,"Null skill ratios\t");
	for(NPAR m=0; m<this->p->nO; m++)
		fprintf(fid," %12.10f%s",this->null_obs_ratio[m],(m==(this->p->nO-1))?"\n":"\t");
	NCAT k, g;
    NPAR i,j,m;
	std::map<NCAT,std::string>::iterator it;
	for(g=0;g<this->p->nG; g++) {
		it = this->p->map_group_bwd->find(g);
		fprintf(fid,"%d\t%s\n",g,it->second.c_str());
		fprintf(fid,"PIg\t");
		for(i=0; i<this->p->nS; i++)
			fprintf(fid,"%12.10f%s",this->PIg[g][i],(i==(this->p->nS-1))?"\n":"\t");
    }
	for(k=0;k<this->p->nK;k++) {
		it = this->p->map_skill_bwd->find(k);
		fprintf(fid,"%d\t%s\n",k,it->second.c_str());
		fprintf(fid,"PIk\t");
		for(i=0; i<this->p->nS; i++)
			fprintf(fid,"%12.10f%s",this->pi[k][i],(i==(this->p->nS-1))?"\n":"\t");
		fprintf(fid,"A\t");
		for(i=0; i<this->p->nS; i++)
			for(j=0; j<this->p->nS; j++)
				fprintf(fid,"%12.10f%s",this->A[k][i][j],(i==(this->p->nS-1) && j==(this->p->nS-1))?"\n":"\t");
		fprintf(fid,"B\t");
		for(i=0; i<this->p->nS; i++)
			for(m=0; m<this->p->nO; m++)
				fprintf(fid,"%12.10f%s",this->B[k][i][m],(i==(this->p->nS-1) && m==(this->p->nO-1))?"\n":"\t");
	}
	fclose(fid);
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x28, %rsp
movq %rsi, %r15
movq %rdi, %rbx
leaq 0x1af7f(%rip), %rsi     # 0x354b6
movq %r15, %rdi
callq 0x4290
testq %rax, %rax
je 0x1aa31
movq %rax, %r14
movq 0x88(%rbx), %rsi
movq %rax, %rdi
callq 0xa118
leaq 0x1af79(%rip), %rdi     # 0x354da
movl $0x12, %esi
movl $0x1, %edx
movq %r14, 0x8(%rsp)
movq %r14, %rcx
callq 0x4480
movq 0x88(%rbx), %rax
movb 0x8b9(%rax), %al
leaq 0x19cd1(%rip), %r13     # 0x3425d
leaq 0x1b613(%rip), %r14     # 0x35ba6
testb %al, %al
jle 0x1a5e1
xorl %r15d, %r15d
leaq 0x1b2ed(%rip), %r12     # 0x3588e
movsbl %al, %eax
decl %eax
movq %r13, %rdx
cmpl %eax, %r15d
je 0x1a5b1
movq %r14, %rdx
movq 0x18(%rbx), %rax
movsd (%rax,%r15,8), %xmm0
movq 0x8(%rsp), %rdi
movq %r12, %rsi
movb $0x1, %al
callq 0x4330
incq %r15
movq 0x88(%rbx), %rax
movsbq 0x8b9(%rax), %rax
cmpq %rax, %r15
jl 0x1a5a1
movq 0x88(%rbx), %rax
cmpl $0x0, 0x8bc(%rax)
movq %rbx, 0x10(%rsp)
jle 0x1a71c
xorl %r12d, %r12d
movq 0x928(%rax), %rax
movq 0x10(%rax), %rdx
addq $0x8, %rax
movq %rax, %rcx
testq %rdx, %rdx
je 0x1a632
movq %rax, %rcx
movslq 0x20(%rdx), %rsi
xorl %edi, %edi
cmpq %rsi, %r12
setg %dil
cmovleq %rdx, %rcx
movq 0x10(%rdx,%rdi,8), %rdx
testq %rdx, %rdx
jne 0x1a617
cmpq %rax, %rcx
movq 0x8(%rsp), %r13
je 0x1a647
movslq 0x20(%rcx), %rdx
cmpq %rdx, %r12
cmovgeq %rcx, %rax
movq 0x28(%rax), %rcx
movq %r13, %rdi
leaq 0x1aea2(%rip), %rsi     # 0x354f7
movl %r12d, %edx
xorl %eax, %eax
callq 0x4330
movl $0x4, %esi
movl $0x1, %edx
leaq 0x1b229(%rip), %rdi     # 0x35899
movq %r13, %rcx
callq 0x4480
movq 0x88(%rbx), %rax
movb 0x8b8(%rax), %al
testb %al, %al
movq %rbx, %rdi
leaq 0x1b515(%rip), %rdx     # 0x35ba6
leaq 0x1b1f7(%rip), %rsi     # 0x3588f
leaq 0x19bbe(%rip), %r14     # 0x3425d
jle 0x1a6fc
movq %r13, %rbx
xorl %r15d, %r15d
movsbl %al, %eax
movq 0x90(%rdi), %rcx
movq (%rcx,%r12,8), %rcx
movsd (%rcx,%r15,8), %xmm0
decl %eax
cmpl %eax, %r15d
movq %rdx, %rbp
cmoveq %r14, %rdx
movq %rbx, %rdi
movb $0x1, %al
movq %r12, %r13
movq %rsi, %r12
callq 0x4330
movq 0x10(%rsp), %rdi
movq %r12, %rsi
movq %r13, %r12
movq %rbp, %rdx
incq %r15
movq 0x88(%rdi), %rax
movsbq 0x8b8(%rax), %rax
cmpq %rax, %r15
jl 0x1a6a7
incq %r12
movq 0x88(%rdi), %rax
movslq 0x8bc(%rax), %rcx
cmpq %rcx, %r12
movq %r14, %r13
movq %rdi, %rbx
jl 0x1a5fd
movq 0x88(%rbx), %rax
cmpl $0x0, 0x8c0(%rax)
jle 0x1aa19
leaq 0x1b158(%rip), %r14     # 0x3588f
xorl %edx, %edx
movq %r13, %r15
movq 0x948(%rax), %rax
movq 0x10(%rax), %r8
addq $0x8, %rax
movq %rax, %rcx
testq %r8, %r8
movq 0x8(%rsp), %r13
je 0x1a776
movq %rax, %rcx
movslq 0x20(%r8), %rsi
xorl %edi, %edi
cmpq %rsi, %rdx
setg %dil
cmovleq %r8, %rcx
movq 0x10(%r8,%rdi,8), %r8
testq %r8, %r8
jne 0x1a75b
cmpq %rax, %rcx
leaq 0x1b426(%rip), %r12     # 0x35ba6
je 0x1a78d
movslq 0x20(%rcx), %rsi
cmpq %rsi, %rdx
cmovgeq %rcx, %rax
movq 0x28(%rax), %rcx
movq %r13, %rdi
leaq 0x1ad5c(%rip), %rsi     # 0x354f7
xorl %eax, %eax
movq %rdx, 0x18(%rsp)
callq 0x4330
movl $0x4, %esi
movl $0x1, %edx
leaq 0x1b0e6(%rip), %rdi     # 0x3589e
movq %r13, %rcx
callq 0x4480
movq 0x88(%rbx), %rax
movb 0x8b8(%rax), %al
testb %al, %al
jle 0x1a81d
movq %r15, %rbp
xorl %r15d, %r15d
movsbl %al, %eax
movq 0x38(%rbx), %rcx
movq 0x18(%rsp), %rdx
movq (%rcx,%rdx,8), %rcx
movsd (%rcx,%r15,8), %xmm0
decl %eax
cmpl %eax, %r15d
movq %r12, %rdx
cmoveq %rbp, %rdx
movq %r13, %rdi
movq %r14, %rsi
movb $0x1, %al
callq 0x4330
incq %r15
movq 0x88(%rbx), %rax
movsbq 0x8b8(%rax), %rax
cmpq %rax, %r15
jl 0x1a7d7
movl $0x2, %esi
movl $0x1, %edx
leaq 0x1acd4(%rip), %rdi     # 0x35502
movq %r13, %rcx
callq 0x4480
movq 0x88(%rbx), %rax
cmpb $0x0, 0x8b8(%rax)
jle 0x1a8ff
xorl %edi, %edi
movq 0x88(%rbx), %rax
movb 0x8b8(%rax), %al
testb %al, %al
leaq 0x199fb(%rip), %r12     # 0x3425d
leaq 0x1b33d(%rip), %rdx     # 0x35ba6
movq 0x8(%rsp), %r13
leaq 0x1b01a(%rip), %r15     # 0x3588f
movq %rbx, %rcx
movq 0x18(%rsp), %rbx
jle 0x1a8e1
xorl %ebp, %ebp
movq %rdi, 0x20(%rsp)
movsbl %al, %eax
movq 0x10(%rsp), %rcx
movq 0x40(%rcx), %rcx
movq (%rcx,%rbx,8), %rcx
movq (%rcx,%rdi,8), %rcx
movsd (%rcx,%rbp,8), %xmm0
decl %eax
movl %ebp, %ecx
xorl %eax, %ecx
xorl %edi, %eax
orl %ecx, %eax
movq %rdx, %r14
cmoveq %r12, %rdx
movq %r13, %rdi
movq %r15, %rsi
movb $0x1, %al
callq 0x4330
movq 0x10(%rsp), %rcx
movq 0x20(%rsp), %rdi
movq %r14, %rdx
incq %rbp
movq 0x88(%rcx), %rax
movsbq 0x8b8(%rax), %rax
cmpq %rax, %rbp
jl 0x1a886
incq %rdi
movq 0x88(%rcx), %rax
movsbq 0x8b8(%rax), %rax
cmpq %rax, %rdi
movq %rcx, %rbx
jl 0x1a84c
movl $0x2, %esi
movl $0x1, %edx
leaq 0x1abf5(%rip), %rdi     # 0x35505
movq 0x8(%rsp), %rcx
callq 0x4480
movq 0x88(%rbx), %rax
cmpb $0x0, 0x8b8(%rax)
jle 0x1a9ec
xorl %r9d, %r9d
movq 0x88(%rbx), %rax
movb 0x8b9(%rax), %cl
testb %cl, %cl
leaq 0x19916(%rip), %r13     # 0x3425d
leaq 0x1b258(%rip), %r14     # 0x35ba6
movq 0x8(%rsp), %r12
movq 0x18(%rsp), %r15
movq %rbx, %rdx
leaq 0x1af2d(%rip), %rbx     # 0x3588f
jle 0x1a9ce
xorl %ebp, %ebp
movsbl %cl, %ecx
movq 0x10(%rsp), %rdx
movq 0x48(%rdx), %rdx
movq (%rdx,%r15,8), %rdx
movq (%rdx,%r9,8), %rdx
movsd (%rdx,%rbp,8), %xmm0
movsbl 0x8b8(%rax), %eax
decl %eax
xorl %r9d, %eax
decl %ecx
xorl %ebp, %ecx
orl %eax, %ecx
movq %r14, %rdx
cmoveq %r13, %rdx
movq %r12, %rdi
movq %rbx, %rsi
movb $0x1, %al
movq %r9, %r13
callq 0x4330
movq 0x10(%rsp), %rdx
movq %r13, %r9
leaq 0x198a6(%rip), %r13     # 0x3425d
incq %rbp
movq 0x88(%rdx), %rax
movsbq 0x8b9(%rax), %rcx
cmpq %rcx, %rbp
jl 0x1a966
incq %r9
movq 0x88(%rdx), %rax
movsbq 0x8b8(%rax), %rax
cmpq %rax, %r9
movq %rdx, %rbx
jl 0x1a931
movq 0x18(%rsp), %rdx
incq %rdx
movq 0x88(%rbx), %rax
movslq 0x8c0(%rax), %rcx
cmpq %rcx, %rdx
leaq 0x19851(%rip), %r13     # 0x3425d
leaq 0x1ae7c(%rip), %r14     # 0x3588f
jl 0x1a739
movq 0x8(%rsp), %rdi
addq $0x28, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
jmp 0x4200
movq %r15, %rdi
callq 0x4dd2
nop