-
Notifications
You must be signed in to change notification settings - Fork 4
/
default_values.cljc
101 lines (77 loc) · 2.08 KB
/
default_values.cljc
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
(ns brew-bot.default-values
"Default values for beer recipe generators")
(def ^:const common-beer-format-version 1)
(def ^:const amount-cutoff 2.26796) ;; 5 pounds in kilograms
(def ^:const ingredient-amounts
[0.01 0.025 0.05 0.075 0.1])
(def ^:const minimum-ingredient-amount
(apply min ingredient-amounts))
(def ^:const hop-times
[120 90 60 45 30 15 10 5 1])
(def ^:const bittering-hop-time-weights
{120 100.0
90 80.0
60 60.0
45 40.0
30 20.0
15 0.0
10 0.0
5 0.0
1 0.0})
(def ^:const aroma-hop-time-weights
{1 100.0
5 80.0
10 60.0
15 40.0
30 20.0
45 0.0
60 0.0
90 0.0
120 0.0})
(def ^:const both-hop-time-weights
{120 20.0
90 40.0
60 60.0
45 80.0
30 100.0
15 80.0
10 60.0
5 40.0
1 20.0})
(def ^:const bittering-hop-use-weights
{"boil" 200.0
"dry hop" 20.0
"mash" 40.0
"first wort" 40.0
"aroma" 10.0})
(def ^:const aroma-hop-use-weights
{"boil" 200.0
"dry hop" 80.0
"mash" 10.0
"first wort" 10.0
"aroma" 40.0})
(def ^:const both-hop-use-weights
{"boil" 200.0
"dry hop" 80.0
"mash" 10.0
"first wort" 10.0
"aroma" 10.0})
(def ^:const common-beer-format-default-mash
{:name "Single Step Infusion"
:version common-beer-format-version
:grain-temp 22.0
:mash-steps [{:mash-step {:name "Sugar Conversion Step"
:version common-beer-format-version
:type "Infusion"
:step-temp 68.0
:step-time 60.0
:infuse-amount 10.0}}]})
(def ^:const common-beer-format-recipe-defaults
{:name "My Recipe"
:version common-beer-format-version
:brewer "brew-bot"
:batch-size 19 ;; Roughly 5 gallons, common homebrew size
:boil-size 19 ;; Roughly 5 gallons, common homebrew size
:miscs []
:waters []
:mash common-beer-format-default-mash})