ROUTINE: lenstr
USEAGE: result=lenstr(str)
input:
str a single string or string array.
output:
result length of the string(s) in normalized units
the number of elements of RESULT matches the number of
elements of STRING.
procedure:
This function returns the physical length of the
string on the output device, not the number of
characters. This is done by first switching to 'X'
and writing the string(s) with XYOUTS in graphics
mode 5, which disables display to the screen but
does not interfere with operation of XYOUTS. The
WIDTH keyword parameter of XYOUTS is used to
retrieve the physical length of the string(s).
author: Paul Ricchiazzi 7apr93
Institute for Computational Earth System Science
University of California, Santa Barbara