summaryrefslogtreecommitdiff
path: root/grammars/multiple/UserCityEng.gf
blob: a30b815107ed08a4179cb1dd946e4998ec68e86e (plain)
1
2
3
4
5
6
concrete UserCityEng of UserCity = UserEng, CityEng ** open Prelude in
  {
  lin
    QDistance x y = ss (["what is the distance from"] ++ x.s ++ "to" ++ y.s) ;
  }