// File: /workspace/github_cpp_makefile_star2_O1/dannycalegari[P]circle_pack/./Trigonometry_routine.cc
// Function: ROT(double)
Matrix ROT(double angle){	// rotation in xy-plane about origin
	// returns matrix C=cos(angle), S=sin(angle)
	// (C -S  0)
	// (S  C  0)
	// (0  0  1)
	Matrix M;
	M.e.clear();
	vector<double> row;
	row.clear();
	row.push_back(cos(angle));
	row.push_back(-sin(angle));
	row.push_back(0.0);
	M.e.push_back(row);
	row.clear();
	row.push_back(sin(angle));
	row.push_back(cos(angle));
	row.push_back(0.0);
	M.e.push_back(row);
	row.clear();
	row.push_back(0.0);
	row.push_back(0.0);
	row.push_back(1.0);
	M.e.push_back(row);
	return(M);
}

// Assembly:
pushq %r14
pushq %rbx
subq $0x38, %rsp
movsd %xmm0, 0x30(%rsp)
movq %rdi, %rbx
xorl %r14d, %r14d
movq %r14, 0x10(%rdi)
xorps %xmm0, %xmm0
movups %xmm0, (%rdi)
xorl %esi, %esi
callq 0x9c0c
xorps %xmm0, %xmm0
movaps %xmm0, 0x10(%rsp)
movq %r14, 0x20(%rsp)
cmpq %r14, 0x18(%rsp)
je 0x28d5
movq $0x0, 0x18(%rsp)
movsd 0x30(%rsp), %xmm0
callq 0x23d0
movsd %xmm0, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x2901
movsd %xmm0, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x2910
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
movsd 0x30(%rsp), %xmm0
callq 0x2060
xorps 0x879e(%rip), %xmm0     # 0xb0c0
movlps %xmm0, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x2942
movsd %xmm0, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x2951
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
movq $0x0, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x2978
movq $0x0, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x2987
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
leaq 0x10(%rsp), %rsi
movq %rbx, %rdi
callq 0x9130
movq 0x10(%rsp), %rax
cmpq %rax, 0x18(%rsp)
je 0x29a5
movq %rax, 0x18(%rsp)
movsd 0x30(%rsp), %xmm0
callq 0x2060
movsd %xmm0, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x29d1
movsd %xmm0, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x29e0
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
movsd 0x30(%rsp), %xmm0
callq 0x23d0
movsd %xmm0, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x2a0c
movsd %xmm0, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x2a1b
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
movq $0x0, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x2a42
movq $0x0, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x2a51
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
leaq 0x10(%rsp), %rsi
movq %rbx, %rdi
callq 0x9130
movq 0x10(%rsp), %rax
cmpq %rax, 0x18(%rsp)
je 0x2a6f
movq %rax, 0x18(%rsp)
movq $0x0, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x2a96
movq $0x0, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x2aa5
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
movq $0x0, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x2acc
movq $0x0, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x2adb
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
movabsq $0x3ff0000000000000, %rax # imm = 0x3FF0000000000000
movq %rax, 0x8(%rsp)
movq 0x18(%rsp), %rsi
cmpq 0x20(%rsp), %rsi
je 0x2b04
movq %rax, (%rsi)
addq $0x8, %rsi
movq %rsi, 0x18(%rsp)
jmp 0x2b13
leaq 0x10(%rsp), %rdi
leaq 0x8(%rsp), %rdx
callq 0x982a
leaq 0x10(%rsp), %rsi
movq %rbx, %rdi
callq 0x9130
movq 0x10(%rsp), %rdi
testq %rdi, %rdi
je 0x2b37
movq 0x20(%rsp), %rsi
subq %rdi, %rsi
callq 0x21f0
movq %rbx, %rax
addq $0x38, %rsp
popq %rbx
popq %r14
retq
jmp 0x2b54
jmp 0x2b54
jmp 0x2b54
jmp 0x2b54
jmp 0x2b54
jmp 0x2b54
jmp 0x2b54
jmp 0x2b54
jmp 0x2b54
movq %rax, %r14
movq 0x10(%rsp), %rdi
testq %rdi, %rdi
je 0x2b6e
movq 0x20(%rsp), %rsi
subq %rdi, %rsi
callq 0x21f0
movq %rbx, %rdi
callq 0x9496
movq %r14, %rdi
callq 0x23b0