concrete SystemEng of System = open Prelude in { lin Bye = ss "bye" ; }