@@ -83,7 +83,9 @@ optimize' cpp = do
83 , inlineVariables
83 , inlineVariables
84 , inlineCommonValues
84 , inlineCommonValues
85 , inlineOperator (C.prelude, (C.$)) $ \f x -> CppApp f [x]
85 , inlineOperator (C.prelude, (C.$)) $ \f x -> CppApp f [x]
86+ , inlineOperator (C.dataFunction, C.apply) $ \f x -> CppApp f [x]
86 , inlineOperator (C.prelude, (C.#)) $ \x f -> CppApp f [x]
87 , inlineOperator (C.prelude, (C.#)) $ \x f -> CppApp f [x]
88+ , inlineOperator (C.dataFunction, C.applyFlipped) $ \x f -> CppApp f [x]
87 , inlineOperator (C.dataArrayUnsafe, C.unsafeIndex) $ flip CppIndexer
89 , inlineOperator (C.dataArrayUnsafe, C.unsafeIndex) $ flip CppIndexer
88 , inlineCommonOperators ]) cpp
90 , inlineCommonOperators ]) cpp