.NONUMBER
.TITLE ^^SETMAX - SETTING DEFAULT STRING LENGTH
.PAGE
.INDENT 50
<SETMAX
.SKIP 1
.CENTER
^^SETMAX - SETTING DEFAULT STRING LENGTH
.LEFT MARGIN 10
.SKIP 1
.INDENT -10
^^ROUTINE NAME: SETMAX\\
.SKIP 1
.INDENT -10
^^PURPOSE:\\ ^IN USING THE STRING MANIPULATION ROUTINES IN THIS LIBRARY YOU MAY WISH TO
IGNORE THE MAXIMUM LENGTH PARAMETER IE. USE THE DEFAULT.  ^THE DEFAULT IS 
32.  ^HOWEVER BY CALLING <SETMAX YOU CAN CHANGE THIS DEFAULT BY SPECIFYING
A NEW DEFAULT ARGUMENT TO <SETMAX.
.SKIP 1
.INDENT -10
^^CALLABLE:\\ ^FROM <FORTRAN - ^^CALL SETMAX(\\MAXLEN)
.SKIP 1
.INDENT -10
^^PARAMETERS:\\ MAXLEN = THE NEW DEFAULT MAXIMUM STRING LENGTH.
.SKIP 1
.INDENT -10
^^ROUTINES USED:\\ NONE
.SKIP 1
.INDENT -10
^^EXAMPLE:\\ ^^CALL SETMAX(64)
.SKIP 1
.INDENT -10
^^AUTHOR:\\ ^^MIKE HIGGINS
.SKIP 1
.INDENT -10
^^SOURCE LANGUAGE:\\ <MACRO-11
.SKIP 1
.INDENT -10
^^OBJECT MODULE NAME:\\ ^^MAXLEN
.SKIP 1
.INDENT -10
^^LIBRARY:\\ <DP:[60,60]MIKES
.SKIP 1
.INDENT -10