/lucid-math

Primary LanguageHaskellOtherNOASSERTION

lucid-math

DSL for MathML Core in Haskell as an extension of the DSL lucid2 for HTML.

exampleFromCoreSpec :: Html ()
exampleFromCoreSpec = math_ [displayBlock_] do
    mrow_ do
        munderover_ do
            mo_ "∑"
            mrow_ (mi_ "n" *> mo_ "=" *> mn_ "1")
            mrow_ (mo_ "+" *> mn_ "∞")
        mfrac_ do
            mn_ "1"
            msup_ (mi_ "i" *> mn_ "2")
    mo_ "="
    mfrac_ do
        msup_ (mi_ "π" *> mn_ "2")
        mn_ "6"