Neko  0.9.99
A portable framework for high-order spectral element flow simulations
stl.f90
Go to the documentation of this file.
1 
2 module stl
3  use num_types, only : sp, i2
4  implicit none
5  private
6 
8  type, public :: stl_hdr_t
9  character(len=80) :: hdr
10  integer :: ntri
11  end type stl_hdr_t
12 
14  type, public :: stl_triangle_t
15  real(kind=sp) :: n(3)
16  real(kind=sp) :: v1(3)
17  real(kind=sp) :: v2(3)
18  real(kind=sp) :: v3(3)
19  integer(kind=i2) :: attrib
20  end type stl_triangle_t
21 
22 end module stl
num_types
Definition: num_types.f90:1
num_types::i2
integer, parameter, public i2
Definition: num_types.f90:5
num_types::sp
integer, parameter, public sp
Definition: num_types.f90:8
stl
Stereolithography format.
Definition: stl.f90:2
stl::stl_hdr_t
Defines a STL hdr.
Definition: stl.f90:8
stl::stl_triangle_t
Defines a STL triangle.
Definition: stl.f90:14