diff options
author | Joris | 2016-10-02 15:34:27 +0200 |
---|---|---|
committer | Joris | 2016-10-02 15:34:27 +0200 |
commit | 3a1cbfe23a3d06c3c30828c623a089868cff0670 (patch) | |
tree | 2c81f1f218f92656fdb2026ffedb423d9d06b76a /src/Model/Color.elm | |
parent | fbab0129f902bf2c3ef07c92deb7674384c18424 (diff) |
Add saw-tooth move and multiple moves per level
Diffstat (limited to 'src/Model/Color.elm')
-rw-r--r-- | src/Model/Color.elm | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/src/Model/Color.elm b/src/Model/Color.elm deleted file mode 100644 index 49ece2b..0000000 --- a/src/Model/Color.elm +++ /dev/null @@ -1,22 +0,0 @@ -module Model.Color exposing - ( Color - , htmlOutput - , mergeColors - ) - -type alias Color = - { red : Int - , green : Int - , blue : Int - } - -htmlOutput : Color -> String -htmlOutput color = "rgb(" ++ (toString color.red) ++ ", " ++ (toString color.green) ++ ", " ++ (toString color.blue) ++ ")" - -mergeColors : Float -> Color -> Color -> Color -mergeColors ratio c1 c2 = - let mergePart x y = truncate (ratio * (toFloat x) + (1 - ratio) * (toFloat y)) - in { red = mergePart c1.red c2.red - , green = mergePart c1.green c2.green - , blue = mergePart c1.blue c2.blue - } |