1
0
forked from GitHub/gf-core

know_VQ in resource

This commit is contained in:
aarne
2010-08-27 15:14:29 +00:00
parent d329d3b9d8
commit 6bc21c1d7a
17 changed files with 19 additions and 4 deletions

View File

@@ -39,7 +39,7 @@ incomplete concrete QuestionRomance of Question =
let
ord = case q of {
QDir => DInv ;
QIndir => DDir
QIndir => DInv
} ;
cls = cl.s ! ord ! t ! a ! p ! Indic ;
why = iadv.s