haskell - Happstack の取り扱い

Question

happstack でフォームを解析していますが、サーバー上のフォーム変数をより簡潔に収集する方法がわかりません。ここで必要なコードの量を減らすためのトリックがあるかどうかは誰にもわかりませんか?

 formHandler = do
    method POST
    delA1       <- look "address-01-delivery"
    delA2       <- look "address-02-delivery"
    delSuburb   <- look "suburb-delivery"
    delPostcode <- look "postcode-delivery"
    delState    <- look "state-delivery"
    delCountry  <- look "country-delivery"

    bilA1       <- look "address-01-billing"
    bilA2       <- look "address-02-billing"
    bilSuburb   <- look "suburb-billing"
    bilPostcode <- look "postcode-billing"
    bilState    <- look "state-billing"
    bilCountry  <- look "country-billing"