49           ilen = mesh->get_nb_mesh_face();
 
   52                jlen = mesh->get_mesh_face(i)->get_nbtriangles();
 
   57                     dir = mesh->get_mesh_face(i)->get_triangle_normal(j);
 
   60                          data = (float)dir[0]; fwrite(&data,1,
sizeof(
float),fstl_);
 
   61                          data = (float)dir[1]; fwrite(&data,1,
sizeof(
float),fstl_);
 
   62                          data = (float)dir[2]; fwrite(&data,1,
sizeof(
float),fstl_);
 
   67                          fprintf(fstl_,
"FACET NORMAL %lf %lf %lf\n",dir[0],dir[1],dir[2]);
 
   68                          fprintf(fstl_,
"   OUTER LOOP\n");
 
   72                     for(
int k = 0 ; k < 3 ; k++)
 
   74                          pnt = mesh->get_mesh_face(i)->get_triangle_vertex(j,k);
 
   77                               data = (float)pnt[0]; fwrite(&data,1,
sizeof(
float),fstl_);
 
   78                               data = (float)pnt[1]; fwrite(&data,1,
sizeof(
float),fstl_);
 
   79                               data = (float)pnt[2]; fwrite(&data,1,
sizeof(
float),fstl_);
 
   83                               fprintf(fstl_,
"      VERTEX %lf %lf %lf\n",pnt[0],pnt[1],pnt[2]);
 
   87                          fwrite(&truc,1,
sizeof(
short),fstl_);
 
   90                          fprintf(fstl_,
"   ENDLOOP\n");
 
   91                          fprintf(fstl_,
"ENDFACET\n");