lorenz Function

function lorenz(U, t) result(dU)

function for defining derivative in the Lorenz system written as: $$\frac{d\mathbf{U}}{dt}=\mathbf{F}\left(\mathbf{U},t\right)$$ where: $$\mathbf{U}\left(t\right) = \begin{pmatrix} x\left(t\right)\\ y\left(t\right)\\ z\left(t\right) \end{pmatrix}$$ and $$\mathbf{F}\left(\mathbf{U},t\right)= \begin{pmatrix} a \left( U_2 - U_1 \right) \\ U_1 \left( b - U_3 \right) - U_2 \\ U_1 U_2 - cU_3 \end{pmatrix}$$

Arguments

Type	Intent	Optional	Attributes		Name
real,	intent(in)			::	U(:)
real,	intent(in)			::	t

Return Value real, (size(U))