Contents

module SpaceAge exposing (Planet(..), ageOn)


type Planet
    = Mercury
    | Venus
    | Earth
    | Mars
    | Jupiter
    | Saturn
    | Uranus
    | Neptune


earthYearInSeconds =
    365.25 * 24 * 60 * 60


ageOn : Planet -> Float -> Float
ageOn planet seconds =
    seconds / secondsPerYear planet


secondsPerYear : Planet -> Float
secondsPerYear planet =
    earthYearInSeconds
        * (case planet of
            Mercury ->
                0.2408467

            Venus ->
                0.61519726

            Earth ->
                1

            Mars ->
                1.8808158

            Jupiter ->
                11.862615

            Saturn ->
                29.447498

            Uranus ->
                84.016846

            Neptune ->
                164.79132
          )

Version data entries

66 entries across 66 versions & 1 rubygems

Version	Path
trackler-2.2.1.180	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.179	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.178	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.177	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.176	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.175	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.174	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.173	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.172	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.171	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.170	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.169	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.167	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.166	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.165	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.164	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.163	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.162	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.161	tracks/elm/exercises/space-age/SpaceAge.example.elm
trackler-2.2.1.160	tracks/elm/exercises/space-age/SpaceAge.example.elm