ryujinx/Opentk
1
0
Fork 0
mirror of https://github.com/Ryujinx/Opentk.git synced 2025-07-06 09:50:32 +00:00
Code Issues Packages Projects Releases Wiki Activity

Added filtering for vector generation to only produce valid vectors.

Browse source
This commit is contained in:
Jarl Gullberg 2017-06-02 20:32:16 +02:00
parent 809e7b4379
commit 28bede6ca1
No known key found for this signature in database
GPG key ID: 750FF6F6BDA72D23
1 changed files with 3 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
tests/OpenTK.Tests/Generators.fs
View file

@ -22,18 +22,21 @@ module private Generators =
singleArb singleArb
|> Gen.two |> Gen.two
|> Gen.map Vector2 |> Gen.map Vector2
|> Gen.filter (fun v -> not <| (Single.IsNaN v.Length || Single.IsInfinity v.Length ))
|> Arb.fromGen |> Arb.fromGen
let vec3 = let vec3 =
singleArb singleArb
|> Gen.three |> Gen.three
|> Gen.map Vector3 |> Gen.map Vector3
|> Gen.filter (fun v -> not <| (Single.IsNaN v.Length || Single.IsInfinity v.Length ))
|> Arb.fromGen |> Arb.fromGen
let vec4 = let vec4 =
singleArb singleArb
|> Gen.four |> Gen.four
|> Gen.map Vector4 |> Gen.map Vector4
|> Gen.filter (fun v -> not <| (Single.IsNaN v.Length || Single.IsInfinity v.Length ))
|> Arb.fromGen |> Arb.fromGen
let quat = let quat =