Example usage:

xSquared :: View action
xSquared  =
    math_ []
        [ msup_ []
            [ mi_ [] [text "x"]
            , mn_ [] [text "2"]
            ]
        ]

More complex example in mathml.