.ps 60,80
.lm 5
.rm 75
.ap
.!(librarian will insert file name here)
.blank 2
.c;NCAR subroutines used at BASD
.blank 2
.c;Dave Cook
.c;Ball Aerospace Systems Division
.c;P.O. 1062
.c;Boulder, Colo.     80306
.c;(303) 441-4058
.blank 2
	This directory contains some of the routines we have unscrupulously
ripped off from the prolific Ray Bovet of NCAR. These routines can be found
elsewhere in his DECUS submissions, however, I have gleaned the ones required
in my BASD submissions.
	Beware that these versions may not match ones in his submissions
since BASD and NCAR are both located here in Boulder and we tend to run
over and steal from Ray every chance we get.
	Nevertheless, the versions included here make the BASD submissions
on this tape function as advertised and there is no guarrantee that Ray
will be able to offer you any condolences for getting nailed with them.
.list
.le;CTRANS
	CTRANS contains three modules for character string manipulation.
.list
.le;CLOWER
	CLOWER converts an input character string to lower case.
.le;CUPPER
	CUPPER converts an input character string to upper case.
.le;NBLANK
	NBLANK is an integer function that returns to the caller an
index pointing to the last non-blank character in a character string.
This is an incredibly useful function....Try it !
.end list
.le;ERRMES
	ERRMES converts a system error code such as is returned from a
system service function into the system error message and outputs it to
the current output device. It is written in macro and is recursive.
.le;IFERR
	IFERR takes all the work out of error code checking on system
service calls. You can call it by either passing it an error code directly
as in ERRMES or by passing it the system service call itself. On errors,
it will output not only the system error message, but also a user
specified error message at the same time in order to identify where you
were in your code when you crashed.
.le;JPIDEF
	Simply the JPI item code definitions.
.le;LOGTRANS
	Yet another recursive TRNLOG routine. Translates logical names
down to the bottom level. Beware that the input and output character
strings are implicitly defined to be the same length.
.le;WAIT
	A subroutine that allows the user to go into a timed LEF wait
for a specified number of seconds.
.end list