concrete GeographyEng of Geography = MidLevelOntologyEng ** open DictLangEng, DictEng, ParadigmsEng in {

lin
  NaturalSatellite = AdjCN (PositA natural_A) (UseN satellite_N) ;
  Planet = UseN planet_N ;
  Satellite = UseN satellite_N ;

}