@@ -1077,7 +1077,7 @@ opRightToDocs localizer category op tipe expected =
1077 ( D.reflow $ "I cannot send this through the (<|) pipe:"
1077 ( D.reflow $ "I cannot send this through the (<|) pipe:"
1078 , typeComparison localizer tipe expected
1078 , typeComparison localizer tipe expected
1079 "The argument is:"
1079 "The argument is:"
1080− "But (<|) is piping it a function that expects:"
1080+ "But (<|) is piping it to a function that expects:"
@@ -1088,7 +1088,7 @@ opRightToDocs localizer category op tipe expected =
1088 ( D.reflow $ "This function cannot handle the argument sent through the (|>) pipe:"
1088 ( D.reflow $ "This function cannot handle the argument sent through the (|>) pipe:"
1089 , typeComparison localizer argType expectedArgType
1089 , typeComparison localizer argType expectedArgType
1090 "The argument is:"
1090 "The argument is:"
1091− "But (|>) is piping it a function that expects:"
1091+ "But (|>) is piping it to a function that expects:"