// File: /workspace/github_cpp_makefile_star2_O3/carlos-urena[P]svg-gen/figures.cpp
// Function: Figure6_SuplPara::Figure6_SuplPara()
Figure6_SuplPara::Figure6_SuplPara()
{
  vec3 observador = vec3(-0.6,0.5,1.0),
       lookat     = vec3(0.0,0.0,0.0),
       vup        = vec3(0.0,1.0,0.0);

  cam = Camera( lookat, observador, vup );

  // longitud de los ejes menor (bt) y mayor (at) de la elipse tangente (bt<=at)
  // (bt en el eje X, y at en el eje Y)
  constexpr real bt = 0.7, at = 1.3 ;
  constexpr real bt2 = bt*bt, at2 = at*at ;

  // elipse plana tangente (perp. al eje Z, con eje mayor Y y eje menor X)
  const vec3 org  = vec3(0.0,0.0,0.0),
             ejex = vec3(1.0,0.0,0.0),
             ejey = vec3(0.0,1.0,0.0),
             ejez = vec3(0.0,0.0,1.0);

  const int nump = 256 ;
  const real lonx = 0.8 , lony = 3.0 ;

  // color de la elipse tangente
  vec3 colEllTan = vec3( 0.0,0.6,0.0 );

  Sphere *           pEsfera      = new Sphere( vec3(0.0,0.0,0.0), 1.0 );
  Ellipse *          pEllipseTan  = new Ellipse( nump, ejez, bt*ejex, at*ejey );
  SpherePolygon *    pEllipseEsf  = new SpherePolygon( *pEllipseTan );
  YCylinderPolygon * pEllipseCilY = new YCylinderPolygon( *pEllipseTan );
  Ellipse *          pcd          = new Ellipse( nump, vec3(0.0,1.0,0.0), ejex, ejez );

  // style de la elipse tangente
  pEllipseTan->style.lines_width = 0.015 ;
  pEllipseTan->style.lines_color = colEllTan ;

  // style de la circunferencia superior del cilindro

  pcd->style.draw_filled = false ;
  pcd->style.draw_lines = true ;
  pcd->style.lines_color = vec3(1.0,0.0,0.0);
  pcd->style.lines_width = 0.015 ;


  // segmentos de los ejes mayor y menor de la elipse tangente
Point * pbt0 = new Point( vec3(-bt,0.0,1.0), colEllTan ),
      * pbt1 = new Point( vec3(+bt,0.0,1.0), colEllTan ),
      * pat0 = new Point( vec3(0.0,-at,1.0), colEllTan ),
      * pat1 = new Point( vec3(0.0,+at,1.0), colEllTan );

  const float widthatbt = 0.008 ;

  Segment * segbt = new Segment( *pbt0, *pbt1, widthatbt ),
          * segat = new Segment( *pat0, *pat1, widthatbt );

  // points t0 y t1, s0 y s1
  const real x  = 0.7*bt ,
             x2 = x*x ,
             y  = at*real(sqrt(1.0-x2/bt2));

  const vec3 colpt0t1 = pEllipseTan->style.lines_color ;
  const vec3 vpt0     = vec3(x,-y,1.0),
             vptm     = vec3(x,0.0,1.0),
             vpt1     = vec3(x,+y,1.0);

  Point * pt0 = new Point( vpt0, colpt0t1 ),
        * ptm = new Point( vptm, colpt0t1 ),
        * pt1 = new Point( vpt1, colpt0t1 );

  Segment * segpt0pt1 = new Segment( *pt0, *pt1, widthatbt );

  const vec3 vps0 = vpt0.normalized(),
             vps1 = vpt1.normalized();

  Point * ps0 = new Point( vps0, pEllipseEsf->style.lines_color ),
        * ps1 = new Point( vps1, pEllipseEsf->style.lines_color  );



  //Segment * segpt0pt1 = new Segment( *pt0, *pt1, widthatbt );

  Segment * rads0t0 = new Segment( org, vpt0 ),
           * rads1t1 = new Segment( org, vpt1 );

  Segment * segm = new Segment( org, ptm->pos3D ),
           * segx = new Segment( ejez, ptm->pos3D );

  Segment * segt1 = new  Segment( vpt1, vec3(0.0,vpt1[1],0.0));
  segt1->style.dashed_lines = true ;
  segt1->style.lines_color = vec3( 0.7,0.7,0.7 );
  segt1->style.lines_width = 0.004 ;

  Segment * segs1 = new  Segment( vps1, vec3(0.0,vps1[1],0.0));
  segs1->style.dashed_lines = true ;
  segs1->style.lines_color = vec3( 0.7,0.7,0.7 );
  segs1->style.lines_width = 0.004 ;

  segx->style.lines_color = vec3(1.0,0.0,0.0);

  //añadir objetos

  objetos.add( new Axes( 0.004 ) );
  //objetos.add( new YAxisCylinder( cam ) );
  objetos.add( pEsfera );

  objetos.add( pEllipseTan );

  objetos.add( segbt );
  objetos.add( segat );

  objetos.add( segpt0pt1 );
  objetos.add( segm );
  objetos.add( segx );
  objetos.add( rads0t0 );
  objetos.add( rads1t1 );
  objetos.add( segt1 );
  objetos.add( segs1 );

  objetos.add( pt0 );
  objetos.add( ptm );
  objetos.add( pt1 );
  objetos.add( ps0 );
  objetos.add( ps1 );

}

