| 
#!/dis/sh.dis
# wm/sh
load std 
unmount /mnt/ui
p='/pc'
x=$p/usr/octopus/port/x
ftest -e /mnt/ports/send || { 
	o/ports -m /mnt/ports
	echo '.*' >/mnt/ports/all
	cat /mnt/ports/all &
}
o/mero -m /mnt/ui
mkdir /mnt/ui/s0
l=(o/live  -TP /mnt/ui s0)
$l
o=(o/x  -o /mnt/ui )
echo $o
$o
echo '# to profile:'
echo prof -b -m Wtree 
echo $l
echo prof -f -l -n
 |