// File: /workspace/github_cpp_makefile_star2_O2/srajangarg[P]raytracer/src/core/mathexpr.cpp
// Function: BCDouble(void (**&)(double*&), void (**)(double*&), void (**)(double*&), double**&, double**, double**, double*&, double*, double*, RFunction**&, RFunction**, RFunction**, void (*)(double*&))
void BCDouble(pfoncld*&pf,pfoncld*pf1,pfoncld*pf2,
	      double**&pv,double**pv1,double**pv2,
	      double*&pp,double*pp1,double*pp2,
	      RFunction**&prf,RFunction**prf1,RFunction**prf2,
	      pfoncld f)
{
  pfoncld*pf3,*pf4=pf1;long n1,n2;
  for(n1=0;*pf4!=NULL;pf4++,n1++){};for(n2=0,pf4=pf2;*pf4!=NULL;pf4++,n2++){};
  pf=new pfoncld[n1+n2+2];
  for(pf3=pf,pf4=pf1;*pf4!=NULL;pf3++,pf4++)*pf3=*pf4;
  for(pf4=pf2;*pf4!=NULL;pf3++,pf4++)*pf3=*pf4;
  *pf3++=f;*pf3=NULL;//delete[]pf1,pf2;
  double**pv3,**pv4=pv1;
  for(n1=0;*pv4!=NULL;pv4++,n1++){};for(n2=0,pv4=pv2;*pv4!=NULL;pv4++,n2++){};
  pv=new double*[n1+n2+1];
  for(pv3=pv,pv4=pv1;*pv4!=NULL;pv3++,pv4++)*pv3=*pv4;
  for(pv4=pv2;*pv4!=NULL;pv3++,pv4++)*pv3=*pv4;
  *pv3=NULL;//delete[]pv1,pv2;
  double*pp3,*pp4=pp1;
  for(n1=0;*pp4!=ErrVal;pp4++,n1++){};for(n2=0,pp4=pp2;*pp4!=ErrVal;pp4++,n2++){};
  pp=new double[n1+n2+1];  // Really need to add and not to take max(n1,n2) in case of Juxt operator
  for(pp3=pp,pp4=pp1;*pp4!=ErrVal;pp3++,pp4++)*pp3=0;
  for(pp4=pp2;*pp4!=ErrVal;pp3++,pp4++)*pp3=0;
  *pp3=ErrVal;//delete[]pp1,pp2;
  PRFunction*prf3,*prf4=prf1;
  for(n1=0;*prf4!=NULL;prf4++,n1++){};for(n2=0,prf4=prf2;*prf4!=NULL;prf4++,n2++){};
  prf=new PRFunction[n1+n2+1];
  for(prf3=prf,prf4=prf1;*prf4!=NULL;prf3++,prf4++)*prf3=*prf4;
  for(prf4=prf2;*prf4!=NULL;prf3++,prf4++)*prf3=*prf4;
  *prf3=NULL;//delete[]prf1,prf2;
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x18, %rsp
movq %r9, %rbx
movq %r8, %r14
movq %rcx, 0x10(%rsp)
movq %rdx, %r12
movq %rsi, %r13
movq %rdi, 0x8(%rsp)
pushq $0x10
popq %rdi
movq 0x70(%rsp), %rbp
movq 0x58(%rsp), %r15
xorl %eax, %eax
cmpq $0x0, -0x10(%r13,%rdi)
je 0x11a2c
incq %rax
addq $0x8, %rdi
jmp 0x11a1b
xorl %ecx, %ecx
cmpq $0x0, (%r12,%rcx,8)
je 0x11a3e
incq %rcx
addq $0x8, %rdi
jmp 0x11a2e
movabsq $0x1ffffffffffffffe, %rdx # imm = 0x1FFFFFFFFFFFFFFE
addq %rcx, %rax
leaq -0x1(%rdx), %rcx
cmpq %rcx, %rax
pushq $-0x1
popq %rax
cmovaq %rax, %rdi
callq 0x4040
movq 0x8(%rsp), %rcx
movq %rax, (%rcx)
movq (%r13), %rcx
testq %rcx, %rcx
je 0x11a7c
movq %rcx, (%rax)
addq $0x8, %rax
addq $0x8, %r13
jmp 0x11a66
xorl %ecx, %ecx
pushq $-0x1
popq %r13
movq (%r12,%rcx), %rdx
testq %rdx, %rdx
je 0x11a95
movq %rdx, (%rax,%rcx)
addq $0x8, %rcx
jmp 0x11a82
movq 0x80(%rsp), %rdx
movq %rdx, (%rax,%rcx)
andq $0x0, 0x8(%rax,%rcx)
pushq $0x8
popq %rdi
xorl %eax, %eax
movq %r14, %rcx
movabsq $0x1ffffffffffffffe, %r12 # imm = 0x1FFFFFFFFFFFFFFE
cmpq $0x0, (%rcx)
je 0x11acc
addq $0x8, %rcx
incq %rax
addq $0x8, %rdi
jmp 0x11ab9
xorl %ecx, %ecx
cmpq $0x0, (%rbx,%rcx,8)
je 0x11ade
incq %rcx
addq $0x8, %rdi
jmp 0x11ace
addq %rcx, %rax
cmpq %r12, %rax
cmovaq %r13, %rdi
callq 0x4040
movq 0x10(%rsp), %rcx
movq %rax, (%rcx)
movq (%r14), %rcx
testq %rcx, %rcx
je 0x11b0a
movq %rcx, (%rax)
addq $0x8, %rax
addq $0x8, %r14
jmp 0x11af5
xorl %ecx, %ecx
movq 0x60(%rsp), %r14
movq (%rbx,%rcx), %rdx
testq %rdx, %rdx
je 0x11b24
movq %rdx, (%rax,%rcx)
addq $0x8, %rcx
jmp 0x11b11
andq $0x0, (%rax,%rcx)
pushq $0x8
popq %rdi
xorl %eax, %eax
movsd 0xfd9a(%rip), %xmm1     # 0x218d0
movq %r15, %rcx
movq 0x78(%rsp), %rbx
movsd (%rcx), %xmm0
ucomisd %xmm1, %xmm0
jne 0x11b4a
jnp 0x11b57
addq $0x8, %rcx
incq %rax
addq $0x8, %rdi
jmp 0x11b3e
xorl %ecx, %ecx
movsd (%r14,%rcx,8), %xmm0
ucomisd %xmm1, %xmm0
jne 0x11b67
jnp 0x11b70
incq %rcx
addq $0x8, %rdi
jmp 0x11b59
addq %rcx, %rax
cmpq %r12, %rax
cmovaq %r13, %rdi
callq 0x4040
movsd 0xfd49(%rip), %xmm1     # 0x218d0
movq 0x50(%rsp), %rcx
movq %rax, (%rcx)
movsd (%r15), %xmm0
ucomisd %xmm1, %xmm0
jne 0x11b9c
jnp 0x11baa
andq $0x0, (%rax)
addq $0x8, %rax
addq $0x8, %r15
jmp 0x11b8f
xorl %ecx, %ecx
movsd (%r14,%rcx), %xmm0
ucomisd %xmm1, %xmm0
jne 0x11bba
jnp 0x11bc5
andq $0x0, (%rax,%rcx)
addq $0x8, %rcx
jmp 0x11bac
movabsq $0x7fefffffffffffff, %rdx # imm = 0x7FEFFFFFFFFFFFFF
movq %rdx, (%rax,%rcx)
pushq $0x8
popq %rdi
xorl %eax, %eax
movq %rbp, %rcx
cmpq $0x0, (%rcx)
je 0x11bee
addq $0x8, %rcx
incq %rax
addq $0x8, %rdi
jmp 0x11bdb
xorl %ecx, %ecx
cmpq $0x0, (%rbx,%rcx,8)
je 0x11c00
incq %rcx
addq $0x8, %rdi
jmp 0x11bf0
addq %rcx, %rax
cmpq %r12, %rax
cmovaq %r13, %rdi
callq 0x4040
movq 0x68(%rsp), %rcx
movq %rax, (%rcx)
movq (%rbp), %rcx
testq %rcx, %rcx
je 0x11c2d
movq %rcx, (%rax)
addq $0x8, %rax
addq $0x8, %rbp
jmp 0x11c17
xorl %ecx, %ecx
movq (%rbx,%rcx), %rdx
testq %rdx, %rdx
je 0x11c42
movq %rdx, (%rax,%rcx)
addq $0x8, %rcx
jmp 0x11c2f
andq $0x0, (%rax,%rcx)
addq $0x18, %rsp
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq