libsim  Versione6.3.0

◆ f_nblnk()

elemental integer function, public char_utilities::f_nblnk ( character(len=*), intent(in)  input_string,
character(len=1), intent(in), optional  blnk 
)

Return the index of first character in input_string which is not a blank space.

If the string is zero-length or contains only blank spaces, LEN(input_string)+1 is returned.

Parametri
[in]input_stringstring to be scanned
[in]blnkoptional blank character, if not provided, a blank space is assumed

Definizione alla linea 916 del file char_utilities.F90.

916 ENDIF
917 
918 END FUNCTION line_split_get_line
919 
920 
926 FUNCTION default_columns() RESULT(cols)
927 INTEGER :: cols
928 
929 INTEGER, PARAMETER :: defaultcols = 80 ! default of the defaults
930 INTEGER, PARAMETER :: maxcols = 256 ! maximum value
931 CHARACTER(len=10) :: ccols

Generated with Doxygen.