// Assembly:
pushq %rbp
movq %rsp, %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
subq $0x148, %rsp            # imm = 0x148
movq %rdi, %r14
callq 0xa414
movabsq $0x3f000000bf19999a, %rax # imm = 0x3F000000BF19999A
leaq -0x170(%rbp), %rdx
movq %rax, (%rdx)
movl $0x3f800000, 0x8(%rdx)  # imm = 0x3F800000
leaq -0x164(%rbp), %rsi
movq $0x0, (%rsi)
xorl %ebx, %ebx
movl %ebx, 0x8(%rsi)
movabsq $0x3f80000000000000, %r15 # imm = 0x3F80000000000000
leaq -0x158(%rbp), %rcx
movq %r15, (%rcx)
movl %ebx, 0x8(%rcx)
leaq -0xd8(%rbp), %rdi
movq %r14, -0x128(%rbp)
callq 0x6c30
movups -0xd8(%rbp), %xmm0
movups -0xc8(%rbp), %xmm1
movups -0xb8(%rbp), %xmm2
movups %xmm2, 0x20(%r14)
movups %xmm1, 0x10(%r14)
movups %xmm0, (%r14)
movq %rbx, -0xe4(%rbp)
movl %ebx, -0xdc(%rbp)
movq $0x3f800000, -0x134(%rbp) # imm = 0x3F800000
movl %ebx, -0x12c(%rbp)
movq %r15, -0x14c(%rbp)
movl %ebx, -0x144(%rbp)
movq %rbx, -0x98(%rbp)
movl $0x3f800000, -0x90(%rbp) # imm = 0x3F800000
movl $0x38, %edi
callq 0x31d0
leaq -0xd8(%rbp), %rsi
movq $0x0, (%rsi)
movl $0x0, 0x8(%rsi)
movss 0x8908(%rip), %xmm0     # 0xd008
movq %rax, -0x120(%rbp)
movq %rax, %rdi
callq 0x76c8
movl $0x98, %edi
callq 0x31d0
movq %rax, -0x50(%rbp)
xorl %eax, %eax
movss 0x88fd(%rip), %xmm0     # 0xd024
movss -0x134(%rbp,%rax,4), %xmm1
mulss %xmm0, %xmm1
movss %xmm1, -0xd8(%rbp,%rax,4)
incq %rax
cmpq $0x3, %rax
jne 0x4727
movsd -0xd8(%rbp), %xmm0
movss -0xd0(%rbp), %xmm1
movsd %xmm0, -0x60(%rbp)
movss %xmm1, -0x58(%rbp)
xorl %eax, %eax
movss 0x88be(%rip), %xmm0     # 0xd028
movss -0x14c(%rbp,%rax,4), %xmm1
mulss %xmm0, %xmm1
movss %xmm1, -0xd8(%rbp,%rax,4)
incq %rax
cmpq $0x3, %rax
jne 0x476a
movsd -0xd8(%rbp), %xmm0
movss -0xd0(%rbp), %xmm1
leaq -0x98(%rbp), %rdx
leaq -0x60(%rbp), %rcx
movq -0x50(%rbp), %rdi
movl $0x100, %esi            # imm = 0x100
callq 0x8586
movl $0x98, %edi
callq 0x31d0
movq %rax, %r14
movq %rax, %rdi
movq -0x50(%rbp), %rsi
xorl %edx, %edx
callq 0xa96a
movl $0x98, %edi
callq 0x31d0
movq %rax, %rbx
movq %rax, %rdi
movq -0x50(%rbp), %rsi
callq 0xb24e
movl $0x98, %edi
callq 0x31d0
movq %rax, %rbx
leaq -0xd8(%rbp), %rdx
movq %r15, (%rdx)
movl $0x0, 0x8(%rdx)
movsd -0x98(%rbp), %xmm0
movss -0x90(%rbp), %xmm1
leaq -0x134(%rbp), %rcx
movq %rax, %rdi
movl $0x100, %esi            # imm = 0x100
callq 0x8586
movl $0x3c75c28f, %eax       # imm = 0x3C75C28F
movq -0x50(%rbp), %rdx
movl %eax, 0x3c(%rdx)
movsd 0x8824(%rip), %xmm0     # 0xd060
movsd %xmm0, 0x20(%rdx)
xorl %ecx, %ecx
movl %ecx, 0x28(%rdx)
movb $0x0, 0x3a(%rbx)
movb $0x1, 0x38(%rbx)
movq $0x3f800000, 0x20(%rbx) # imm = 0x3F800000
movl %ecx, 0x28(%rbx)
movl %eax, 0x3c(%rbx)
movl $0x40, %edi
callq 0x31d0
movq %rax, %rbx
movss 0x87bb(%rip), %xmm0     # 0xd02c
movsd 0x87e7(%rip), %xmm2     # 0xd060
movss 0x8787(%rip), %xmm1     # 0xd008
xorps %xmm3, %xmm3
movq %rax, %rdi
callq 0x6f58
movl $0x40, %edi
callq 0x31d0
movq %rax, %r15
movss 0x8783(%rip), %xmm0     # 0xd024
movsd 0x87b7(%rip), %xmm2     # 0xd060
movss 0x8757(%rip), %xmm1     # 0xd008
xorps %xmm3, %xmm3
movq %rax, %rdi
callq 0x6f58
movl $0x40, %edi
callq 0x31d0
movq %rax, %r12
movsd 0x879f(%rip), %xmm0     # 0xd070
movsd 0x8787(%rip), %xmm2     # 0xd060
movss 0x8727(%rip), %xmm1     # 0xd008
xorps %xmm3, %xmm3
movq %rax, %rdi
callq 0x6f58
movl $0x40, %edi
callq 0x31d0
movq %rax, %r13
movsd 0x877f(%rip), %xmm0     # 0xd080
movsd 0x8757(%rip), %xmm2     # 0xd060
movss 0x86f7(%rip), %xmm1     # 0xd008
xorps %xmm3, %xmm3
movq %rax, %rdi
callq 0x6f58
movl $0x98, %edi
callq 0x31d0
movss 0x8702(%rip), %xmm0     # 0xd030
movq %rax, -0x118(%rbp)
movq %rax, %rdi
movq %rbx, %rsi
movq %r15, %rdx
callq 0x84aa
movl $0x98, %edi
callq 0x31d0
movq %rax, %rbx
movss 0x86d8(%rip), %xmm0     # 0xd030
movq %rax, %rdi
movq %r12, %rsi
movq %r13, %rdx
callq 0x84aa
movq -0x50(%rbp), %rax
movsd 0x20(%rax), %xmm0
movaps %xmm0, -0x40(%rbp)
movss 0x28(%rax), %xmm0
movss %xmm0, -0x48(%rbp)
movabsq $-0x40925550c1051eb9, %rax # imm = 0xBF6DAAAF3EFAE147
movq %rax, -0x60(%rbp)
movl $0x3f800000, %eax       # imm = 0x3F800000
movl %eax, -0x58(%rbp)
movabsq $0x3f6daaaf3efae147, %rcx # imm = 0x3F6DAAAF3EFAE147
movq %rcx, -0x70(%rbp)
movl %eax, -0x68(%rbp)
movl $0x40, %edi
callq 0x31d0
movq %rax, %r15
movsd -0x60(%rbp), %xmm0
movss 0x864a(%rip), %xmm1     # 0xd008
movq %rax, %rdi
movaps -0x40(%rbp), %xmm2
movss -0x48(%rbp), %xmm3
callq 0x6f58
movl $0x40, %edi
callq 0x31d0
movss 0x8653(%rip), %xmm0     # 0xd034
movss 0x861f(%rip), %xmm1     # 0xd008
movq %rax, -0x80(%rbp)
movq %rax, %rdi
movaps -0x40(%rbp), %xmm2
movss -0x48(%rbp), %xmm3
callq 0x6f58
movl $0x40, %edi
callq 0x31d0
movsd -0x70(%rbp), %xmm0
movss -0x68(%rbp), %xmm1
movq %rax, -0x88(%rbp)
movq %rax, %rdi
movaps -0x40(%rbp), %xmm2
movss -0x48(%rbp), %xmm3
callq 0x6f58
movl $0x98, %edi
callq 0x31d0
movss 0x85f4(%rip), %xmm0     # 0xd030
movq %rax, -0x110(%rbp)
movq %rax, %rdi
movq %r15, %rsi
movq -0x88(%rbp), %rdx
callq 0x84aa
xorpd %xmm0, %xmm0
xorl %eax, %eax
xorps %xmm1, %xmm1
cvtss2sd -0x60(%rbp,%rax,4), %xmm1
mulsd %xmm1, %xmm1
addsd %xmm1, %xmm0
incq %rax
cmpq $0x3, %rax
jne 0x4a5b
cvtsd2ss %xmm0, %xmm0
xorpd %xmm1, %xmm1
ucomiss %xmm1, %xmm0
jb 0x4a88
sqrtss %xmm0, %xmm0
jmp 0x4a8d
callq 0x32d0
xorl %eax, %eax
movss -0x60(%rbp,%rax,4), %xmm1
divss %xmm0, %xmm1
movss %xmm1, -0xd8(%rbp,%rax,4)
incq %rax
cmpq $0x3, %rax
jne 0x4a8f
movsd -0xd8(%rbp), %xmm0
movaps %xmm0, -0x40(%rbp)
movss -0xd0(%rbp), %xmm0
movss %xmm0, -0x48(%rbp)
xorpd %xmm0, %xmm0
xorl %eax, %eax
xorps %xmm1, %xmm1
cvtss2sd -0x70(%rbp,%rax,4), %xmm1
mulsd %xmm1, %xmm1
addsd %xmm1, %xmm0
incq %rax
cmpq $0x3, %rax
jne 0x4aca
cvtsd2ss %xmm0, %xmm0
xorps %xmm1, %xmm1
ucomiss %xmm1, %xmm0
jb 0x4af6
sqrtss %xmm0, %xmm0
jmp 0x4afb
callq 0x32d0
xorl %eax, %eax
movss -0x70(%rbp,%rax,4), %xmm1
divss %xmm0, %xmm1
movss %xmm1, -0xd8(%rbp,%rax,4)
incq %rax
cmpq $0x3, %rax
jne 0x4afd
movsd -0xd8(%rbp), %xmm0
movss -0xd0(%rbp), %xmm1
movss %xmm0, -0xa8(%rbp)
shufps $0x55, %xmm0, %xmm0     # xmm0 = xmm0[1,1,1,1]
movss %xmm0, -0xa4(%rbp)
movss %xmm1, -0x78(%rbp)
movss %xmm1, -0xa0(%rbp)
movl $0x40, %edi
callq 0x31d0
movsd 0x20(%r14), %xmm2
movss 0x28(%r14), %xmm3
movq %rax, -0x100(%rbp)
movq %rax, %rdi
movaps -0x40(%rbp), %xmm0
movss -0x48(%rbp), %xmm1
callq 0x6f58
movl $0x40, %edi
callq 0x31d0
movsd -0xa8(%rbp), %xmm0
movsd 0x20(%r14), %xmm2
movss 0x28(%r14), %xmm3
movq %rax, -0xf0(%rbp)
movq %rax, %rdi
movaps %xmm0, -0x40(%rbp)
movss -0x78(%rbp), %xmm1
callq 0x6f58
movl $0x98, %edi
callq 0x31d0
leaq -0xe4(%rbp), %rsi
leaq -0x60(%rbp), %rdx
movq %rax, -0x78(%rbp)
movq %rax, %rdi
callq 0x83e0
movl $0x98, %edi
callq 0x31d0
leaq -0xe4(%rbp), %rsi
leaq -0x70(%rbp), %rdx
movq %rax, -0xf8(%rbp)
movq %rax, %rdi
callq 0x83e0
movq %rbx, -0x48(%rbp)
movl $0x98, %edi
callq 0x31d0
movq -0x80(%rbp), %rbx
addq $0x1c, %rbx
leaq -0xe4(%rbp), %rsi
movq %rax, -0x108(%rbp)
movq %rax, %rdi
movq %rbx, %rdx
callq 0x83e0
movl $0x98, %edi
callq 0x31d0
movq %rax, %r14
leaq -0x98(%rbp), %rsi
movq %rax, %rdi
movq %rbx, %rdx
callq 0x83e0
movl $0x98, %edi
callq 0x31d0
movq %rax, %r13
movq %r15, -0x140(%rbp)
xorl %eax, %eax
leaq -0xd8(%rbp), %rdx
movl %eax, (%rdx)
leaq -0x70(%rbp), %rsi
movss 0x4(%rsi), %xmm0
movss %xmm0, 0x4(%rdx)
movl %eax, 0x8(%rdx)
movq %r13, %rdi
callq 0x83e0
movb $0x1, 0x44(%r13)
movabsq $0x3f3333333f333333, %r15 # imm = 0x3F3333333F333333
movq %r15, 0x20(%r13)
movl $0x3f333333, 0x28(%r13) # imm = 0x3F333333
movl $0x3b83126f, 0x3c(%r13) # imm = 0x3B83126F
movl $0x98, %edi
callq 0x31d0
movq %rax, %rbx
movaps -0x40(%rbp), %xmm0
shufps $0x55, %xmm0, %xmm0     # xmm0 = xmm0[1,1,1,1]
xorl %eax, %eax
leaq -0xd8(%rbp), %rdx
movl %eax, (%rdx)
movss %xmm0, 0x4(%rdx)
movl %eax, 0x8(%rdx)
leaq -0xa8(%rbp), %rsi
movq %rbx, %rdi
callq 0x83e0
movb $0x1, 0x44(%rbx)
movq %r15, 0x20(%rbx)
movl $0x3f333333, 0x28(%rbx) # imm = 0x3F333333
movl $0x3b83126f, 0x3c(%rbx) # imm = 0x3B83126F
movq $0x3f800000, 0x20(%r14) # imm = 0x3F800000
movl $0x0, 0x28(%r14)
movl $0x38, %edi
callq 0x31d0
movq %rax, %r12
movss 0x832a(%rip), %xmm0     # 0xd038
movq %rax, %rdi
xorl %esi, %esi
callq 0x976c
movq -0x128(%rbp), %rax
leaq 0x30(%rax), %r15
movq %r15, %rdi
movq %r12, %rsi
callq 0x7554
movq %r15, %rdi
movq -0x120(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0x50(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0x118(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0x48(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0x110(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0x108(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq %r14, %rsi
callq 0x7554
movq %r15, %rdi
movq -0x78(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0xf8(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq %r13, %rsi
callq 0x7554
movq %r15, %rdi
movq %rbx, %rsi
callq 0x7554
movq %r15, %rdi
movq -0x140(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0x80(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0x88(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0x100(%rbp), %rsi
callq 0x7554
movq %r15, %rdi
movq -0xf0(%rbp), %rsi
callq 0x7554
addq $0x148, %rsp            # imm = 0x148
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq
jmp 0x4ef1
jmp 0x4f0f
jmp 0x4ee6
jmp 0x4f47
jmp 0x4f1a
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x108(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0xf8(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x78(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0xf0(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x100(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x110(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x88(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x80(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
jmp 0x4efc
jmp 0x4f47
jmp 0x4f0f
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x118(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq %r13, %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq %r12, %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq %r15, %rdi
jmp 0x4f3c
jmp 0x4f47
jmp 0x4f0f
jmp 0x4f47
jmp 0x4f0f
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq %rbx, %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq %r14, %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x50(%rbp), %rdi
jmp 0x4f3c
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x120(%rbp), %rdi
callq 0x31a0
jmp 0x4f4b
jmp 0x4f47
jmp 0x4f47
movq %rax, -0x40(%rbp)
movq -0x128(%rbp), %rbx
leaq 0x70(%rbx), %rdi
callq 0x5d8c
addq $0x30, %rbx
movq %rbx, %rdi
callq 0xbb8e
movq -0x40(%rbp), %rdi
callq 0x32b0