#!/usr/bin/env ksh # @(#) make skeleton for new HTML code file export PROCEDURE=${1:-'PROCEDURE'} cat < $PROCEDURE
FORTRAN library

$PROCEDURE

NAME
$PROCEDURE - WHAT PROCEDURE DOES HERE IN ONE LINE
SYNOPSIS/USAGE
         INTEGER FUNCTION $PROCEDURE
         CHARACTER*(*) string
   
DESCRIPTION
$PROCEDURE(string) returns the ...
EXAMPLE
#ifdef TESTPRG program testit call $PROCEDURE() end #endif
NOTES
FILES
libJSU.a

A Table

R 1 C 1 R 1 C 2 R 1 C 3
R 2 C 1 R 2 C 2 R 2 C 3


C=======================================================================-------- C @(#) FORTRAN 77 $PROCEDURE DOES THIS C=======================================================================-------- !=======================================================================-------- ! @(#) Fortran 90 FREE-FORMAT $PROCEDURE DOES THIS !=======================================================================-------- /* @(#) C $PROCEDURE DOES THIS */

as-is &lt; less-than &gt; greater-than &amp; ampersand &apos; apostrophe &quot; quote
EOF exit