datasequence Module Reference

Data Types
type	dataseq
	Data structure to store time-sequence of real data. More...

Functions/Subroutines
subroutine	init_dataseq (this, lun_err, ndata, nsequence)
	Static constructor for datasequence::dataseq
subroutine	kill_dataseq (this, lun_err)
	Static destructor for datasequence::dataseq
subroutine	fill_dataseq (this, data, time)
	Add new data to the database.
subroutine	lagrange_interpolation (this, time, interpolation, info)
	Lagrange interpolation in time of stored data.

Function/Subroutine Documentation

init_dataseq()

subroutine datasequence::init_dataseq	(	class(dataseq), intent(inout)	this,
		integer, intent(in)	lun_err,
		integer, intent(in)	ndata,
		integer, intent(in)	nsequence )

Static constructor for datasequence::dataseq

---

Set variables dataseq::ndata and dataseq::nsequence and allocate variables dataseq::datas and dataseq::times.

Parameters

[in]	lun_err	integer, unit number for error message
[in]	ndata	integer, dimension data to store
[in]	nsequence	integer, number of time instants

kill_dataseq()

subroutine datasequence::kill_dataseq ( class(dataseq), intent(inout) this, integer, intent(in) lun_err )

private

Static destructor for datasequence::dataseq

---

Deallocate variables dataseq::datas and dataseq::times

Parameters

[in]

lun_err

integer, unit number for error message

fill_dataseq()

subroutine datasequence::fill_dataseq ( class(dataseq), intent(inout) this, real(kind=double), dimension(this%ndata), intent(in) data, real(kind=double), intent(in) time )

private

Add new data to the database.

---

Parameters

[in]	data	data to add to database dataseq::datas
[in]	time	time associated to new data

lagrange_interpolation()

subroutine datasequence::lagrange_interpolation ( class(dataseq), intent(in) this, real(kind=double), intent(in) time, real(kind=double), dimension(this%ndata), intent(inout) interpolation, integer, intent(inout) info )

private

Lagrange interpolation in time of stored data.

---

Parameters

[in]	time	time at which we want to compute new data
[in,out]	interpolation	vector of data at time timecomputed using Lagrange interpolation in time of data stored in dataseq::datas
[in,out]	info	-1: database is not full and interpolation not computed, 0 otherwise