tem_from_file_temporal_type Derived Type

type, private :: tem_from_file_temporal_type

contains information for loading inlet velocities from a datafile The data has to be stored as tuples (time,velocity) columnwise. t1 v1 t2 v2 ... tn vn and v1 .eq. vn has to be fullfilled. The data has to be provided in the format '(e15.8)'


Components

Type Visibility Attributes Name Initial
character(len=PathLen), public :: datafile

filename of the data
character(len=LabelLen), public :: intp

interpolate linearly between the data
type(grw_real2darray_type), public :: signal

growing array of tuples (time, velocity)
logical, public :: ramp = .false.

ramping active?
real(kind=rk), public :: rampVal

ramping value at the end of rampT
real(kind=rk), public :: rampT

ramping time
real(kind=rk), public :: fac

factor to multiply data with
logical, public :: periodic

is the data periodic?

Source Code

  type tem_from_file_temporal_type
    !> filename of the data
    character(len=PathLen) :: datafile
    !> interpolate linearly between the data
    character(len=LabelLen) :: intp
    !> growing array of tuples (time, velocity)
    type( grw_real2darray_type ) :: signal
    !> ramping active?
    logical :: ramp = .false.
    !> ramping value at the end of rampT
    real(kind=rk) :: rampVal
    !> ramping time
    real(kind=rk) :: rampT
    !> factor to multiply data with
    real(kind=rk) :: fac
    !> is the data periodic?
    logical :: periodic
  end type tem_from_file_temporal_type