Globally assign attachment orientations

src/Dodge/Data/ComposedItem.hs

@@ -9,8 +9,6 @@ import Dodge.Data.AmmoType
 import Dodge.Data.DoubleTree
 import Control.Lens
 import Dodge.Data.Item
-import Geometry.Data
-import Linear.Quaternion (Quaternion (..))
 
 data CLinkType
     = AmmoInLink Int AmmoType
@@ -69,7 +67,8 @@ type CItem = (Item, ItemStructuralFunction, LinkTest)
 
 data ItemLink = ILink
     { _iatType :: CLinkType
-    , _iatOrient :: Item -> CLinkType -> Item -> (Point3, Quaternion Float)
+--    , _iatOrient :: Item -> CLinkType -> Item -> (Point3, Quaternion Float)
+--    , _iatOrient :: Item -> CLinkType -> (Point3, Quaternion Float)
     }
 
 -- this should possibly use a full item structure tree rather than a