Neko  0.9.0
A portable framework for high-order spectral element flow simulations
structs.f90
Go to the documentation of this file.
1 
2 module structs
3  use num_types, only : rp, dp
4  implicit none
5  private
6 
7  type, public :: struct_curve_t
8  real(kind=dp) :: curve_data(5,12)
9  integer :: curve_type(12)
10  integer :: el_idx
11  end type struct_curve_t
12 
14  type, public :: array_ptr_t
15  real(kind=rp), pointer :: ptr(:)
16  end type array_ptr_t
17 end module structs
18 
integer, parameter, public dp
Definition: num_types.f90:9
integer, parameter, public rp
Global precision used in computations.
Definition: num_types.f90:12
Defines structs that are used... Dont know if we should keep it though.
Definition: structs.f90:2
Pointer to array.
Definition: structs.f90:14