// File: /workspace/github_c_makefile_star2_O0/markpeerdeman[P]mbemm/src/emath/linearc.c
// Function: printstatus
void printstatus(mesh theMesh) /* prints database/memory statistics */
{ point p; element e; restraint t; restraint d; long m_size;
fprintf(stderr,"\n=================================================================\n");
fprintf(stderr,"                SUMMARY FOR THIS ANALYSIS:\n");
fprintf(stderr,"-----------------------------------------------------------------\n");
  fprintf(stderr,"\nDatabase information:\n");
  p=(point)point_dll(theMesh->mesh_p,START,0); n_nodes=1;
  while (p->NEXT!=(point)NULL) { n_nodes++; p=p->NEXT; } 
  theMesh->nr_of_nodes=n_nodes;
  fprintf(stderr,"* number of points loaded:        %12d\n",n_nodes);

  e=(element)element_dll(theMesh->mesh_e,START,0); n_elements=1;
  while (e->NEXT!=(element)NULL) { n_elements++; e=e->NEXT; }
  theMesh->nr_of_elements=n_elements;
  fprintf(stderr,"* number of elements loaded:      %12d\n", n_elements);
/*  if (n_elements>500) 
  { fprintf(stderr,"MAXIMUM NR. OF ELEMENTS EXCEEDED...\n");
    exit(-1);
  }
*/
  t=(restraint)restraint_dll(theMesh->mesh_t,START,0); n_tractions=1;
  if (theMesh->mesh_t->NEXT==(restraint)NULL) { n_tractions=0; theMesh->nr_of_tractions=0;}
  else
  while (t->NEXT!=(restraint)NULL) { n_tractions++; t=t->NEXT; }
  theMesh->nr_of_tractions=n_tractions;
  fprintf(stderr,"* number of tractions loaded:     %12d\n", n_tractions);

  d=(restraint)restraint_dll(theMesh->mesh_d,START,0); n_displacements=1;
  if (theMesh->mesh_d->NEXT==(restraint)NULL) { n_displacements=0; theMesh->nr_of_displacements=0;}
  else
  while (d->NEXT!=(restraint)NULL) { n_displacements++; d=d->NEXT; }
  theMesh->nr_of_displacements=n_displacements;
  fprintf(stderr,"* number of displacements loaded: %12d\n", n_displacements);
  
  m_size=(long)(n_nodes*(int)sizeof(pointtype)+n_elements*
  (int)sizeof(elementtype)+(n_tractions+n_displacements)*
  (int)sizeof(restrainttype))/(long)1024;
  fprintf(stderr,"\nThe database occupies %d kB in memory.\n",(int)m_size);
  fprintf(stderr,"The total memory requirements for this run will be %d kB.\n\n",
		 (int)(m_size+(long)(8*n_nodes*3*n_nodes*(int)sizeof(double))/
		 (long)1024));
  for (m_size=1; m_size<=(long)n_nodes; m_size++)
  { p=(point)point_dll(theMesh->mesh_p,SEARCH,(int)m_size);
	if (CURRENT_STATUS!=GREEN) evaluate_level(RED,106); }
  for (m_size=1; m_size<=(long)n_elements; m_size++)
  { e=(element)element_dll(theMesh->mesh_e,SEARCH,(int)m_size);
	if (CURRENT_STATUS!=GREEN) evaluate_level(RED,107); }
  fprintf(stderr,"Material data:\n* E  = %.10lE\n* MU = %.10lE\n* NU = %f\n\n",
  EMOD,MU,NU);
fprintf(stderr,"-----------------------------------------------------------------\n\n");
}

