Skip to content

Commit ed76729

Browse files
committed
Removed another redundant constraint.
1 parent 1facd81 commit ed76729

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/Graphics/Rendering/OpenGL/GL/Evaluators.hs

+1-1
Original file line numberDiff line numberDiff line change
@@ -78,7 +78,7 @@ totalComponents1 :: MapDescriptor d -> Int
7878
totalComponents1 (MapDescriptor _ stride order numComp) =
7979
fromIntegral stride * (fromIntegral order - 1) + fromIntegral numComp
8080

81-
totalComponents2 :: Domain d => MapDescriptor d -> MapDescriptor d -> Int
81+
totalComponents2 :: MapDescriptor d -> MapDescriptor d -> Int
8282
totalComponents2 uDescriptor vDescriptor@(MapDescriptor _ _ _ numComp) =
8383
totalComponents1 uDescriptor + totalComponents1 vDescriptor - fromIntegral numComp
8484

0 commit comments

Comments
 (0)