tokono.ma
1module Coordinates exposing (..)
2
3-- 🌳
4
5
6type alias Coordinates =
7 { x : Float, y : Float }
8
9
10type alias Viewport =
11 { height : Float
12 , width : Float
13 }
14
15
16
17-- 🔱
18
19
20fromTuple : ( Float, Float ) -> Coordinates
21fromTuple ( x, y ) =
22 { x = x
23 , y = y
24 }
25
26
27toTuple : Coordinates -> ( Float, Float )
28toTuple { x, y } =
29 ( x, y )