DataMuseum.dk

Presents historical artifacts from the history of:

Regnecentalen RC-900

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Regnecentalen RC-900

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦b859c4cba⟧ TextFile

    Length: 619 (0x26b)
    Types: TextFile
    Notes: UNIX file
    Names: »greek«

Derivation

└─⟦a892c3799⟧ Bits:30004042/term1.imd SW95705I 386/ix Multi-user Release 1.2
└─⟦a892c3799⟧ UNIX Filesystem
    └─⟦this⟧ »tu/new/usr/bin/greek« 

TextFile

#	Copyright (c) 1984 AT&T
#	  All Rights Reserved

#	THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T
#	The copyright notice above does not evidence any
#	actual or intended publication of such source code.

#ident	"@(#)greek:greek.sh	1.8"
TERM=${1--T$TERM}
case $TERM in
-T450|-T450-12|-T1620|-T1620-12)	exec 450;;
-T300)	exec 300;;
-T300-12)	exec 300 +12;;
-T300s)	exec 300s;;
-T300s-12)	exec 300s +12;;
-Thp|-T2621|-T2645|-T2640)	exec hp;;
-T4014|-Ttek)	exec 4014;;
"")	echo 'usage: greek [ -Tterminal ]  ($TERM must be set if arg omitted)' >&2
	exit 1;;
*)	echo "greek: $TERM not implemented" >&2;	exit 1;;
esac