(Pes) Remove unnecessary QForm from QS and QCl

Y/N questions are formed the same way in direct and indirect, not like 
English "do you sleep / if you sleep".

src/persian/CatPes.gf

@@ -6,8 +6,8 @@ concrete CatPes of Cat = CommonX ** open ResPes, Prelude in {
 ------ Tensed/Untensed
 
     S  = {s : VVForm => Str} ; -- as a complement to Subj
-    QS = {s : QForm => Str} ;
-    RS = {s : Agr => Str } ; -- c for it clefts
+    QS = {s : Str} ;
+    RS = {s : Agr => Str } ;
     SSlash = {s : VVForm => Str ; c2 : ResPes.Compl} ;
 
 ---- Sentence
@@ -21,7 +21,7 @@ concrete CatPes of Cat = CommonX ** open ResPes, Prelude in {
     Imp = {s : Polarity => ImpForm => Str} ;
 
 ---- Question
-    QCl = {s : ResPes.TAnt => Polarity => QForm => Str} ;
+    QCl = {s : ResPes.TAnt => Polarity => Str} ;
 
     IP = {s: Str ; n : Number};