summaryrefslogtreecommitdiff
path: root/examples/attempto/LexAttemptoIta.gf
diff options
context:
space:
mode:
Diffstat (limited to 'examples/attempto/LexAttemptoIta.gf')
-rw-r--r--examples/attempto/LexAttemptoIta.gf33
1 files changed, 0 insertions, 33 deletions
diff --git a/examples/attempto/LexAttemptoIta.gf b/examples/attempto/LexAttemptoIta.gf
deleted file mode 100644
index 09d71999f..000000000
--- a/examples/attempto/LexAttemptoIta.gf
+++ /dev/null
@@ -1,33 +0,0 @@
-instance LexAttemptoIta of LexAttempto =
- open ExtraIta, SyntaxIta, ParadigmsIta, ConstructX,
- MakeStructuralIta, (P = Prelude)
- in {
-
-oper
- possible_A = mkA "possibile" ;
- necessary_A = mkA "necessario" ;
- own_A = mkA "proprio" ;
- have_VV = SyntaxIta.must_VV ;
- provably_Adv = mkAdv "dimostrabilmente" ;
- provable_A = mkA "dimostrabile" ;
- false_A = mkA "falso" ;
- such_A = mkA "tale" ;
-
- genitiveNP np cn = mkNP (mkNP the_Art cn) (SyntaxIta.mkAdv possess_Prep np) ;
-
- each_Det = every_Det ; ----
-
- that_Subj = mkSubj "che" ;
-
- comma_and_Conj = mkConj [] ", e" plural ;
- comma_or_Conj = mkConj [] ", o" singular ;
- slash_Conj = mkConj [] "/" singular ;
-
- whose_IDet = mkIDet (mkIQuant "de chi") ; ----
-
- eachOf np = mkNP (mkPredet "ciascuno" "ciascuna" genitive P.True) np ;
-
- adj_thatCl : A -> S -> Cl = \a,s ->
- mkCl (mkVP (mkVP (mkAP a)) (SyntaxIta.mkAdv that_Subj s)) ;
-
-}