gf - GFの動詞句の接続詞

Question

問題

It's sunny on Monday and rainy on TuesdayRGLを使用してGFで文を生成しようとしてい ます。RGL ページでこの文を生成する方法を探しましたが、これに役立つものは見つかりませんでした。Extend.gfGF の詳細について GitHub で確認したところ、次の 3 行が見つかりました。

    MkVPS      : Temp -> Pol -> VP -> VPS ;  -- hasn't slept
    ConjVPS    : Conj -> [VPS] -> VPS ;      -- has walked and won't sleep
    PredVPS    : NP   -> VPS -> S ;          -- she [has walked and won't sleep]

一見有望そうに見えたのですが、実際のコードに実装してみると、どうやら誤用のようです[VPS]。私のコード:

mkPhr(PredVPS
        (it_NP)
        (ConjVPS
            (and_Conj)
            (MkVPS
                (mkTemp (futureTense) (simultaneousAnt))
                (positivePol)
                (mkVP
                    (mkVP (mkA "sunny"))
                    (SyntaxEng.mkAdv (on_Prep) (mkNP (mkN ("Monday"))))))
            (MkVPS
                (mkTemp (futureTense) (simultaneousAnt))
                (positivePol)
                (mkVP
                    (mkVP (mkA "rainy"))
                    (SyntaxEng.mkAdv (on_Prep) (mkNP (mkN ("Tuesday"))))))));

しかし、私はこのエラーに遭遇しました。これは明らかに、定義された変数と期待される変数の問題です。

missing record fields: s1, s2 type of MkVPS (mkTemp futureTense simultaneousAnt) positivePol (AdvVP ((\a -> UseComp (CompAP (PositA a))) (regA "rainy")) (PrepNP on_Prep ((\n -> MassNP (UseN n)) (regN "Monday"))))
      expected: {s1 : ResEng.Agr => Str; s2 : ResEng.Agr => Str}
      inferred: {s : ResEng.Agr => Str; lock_VPS : {}}

質問

正しい使い方は[VPS]？