libsim  Versione7.2.1

◆ default_columns()

integer function, public char_utilities::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 1125 del file char_utilities.F90.

1125  character(len=len(pattern)) :: literal
1126  integer :: ptrim
1127  integer :: p
1128  integer :: k
1129  integer :: ll
1130  integer :: method
1131  integer :: start
1132  integer :: strim
1133 
1134  match = .false.
1135  method = 0
1136  ptrim = len_trim( pattern )
1137  strim = len_trim( string )
1138  p = 1
1139  ll = 0
1140  start = 1
1141 

Generated with Doxygen.