$ proc = f$env("procedure")
$ defdir = f$parse(proc,,,"device") + f$parse(proc,,,"directory")
$ scalac :== @'defdir'scala.com compile
$ scala :== @'defdir'scala.com runner
$ scaladoc :== @'defdir'scala.com doc
$ scalap :== @'defdir'scala.com print
$ exit