mirror of
https://github.com/Smaug123/ray-tracing-fsharp
synced 2025-10-12 07:18:39 +00:00
21 lines
424 B
FSharp
21 lines
424 B
FSharp
namespace RayTracing
|
|
|
|
type Ray
|
|
|
|
[<RequireQualifiedAccess>]
|
|
module Ray =
|
|
val make' : Point -> Vector -> Ray option
|
|
val make : Point -> UnitVector -> Ray
|
|
|
|
val walkAlong : Ray -> float -> Point
|
|
|
|
val between : Point -> Point -> Ray option
|
|
|
|
val parallelTo : Point -> Ray -> Ray
|
|
|
|
val liesOn : Point -> Ray -> bool
|
|
|
|
val vector : Ray -> UnitVector
|
|
val origin : Ray -> Point
|
|
|
|
val flip : Ray -> Ray |