66 lines
3.4 KiB
HTML
66 lines
3.4 KiB
HTML
<html>
|
|
<head>
|
|
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
|
|
<link rel="stylesheet" href="../coverage.css"/> <title> walkmap/polygon.clj </title>
|
|
</head>
|
|
<body>
|
|
<span class="covered" title="1 out of 1 forms covered">
|
|
001 (ns walkmap.polygon
|
|
</span><br/>
|
|
<span class="not-tracked" title="0 out of 0 forms covered">
|
|
002 "Essentially the specification for things we shall consider to be polygons."
|
|
</span><br/>
|
|
<span class="not-tracked" title="0 out of 0 forms covered">
|
|
003 (:require [walkmap.vertex :refer [vertex?]]))
|
|
</span><br/>
|
|
<span class="blank" title="0 out of 0 forms covered">
|
|
004
|
|
</span><br/>
|
|
<span class="covered" title="1 out of 1 forms covered">
|
|
005 (defn polygon?
|
|
</span><br/>
|
|
<span class="not-tracked" title="0 out of 0 forms covered">
|
|
006 "True if `o` satisfies the conditions for a polygon. A polygon shall be a
|
|
</span><br/>
|
|
<span class="not-tracked" title="0 out of 0 forms covered">
|
|
007 map which has a value for the key `:vertices`, where that value is a sequence
|
|
</span><br/>
|
|
<span class="not-tracked" title="0 out of 0 forms covered">
|
|
008 of vertices."
|
|
</span><br/>
|
|
<span class="not-tracked" title="0 out of 0 forms covered">
|
|
009 [o]
|
|
</span><br/>
|
|
<span class="covered" title="1 out of 1 forms covered">
|
|
010 (let
|
|
</span><br/>
|
|
<span class="covered" title="3 out of 3 forms covered">
|
|
011 [v (:vertices o)]
|
|
</span><br/>
|
|
<span class="partial" title="17 out of 22 forms covered">
|
|
012 (and
|
|
</span><br/>
|
|
<span class="covered" title="3 out of 3 forms covered">
|
|
013 (coll? v)
|
|
</span><br/>
|
|
<span class="covered" title="6 out of 6 forms covered">
|
|
014 (> (count v) 2)
|
|
</span><br/>
|
|
<span class="covered" title="4 out of 4 forms covered">
|
|
015 (every? vertex? v)
|
|
</span><br/>
|
|
<span class="covered" title="3 out of 3 forms covered">
|
|
016 (:id o)
|
|
</span><br/>
|
|
<span class="covered" title="9 out of 9 forms covered">
|
|
017 (or (nil? (:kind o)) (= (:kind o) :polygon)))))
|
|
</span><br/>
|
|
<span class="blank" title="0 out of 0 forms covered">
|
|
018
|
|
</span><br/>
|
|
<span class="blank" title="0 out of 0 forms covered">
|
|
019
|
|
</span><br/>
|
|
</body>
|
|
</html>
|