i12Tests :: TestTree
i12Tests = decisionTestGroup "i12" "If-None-Match exists?"
  [ testCase "True ==> i13" $
      let rq = req { reqHeaders = HashMap.singleton hIfNoneMatch ["webcrank"] }
      in after' i12 resource rq @?= Decision' "i13"
  , testCase "False ==> l13" $
      after' i12 resource req @?= Decision' "l13"
  ]
i12Tests :: TestTree
i12Tests = decisionTestGroup "i12" "If-None-Match exists?"
  [ testCase "True ==> i13" $
      let rq = req { reqHeaders = HashMap.singleton hIfNoneMatch ["webcrank"] }
      in after' i12 resource rq @?= Decision' "i13"
  , testCase "False ==> l13" $
      after' i12 resource req @?= Decision' "l13"
  ]
i12Tests = decisionTestGroup "i12" "If-None-Match exists?"
  [ testCase "True ==> i13" $
      let rq = req { reqHeaders = HashMap.singleton hIfNoneMatch ["webcrank"] }
      in after' i12 resource rq @?= Decision' "i13"
  , testCase "False ==> l13" $
      after' i12 resource req @?= Decision' "l13"
  ]