send←⍈ ⍝ I can't type those easily so give them names
recv←⍇
prompt←6⍴' '
session←{
	(task data)←{1 ⍵} recv ⍬
	⎕rawio←{¯1≡⍵:'???:' ⋄ ⍵,':'} task ⎕tasks 1
	⎕rawio←data
	⍞rawio←prompt
	∇⍵
}

⎕←'Welcome to APL9'
⍞rawio←prompt

⎕session←session&'session'⊢⍬