pkSetSpecies
The subroutine pkSetSpecies
allows setting the value of the
initial concentration for one species or the values of this property for a
sequence of species.
pkSetSpecies( Property, Value, SpeciesN [, STAT] )
Name | Description | Data type and attributes |
---|---|---|
Property | Case sensitive name of property | CHARACTER(len=*), INTENT(IN) |
{Value | Value(:)} | Values(s) of property | REAL(double), INTENT(OUT) |
SpeciesN | {Index of Species | starting index of Species} | INTEGER, INTENT(IN) |
STAT | Execution status indicator | INTEGER, OPTIONAL, INTENT(OUT) |
The only property that can be set is the initial_conc
.
The Value
argument sets the value of the property inquired and can
be a scalar or an array. In the last case the values set are
SIZE(
consecutive values of property.Value
)
Example E-19. pkSetSpecies
: Modifying the value of
the 'initial_conc' property.
When the electron energy and vibrational distribution functions are
self-consistently obtained by the solution of the electron Boltzmann equation
coupled to the system of rate balance equations for the vibrational levels, it is
necessary to update the concentrations of vibrational levels obtained from the
rate balance equations. This can be done by imposing new values for the
initial_conc
property.
REAL(double), ALLOCATABLE :: XGuess(:) LOGICAL :: Convergence = .FALSE. ... ALLOCATE( XGuess(NnTV) ) ... DO WHILE( .not. Convergence ) ! Loop until convergence of XGuess values ... CALL pkSetSpecies( 'initial_conc', XGuess(:), 1 ) ... END DO