libsim Versione 7.2.1

◆ c2r()

elemental real function, public c2r ( character(len=*), intent(in) string)

Convert a character string to a real value if possible.

It is ELEMENTAL so it works with arrays of any shape. It returns missing value if the input cannot be converted or is empty or missing.

Parametri
[in]stringstring to be represented as REAL

Definizione alla linea 706 del file char_utilities.F90.

707INTEGER :: nblnk
708
709IF (PRESENT(blnk)) THEN
710 lblnk = blnk
711ELSE
712 lblnk = ' '
713ENDIF
714
715DO nblnk = 1, len(input_string)
716 IF (input_string(nblnk:nblnk) /= lblnk) RETURN
717ENDDO
718
719END FUNCTION f_nblnk
720
721

Generated with Doxygen.