|
◆ soptio_r()
elemental subroutine, public optional_values::soptio_r |
( |
real, intent(in), optional |
var, |
|
|
real, intent(out) |
optio_r |
|
) |
| |
Set the output value to input, if input is present, otherwise set it to missing value.
- Parametri
-
[in] | var | variable to be checked |
[out] | optio_r | equal to var if present, otherwise equal to the corresponding missing value |
Definizione alla linea 198 del file optional_values.f90.
198 REAL, INTENT(in), OPTIONAL :: var 199 REAL, INTENT(out) :: optio_r 201 if ( present(var)) then
|