X-Git-Url: https://gitweb.michael.orlitzky.com/?p=spline3.git;a=blobdiff_plain;f=src%2FTetrahedron.hs;fp=src%2FTetrahedron.hs;h=09b042d9c27e6d7d2611508082fdabe2136e0519;hp=4bc86581bf0491cf7d8a66bfbcf7f019b66aa3b7;hb=dbb641b1534f7b3a24d5b6f4479b91f1fd681c54;hpb=b99812f0461140689e148251856825d61e68902b

diff --git a/src/Tetrahedron.hs b/src/Tetrahedron.hs
index 4bc8658..09b042d 100644
--- a/src/Tetrahedron.hs
+++ b/src/Tetrahedron.hs
@@ -1,3 +1,7 @@
+-- The local "coefficient" function defined within the "c" function
+-- pattern matches on a bunch of integers, but doesn't handle the
+-- "otherwise" case for performance reasons.
+{-# OPTIONS_GHC -Wno-incomplete-patterns #-}
 {-# LANGUAGE BangPatterns #-}
 
 module Tetrahedron (