.*    This file is for imbedding in other SCRIPT files
.*    to have the capability of printing the document
.*    on either the 6670 or the 3800,
.*    and have it come out the same way.
.if &$LDEV = 6670D
.*     If a 6670, then have symprof define 6670 stuff for you.
.th .im symprof
.*     If not a 6670, then define the LINE6 macro
.el .dm line6  off
.el .dm line6()  |.pa
.*     If not a 6670, then define the LINE65 macro
.el .dm line65 off
.el .dm line65() |.pa
.*     If not a 6670, then insure same line length as a 6670
.el .ll 78