|
1 | 1 | ^{:nextjournal.clerk/visibility {:code :hide}}
|
2 | 2 | (ns notebooks.rando-planner
|
| 3 | + {:nextjournal.clerk/toc true} |
3 | 4 | (:require [rando-planner.gpx :as gpx]
|
4 | 5 | [rando-planner.plan :as plan]
|
5 | 6 | [rando-planner.diagram :as diagram]
|
6 | 7 | [rando-planner.leaflet :as leaflet]
|
7 | 8 | [nextjournal.clerk :as clerk]))
|
8 | 9 |
|
9 | 10 |
|
10 |
| -;; #### Custom viewers for [Clerk](https://github.com/nextjournal/clerk) for planning multi-day bike routes |
11 |
| - |
12 | 11 | ^{:nextjournal.clerk/visibility {:code :hide}}
|
13 | 12 | (clerk/image "rando-planner-index.png")
|
14 | 13 |
|
15 | 14 | ;; # [rando-planner](https://github.com/larsen/rando-planner) 🚲
|
16 | 15 |
|
| 16 | +;; Custom viewers for [Clerk](https://github.com/nextjournal/clerk) for planning multi-day bike routes |
| 17 | + |
17 | 18 | ^{:nextjournal.clerk/visibility {:code :hide}}
|
18 | 19 | (let [example-plan {:gpx "gpx/be-rostock.gpx"
|
19 | 20 | :average-speed 20
|
|
27 | 28 | {:start "16:00" :type :ride :length 2.5}]}]}]
|
28 | 29 | (merge
|
29 | 30 | {:nextjournal/width :full}
|
30 |
| - (clerk/row |
31 |
| - (clerk/col |
32 |
| - (clerk/with-viewer diagram/elevation-viewer example-plan)) |
33 |
| - (clerk/col |
34 |
| - (clerk/with-viewer diagram/plan-viewer example-plan))))) |
| 31 | + (clerk/col |
| 32 | + (clerk/with-viewer diagram/elevation-viewer example-plan) |
| 33 | + (clerk/with-viewer diagram/plan-viewer example-plan)))) |
35 | 34 |
|
36 | 35 |
|
37 | 36 | ;; When planning a long-distance bike ride, you face two main
|
@@ -289,3 +288,17 @@ be morale-crushing."]])
|
289 | 288 | ;; - `:start`: This key denotes the starting time of an activity, in the format "HH:mm"
|
290 | 289 | ;; - `:type`: This key specifies the type of activity. At the moment only the type "ride" is in use. This key is reserved for future uses
|
291 | 290 | ;; - `:length`: This key represents the duration or length of the activity, expressed in hours. It is expected to be a numerical value.
|
| 291 | + |
| 292 | +;; ## Available visualizers |
| 293 | + |
| 294 | +;; ### Elevation viewer |
| 295 | + |
| 296 | +(clerk/with-viewer diagram/elevation-viewer equally-split-plan-with-pauses) |
| 297 | + |
| 298 | +;; ### Leaflet GPX viewer |
| 299 | + |
| 300 | +(clerk/with-viewer leaflet/leaflet-gpx-viewer equally-split-plan-with-pauses) |
| 301 | + |
| 302 | +;; ### Plan viewer |
| 303 | + |
| 304 | +(clerk/with-viewer diagram/plan-viewer equally-split-plan-with-pauses) |
0 commit comments