patrick/ray-tracing-fsharp
1
0
Fork 0
mirror of https://github.com/Smaug123/ray-tracing-fsharp synced 2025-10-12 07:18:39 +00:00
Code Issues Packages Projects Releases Wiki Activity

Delete messy code, I should really be PRing this

Browse Source
This commit is contained in:
Patrick Stevens
2021-04-17 00:38:12 +01:00
parent deb806d1c8
commit 5c1b634539
1 changed files with 0 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
RayTracing.Test/TestRay.fs
View File

@@ -67,10 +67,3 @@ module TestRay =
property
|> Prop.forAll (Arb.fromGen (Gen.zip TestUtils.rayGen (Arb.generate<NormalFloat> |> Gen.map NormalFloat.op_Explicit)))
|> Check.QuickThrowOnFailure
[<Test>]
let foo () =
let r = System.Random ()
let fp = FloatProducer r
for i in Array.init 100 (fun _ -> fp.Get ()) |> Array.sort do
printfn "%f" i