(load-relative "sig.ss")
(compound-unit/sig (import (A : args^))
  (link
   [S : struct^ ((load-relative "struct.ss"))]
   [T : ui^ ((load-relative "text.ss") S)]
   [R : top^ ((load-relative "run.ss") A S T)])
  (export (open R)))