1
0
forked from GitHub/gf-rgl

remove unnecessary noMerge

This commit is contained in:
Inari Listenmaa
2018-01-11 18:36:46 +01:00
parent 0bce34d243
commit 8c8adb014a

View File

@@ -29,7 +29,7 @@ concrete QuestionDut of Question = CatDut ** open ResDut in {
s = \\t,a,p => s = \\t,a,p =>
let let
cls = slash.s ! t ! a ! p ; cls = slash.s ! t ! a ! p ;
who = appPrep slash.c2 (noMerge ** ip) who = appPrep slash.c2 ip
in table { in table {
QDir => who ++ cls ! Inv ; QDir => who ++ cls ! Inv ;
QIndir => who ++ cls ! Sub QIndir => who ++ cls ! Sub