TRIMCARD

Syntax:

TRIMCARD /COLUMN:n file [default n=80]

TRIMCARD reads a (cardimage-) input-file and writes a new output file with the same content, but
o all text beyond column /COLUMN:n [80] removed, and
o all trailing blanks removed.
Qualifier /WRAP to wrap line at column, does not cut. Qualifier /WORD to wrap, but at word boundaries.

Fortran source
Build command-file
Command-definition source
DCL command definition file
The build command refers to util.olb, which should contain an init_cli_for routine equivalent to the one in init_cli_for.for .

To make the command available to DCL, either
$ set command trimcard , or
$ trimcard :== $location:trimcard ,or
put trimcard.exe into DCL$PATH, and use command trimcard.
(the build and cld file uses explicit locations, please modify.)


Joseph Huber , huber AT mppmuDOTmpgDOTde