d $! DO	FREE
È $!		Show the free blocks of the disk
,$
$ show dev/mou
ô$ write sys$output "                                       ",-
X  "               max=131680"
è$ show magtape mt