libsim Versione 7.2.1

◆ optio_r()

elemental real function, public optio_r ( real, intent(in), optional  var)

Return the optional value if present, otherwise return missing value.

Parametri
[in]varvariable to be checked

Definizione alla linea 99 del file optional_values.f90.

100REAL,INTENT(in),OPTIONAL :: var
101
102if (present(var))then
103 optio_r=var
104else
105 optio_r=rmiss
106end if
107

Generated with Doxygen.