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

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