1. 1
2. 2
3. 3
4. 4
5. 5
6. 6
7. 7
8. 8
9. 9
10. 10
11. 11
12. 12
13. 13
14. 14
15. 15
16. 16
17. 17
18. 18
19. 19
20. 20
21. 21
22. 22
23. 23
24. 24
25. 25
26. 26
27. 27
28. 28
29. 29
30. 30
31. 31
32. 32
33. 33

-- 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 Parameters.Key exposing (Key(..), toString)


type Key
    = LugWidth
    | BuckleHoleCount
    | BuckleHoleDiameter
    | CanvasMargin


toString : Key -> String
toString key =
    case key of
        LugWidth ->
            "lug-width"

        BuckleHoleCount ->
            "buckle-hole-count"

        BuckleHoleDiameter ->
            "buckle-hole-diameter"

        CanvasMargin ->
            "canvas-margin"