nichkara/lace
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

math.algebra.linear.d3: Handle case in 'unProject' where 'world_Position (4) = 0.0'.

Browse Source
This commit is contained in:
Rod Kay
2024-01-09 16:56:47 +11:00
parent d86438fe5b
commit ee2108ad2b
1 changed files with 6 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
1-base/math/source/generic/pure/algebra/any_math-any_algebra-any_linear-any_d3.adb
View File

@@ -880,13 +880,14 @@ is
if world_Position (4) = 0.0 if world_Position (4) = 0.0
then then
raise Constraint_Error with "unProject: world_Position (4) = 0.0"; world_Position (4) := Real'Epsilon;
else -- raise Constraint_Error with "unProject: world_Position (4) = 0.0"; -- TODO: Find out why this happens.
world_Position (1) := world_Position (1) / world_Position (4);
world_Position (2) := world_Position (2) / world_Position (4);
world_Position (3) := world_Position (3) / world_Position (4);
end if; end if;
world_Position (1) := world_Position (1) / world_Position (4);
world_Position (2) := world_Position (2) / world_Position (4);
world_Position (3) := world_Position (3) / world_Position (4);
return Vector_3 (world_Position (1 .. 3)); return Vector_3 (world_Position (1 .. 3));
end unProject; end unProject;