File: DOTEST.BI of Tape: Sources/Multi8/m-ra1-f1-15-6-81

(Source file text) 

---

$JO
.TE DOTEST.FT
.KOM DOTEST<DOTEST
.LADE DOTEST,TTY:<DOTEST,DINODA
.EXEC DOTEST
$EN

---