-
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
-- Copyright 2026 Shota FUJI
--
-- This Source Code Form is subject to the terms of the Mozilla Public
-- License, v. 2.0. If a copy of the MPL was not distributed with this
-- file, You can obtain one at https://mozilla.org/MPL/2.0/.
--
-- SPDX-License-Identifier: MPL-2.0
module Template.Layout.Coordinate exposing (..)
type alias Point2D =
{ x : Float, y : Float }
type alias Size =
{ width : Float, height : Float }
type Request a
= Exactly a
| AtLeast a
type alias SizeRequest =
{ width : Request Float, height : Request Float }
minSizeOf : SizeRequest -> Size
minSizeOf s =
{ width =
case s.width of
Exactly w ->
w
AtLeast w ->
w
, height =
case s.height of
Exactly h ->
h
AtLeast h ->
h
}