libsim Versione 7.2.0

◆ default_columns()

integer function, public default_columns

Return the number of columns in the terminal, if available it is taken from the COLUMNS environment variable (it may be necessary to execute export COLUMNS before running the program, in order for this to work), otherwise it is set to 80.

A positive value is returned in any case

Definizione alla linea 1114 del file char_utilities.F90.

1115 character(len=*), intent(in) :: string
1116 character(len=*), intent(in) :: pattern
1117 logical :: match
1118
1119! '\\' without -fbackslash generates a warning on gfortran, '\'
1120! crashes doxygen, so we choose '\\' and -fbackslash in configure.ac
1121 character(len=1), parameter :: backslash = '\\'
1122 character(len=1), parameter :: star = '*'
1123 character(len=1), parameter :: question = '?'
1124
1125 character(len=len(pattern)) :: literal
1126 integer :: ptrim
1127 integer :: p
1128 integer :: k
1129 integer :: ll
1130 integer :: method
1131 integer :: start

Generated with Doxygen.