instance AtomGer of Atom = ResourceExtGer ** open ResourceGer, TypesGer in {
  oper SBranch = Order => Str ;
}