diff --git a/src/Bulma.purs b/src/Bulma.purs
index 345236b..d715b68 100644
--- a/src/Bulma.purs
+++ b/src/Bulma.purs
@@ -544,6 +544,11 @@ div_content content = HH.div [HP.classes (C.content)] content
 explanation :: forall w i. Array (HH.HTML w i) -> HH.HTML w i
 explanation content = HH.blockquote [HP.classes [HH.ClassName "justified"]] content
 
+quote :: forall w i. Array (HH.HTML w i) -> HH.HTML w i
+quote content = div_content [ explanation content ]
+
+simple_quote :: forall w i. String -> HH.HTML w i
+simple_quote content = quote [ p content ]
 
 tabs :: forall w i. Array HH.ClassName -> Array (HH.HTML w i) -> HH.HTML w i
 tabs classes tab_list = HH.div [HP.classes $ C.tabs <> classes] [HH.ul_ tab_list]