user_calcs2d_degradation.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	user_calcs2d_degradation (NPOIN, TN, TEXP, TIMP, HPROP, NWAQ_DEGRA, RANK_DEGRA, LOITRAC, COEF1TRAC)

Function/Subroutine Documentation

user_calcs2d_degradation()

subroutine user_calcs2d_degradation	(	integer, intent(in)	NPOIN,
		type(bief_obj), intent(in)	TN,
		type(bief_obj), intent(inout)	TEXP,
		type(bief_obj), intent(inout)	TIMP,
		type(bief_obj), intent(in)	HPROP,
		integer, intent(in)	NWAQ_DEGRA,
		integer, dimension(*), intent(in)	RANK_DEGRA,
		integer, dimension(*), intent(in)	LOITRAC,
		double precision, dimension(*), intent(in)	COEF1TRAC
	)

Parameters

[in]	npoin	COEF1TRAC Coefficient 1 for law of tracers degradation
[in]	HPROP	Propagation depth
[in]	LOITRAC	Law of tracers degradation
[in]	NPOIN	Number of nodes in the mesh
[in]	NWAQ_DEGRA	Number of tracers with a degradation law
[in]	RANK_DEGRA	Group tracers with a degradation law
[in]	TEXP	Explicit source term
[in]	TIMP	Implicit source term
[in]	TN	Tracers at time n

Definition at line 8 of file user_calcs2d_degradation.f.