// Assembly:
subq $0x38, %rsp
movq %rdi, 0x30(%rsp)
movq 0xd388(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
leaq 0x9366(%rip), %rsi      # 0x19fe0
movb $0x0, %al
callq 0x10d0
movq 0xd370(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
leaq 0x9392(%rip), %rsi      # 0x1a024
movb $0x0, %al
callq 0x10d0
movq 0xd358(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
leaq 0x8570(%rip), %rsi      # 0x1921a
movb $0x0, %al
callq 0x10d0
movq 0xd340(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
leaq 0x938e(%rip), %rsi      # 0x1a050
movb $0x0, %al
callq 0x10d0
movq 0x30(%rsp), %rax
movq (%rax), %rdi
xorl %edx, %edx
movl %edx, %esi
callq 0x175c0
movq %rax, 0x28(%rsp)
movl $0x1, 0xdb7f(%rip)      # 0x1e868
movq 0x28(%rsp), %rax
cmpq $0x0, 0x8(%rax)
je 0x10d14
movl 0xdb6d(%rip), %eax      # 0x1e868
addl $0x1, %eax
movl %eax, 0xdb64(%rip)      # 0x1e868
movq 0x28(%rsp), %rax
movq 0x8(%rax), %rax
movq %rax, 0x28(%rsp)
jmp 0x10ce9
movl 0xdb4e(%rip), %ecx      # 0x1e868
movq 0x30(%rsp), %rax
movl %ecx, 0x20(%rax)
movq 0xd2cf(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
movl 0xdb36(%rip), %edx      # 0x1e868
leaq 0x932f(%rip), %rsi      # 0x1a068
movb $0x0, %al
callq 0x10d0
movq 0x30(%rsp), %rax
movq 0x8(%rax), %rdi
xorl %edx, %edx
movl %edx, %esi
callq 0x14570
movq %rax, 0x20(%rsp)
movl $0x1, 0xdb0b(%rip)      # 0x1e86c
movq 0x20(%rsp), %rax
cmpq $0x0, 0x8(%rax)
je 0x10d8c
movl 0xdaf9(%rip), %eax      # 0x1e86c
addl $0x1, %eax
movl %eax, 0xdaf0(%rip)      # 0x1e86c
movq 0x20(%rsp), %rax
movq 0x8(%rax), %rax
movq %rax, 0x20(%rsp)
jmp 0x10d61
movl 0xdada(%rip), %ecx      # 0x1e86c
movq 0x30(%rsp), %rax
movl %ecx, 0x24(%rax)
movq 0xd257(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
movl 0xdac2(%rip), %edx      # 0x1e86c
leaq 0x92df(%rip), %rsi      # 0x1a090
movb $0x0, %al
callq 0x10d0
movq 0x30(%rsp), %rax
movq 0x18(%rax), %rdi
xorl %edx, %edx
movl %edx, %esi
callq 0x17a40
movq %rax, 0x18(%rsp)
movl $0x1, 0xda97(%rip)      # 0x1e870
movq 0x30(%rsp), %rax
movq 0x18(%rax), %rax
cmpq $0x0, 0x8(%rax)
jne 0x10e01
movl $0x0, 0xda7d(%rip)      # 0x1e870
movq 0x30(%rsp), %rax
movl $0x0, 0x2c(%rax)
jmp 0x10e30
jmp 0x10e03
movq 0x18(%rsp), %rax
cmpq $0x0, 0x8(%rax)
je 0x10e2e
movl 0xda5b(%rip), %eax      # 0x1e870
addl $0x1, %eax
movl %eax, 0xda52(%rip)      # 0x1e870
movq 0x18(%rsp), %rax
movq 0x8(%rax), %rax
movq %rax, 0x18(%rsp)
jmp 0x10e03
jmp 0x10e30
movl 0xda3a(%rip), %ecx      # 0x1e870
movq 0x30(%rsp), %rax
movl %ecx, 0x2c(%rax)
movq 0xd1b3(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
movl 0xda22(%rip), %edx      # 0x1e870
leaq 0x9263(%rip), %rsi      # 0x1a0b8
movb $0x0, %al
callq 0x10d0
movq 0x30(%rsp), %rax
movq 0x10(%rax), %rdi
xorl %edx, %edx
movl %edx, %esi
callq 0x17a40
movq %rax, 0x10(%rsp)
movl $0x1, 0xd9f7(%rip)      # 0x1e874
movq 0x30(%rsp), %rax
movq 0x10(%rax), %rax
cmpq $0x0, 0x8(%rax)
jne 0x10ea5
movl $0x0, 0xd9dd(%rip)      # 0x1e874
movq 0x30(%rsp), %rax
movl $0x0, 0x28(%rax)
jmp 0x10ed4
jmp 0x10ea7
movq 0x10(%rsp), %rax
cmpq $0x0, 0x8(%rax)
je 0x10ed2
movl 0xd9bb(%rip), %eax      # 0x1e874
addl $0x1, %eax
movl %eax, 0xd9b2(%rip)      # 0x1e874
movq 0x10(%rsp), %rax
movq 0x8(%rax), %rax
movq %rax, 0x10(%rsp)
jmp 0x10ea7
jmp 0x10ed4
movl 0xd99a(%rip), %ecx      # 0x1e874
movq 0x30(%rsp), %rax
movl %ecx, 0x28(%rax)
movq 0xd10f(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
movl 0xd982(%rip), %edx      # 0x1e874
leaq 0x91e7(%rip), %rsi      # 0x1a0e0
movb $0x0, %al
callq 0x10d0
imull $0x88, 0xd95e(%rip), %eax # 0x1e868
imull $0xc0, 0xd958(%rip), %ecx # 0x1e86c
addl %ecx, %eax
movl 0xd954(%rip), %ecx      # 0x1e870
addl 0xd952(%rip), %ecx      # 0x1e874
imull $0x48, %ecx, %ecx
addl %ecx, %eax
cltq
movl $0x400, %ecx            # imm = 0x400
cqto
idivq %rcx
movq %rax, 0x8(%rsp)
movq 0xd0b9(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
movq 0x8(%rsp), %rax
movl %eax, %edx
leaq 0x91b8(%rip), %rsi      # 0x1a108
movb $0x0, %al
callq 0x10d0
movq 0xd09a(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
movq 0x8(%rsp), %rax
movq %rax, (%rsp)
movl 0xd8f8(%rip), %eax      # 0x1e868
shll $0x3, %eax
imull $0x3, %eax, %eax
imull 0xd8eb(%rip), %eax      # 0x1e868
shll $0x3, %eax
cltq
movl $0x400, %ecx            # imm = 0x400
cqto
idivq %rcx
movq %rax, %rcx
movq (%rsp), %rax
addq %rcx, %rax
movl %eax, %edx
leaq 0x9192(%rip), %rsi      # 0x1a131
movb $0x0, %al
callq 0x10d0
movq $0x1, 0x8(%rsp)
movq 0x8(%rsp), %rax
movslq 0xd8ad(%rip), %rcx      # 0x1e868
cmpq %rcx, %rax
jg 0x1100b
movq 0x30(%rsp), %rax
movq (%rax), %rdi
movq 0x8(%rsp), %rax
movl %eax, %edx
movl $0x2, %esi
callq 0x175c0
movq %rax, 0x28(%rsp)
leaq 0xd8c3(%rip), %rax      # 0x1e8a8
cmpl $0x0, (%rax)
je 0x10ff9
movl $0x2, %edi
movl $0x6a, %esi
callq 0x15200
jmp 0x10ffb
movq 0x8(%rsp), %rax
addq $0x1, %rax
movq %rax, 0x8(%rsp)
jmp 0x10faf
movq $0x1, 0x8(%rsp)
movq 0x8(%rsp), %rax
movslq 0xd84c(%rip), %rcx      # 0x1e86c
cmpq %rcx, %rax
jg 0x11071
movq 0x30(%rsp), %rax
movq 0x8(%rax), %rdi
movq 0x8(%rsp), %rax
movl %eax, %edx
movl $0x2, %esi
callq 0x14570
movq %rax, 0x20(%rsp)
leaq 0xd85d(%rip), %rax      # 0x1e8a8
cmpl $0x0, (%rax)
je 0x1105f
movl $0x2, %edi
movl $0x6b, %esi
callq 0x15200
jmp 0x11061
movq 0x8(%rsp), %rax
addq $0x1, %rax
movq %rax, 0x8(%rsp)
jmp 0x11014
movq 0xcf80(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
leaq 0xd356(%rip), %rax      # 0x1e3d8
movsd (%rax), %xmm0
leaq 0xd34b(%rip), %rax      # 0x1e3d8
movsd (%rax), %xmm1
movsd 0x839f(%rip), %xmm2     # 0x19438
divsd %xmm2, %xmm1
movsd 0x7f63(%rip), %xmm2     # 0x19008
leaq 0xd334(%rip), %rax      # 0x1e3e0
addsd (%rax), %xmm2
divsd %xmm2, %xmm1
leaq 0xd325(%rip), %rax      # 0x1e3e0
movsd (%rax), %xmm2
leaq 0x90a7(%rip), %rsi      # 0x1a16d
movb $0x3, %al
callq 0x10d0
movq 0xcf24(%rip), %rax      # 0x1dff8
movq (%rax), %rdi
leaq 0x90c6(%rip), %rsi      # 0x1a1a4
movb $0x0, %al
callq 0x10d0
addq $0x38, %rsp
retq
nopw (%rax,%rax)