--# -path=.:../common:../abstract concrete ExtendSom of Extend = {} ; -- CatSom ** ExtendFunctor -- with (Grammar=GrammarSom) -- ** open Prelude, ResSom in { -- } ;