libsim Versione 7.2.6
|
◆ c2d()
Convert a character string to a double 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.
Definizione alla linea 730 del file char_utilities.F90. 731INTEGER, POINTER, OPTIONAL :: word_end(:) !< indices of last character of each word in \a input_string, allocated here, must be deallocated by the user
732CHARACTER(len=1), OPTIONAL :: sep !< optional word separator character, if not provided, a blank space is assumed
733
734INTEGER :: nword
735
736INTEGER :: ls, le
737INTEGER, POINTER :: lsv(:), lev(:)
738CHARACTER(len=1) :: lsep
739
740IF (PRESENT(sep)) THEN
741 lsep = sep
742ELSE
743 lsep = ' '
744ENDIF
745
746nword = 0
|