diff --git a/src/CSS/Selector.purs b/src/CSS/Selector.purs
index 850962b..a2ce281 100644
--- a/src/CSS/Selector.purs
+++ b/src/CSS/Selector.purs
@@ -69,12 +69,12 @@ element e = Selector (Refinement []) (Elem e)
 
 deep :: Selector -> Selector -> Selector
 deep a b = Selector (Refinement []) (Deep a b)
-infix 0 deep as **
+infix 6 deep as **
 
 child :: Selector -> Selector -> Selector
 child a b = Selector (Refinement []) (PathChild a b)
-infix 0 child as |>
+infix 6 child as |>
 
 with :: Selector -> Refinement -> Selector
 with (Selector (Refinement fs) e) (Refinement ps) = Selector (Refinement (fs <> ps)) e
-infix 0 child as ##
+infix 6 with as ##
diff --git a/test/Main.purs b/test/Main.purs
index ed5214e..c86a116 100644
--- a/test/Main.purs
+++ b/test/Main.purs
@@ -4,7 +4,7 @@ import Prelude
 
 import Effect (Effect)
 import Effect.Exception (error, throwException)
-import CSS (Rendered, Path(..), Predicate(..), Refinement(..), Selector(..), FontFaceSrc(..), FontFaceFormat(..), renderedSheet, renderedInline, fromString, selector, block, display, render, borderBox, boxSizing, contentBox, blue, color, body, px, dashed, border, inlineBlock, red, (?), fontFaceSrc, zIndex)
+import CSS (Rendered, Path(..), Predicate(..), Refinement(..), Selector(..), FontFaceSrc(..), FontFaceFormat(..), renderedSheet, renderedInline, fromString, selector, block, display, render, borderBox, boxSizing, contentBox, blue, color, body, a, p, px, dashed, border, inlineBlock, red, (?), (##), (|>), (**), hover, fontFaceSrc, zIndex)
 import Data.Maybe (Maybe(..))
 import Data.NonEmpty (singleton)
 
@@ -41,6 +41,23 @@ example7 :: Rendered
 example7 = render do
   zIndex 11
 
+withSelector :: Rendered
+withSelector = render do
+  a ? do
+    color blue
+  a ## hover ? do
+    color red
+
+childSelector :: Rendered
+childSelector = render do
+  p |> a ? do
+    zIndex 9
+
+deepSelector :: Rendered
+deepSelector = render do
+  p ** a ? do
+    display block
+
 nestedNodes :: Rendered
 nestedNodes = render do
   fromString "#parent" ? do
@@ -69,6 +86,10 @@ main = do
 
   renderedInline example5 `assertEqual` Just "box-sizing: content-box; box-sizing: border-box"
 
+  renderedSheet withSelector `assertEqual` Just "a { color: hsl(240.0, 100.0%, 50.0%) }\na:hover { color: hsl(0.0, 100.0%, 50.0%) }\n"
+  renderedSheet childSelector `assertEqual` Just "p > a { z-index: 9 }\n"
+  renderedSheet deepSelector `assertEqual` Just "p a { display: block }\n"
+
   renderedSheet nestedNodes `assertEqual` Just "#parent { display: block }\n#parent #child { display: block }\n"
 
   renderedSheet nestedNodesWithEmptyParent `assertEqual` Just "#parent #child { display: block }\n"