From f5461eb3d4eb2605b546a4ed202c12bcdaa1f4e4 Mon Sep 17 00:00:00 2001 From: "john.j.camilleri" Date: Mon, 16 Sep 2013 07:17:27 +0000 Subject: Remove contribs and examples Everything has now been moved to a separate repository at https://github.com/GrammaticalFramework/gf-contrib The contents of the examples folder are build during SetupWeb --- examples/peacekeeping/PeaceCatI.gf | 31 ------------------------------- 1 file changed, 31 deletions(-) delete mode 100644 examples/peacekeeping/PeaceCatI.gf (limited to 'examples/peacekeeping/PeaceCatI.gf') diff --git a/examples/peacekeeping/PeaceCatI.gf b/examples/peacekeeping/PeaceCatI.gf deleted file mode 100644 index 7941de276..000000000 --- a/examples/peacekeeping/PeaceCatI.gf +++ /dev/null @@ -1,31 +0,0 @@ -incomplete concrete PeaceCatI of PeaceCat = - open Lang, PeaceRes, Prelude in { - - lincat - N = N; A = A; V = V; V2 = V2; V3 = V3; Pron = Pron; - Card = Card ; Art = Art ; --a - IP = IP; IAdv = IAdv; - Adv = Adv; NP = NP; CN = CN; Imp = Imp; Det = Det; Num = Num; - - MassN = N ; - Phrase = { s : Str; p : Punct } ; - PhraseWritten = { s : Str } ; - PhraseSpoken = { s : Str } ; - - Sent = {s : SForm => Str} ; - Quest = { s : Str } ; - MassCN = CN ; - - lin - Written x = mkWritten x.s x.p ; - Spoken x = { s = x.s } ; - - oper - mkWritten : Str -> Punct -> { s : Str } ; - mkWritten x p = case p of { - FullStop => { s = x ++ "." } ; --TFullStop (ss s) TEmpty ; - QuestMark => { s = x ++ "?" } ; --TQuestMark (ss s) TEmpty ; - ExclMark => { s = x ++ "!" } --TExclMark (ss s) TEmpty - } ; - -} -- cgit v1.2.3