Automated Resyntax fixes (#559)

This is an automated change generated by Resyntax.

#### Pass 1

Applied 3 fixes to [`streaming/transducer/base.rkt`](../blob/HEAD/streaming/transducer/base.rkt)

  * Line 9, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 17, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 22, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.

Applied 5 fixes to [`streaming/transducer/testing.rkt`](../blob/HEAD/streaming/transducer/testing.rkt)

  * Line 9, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 14, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 17, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 20, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 23, `tidy-require`: Keep imports in `require` sorted and grouped by phase, with collections before files.

Applied 4 fixes to [`streaming/transducer/private.rkt`](../blob/HEAD/streaming/transducer/private.rkt)

  * Line 11, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 15, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 17, `predicate/c-migration`: The `predicate/c` contract is less clear than a `->` contract and no longer improves performance.
  * Line 19, `tidy-require`: Keep imports in `require` sorted and grouped by phase, with collections before files.

## Summary

Fixed 12 issues in 3 files.

  * Fixed 10 occurrences of `predicate/c-migration`
  * Fixed 2 occurrences of `tidy-require`

Co-authored-by: resyntax-ci[bot] <181813515+resyntax-ci[bot]@users.noreply.github.com>

streaming/transducer/base.rkt

@@ -6,20 +6,20 @@
  (contract-out
   [transduction-state/c flat-contract?]
   [half-closed-transduction-state/c flat-contract?]
-  [transducer? predicate/c]
+  [transducer? (-> any/c boolean?)]
   [transducer-starter (-> transducer? any)]
   [transducer-consumer (-> transducer? any)]
   [transducer-emitter (-> transducer? any)]
   [transducer-half-closer (-> transducer? any)]
   [transducer-half-closed-emitter (-> transducer? any)]
   [transducer-finisher (-> transducer? any)]
   [emission (-> transduction-state/c any/c emission?)]
-  [emission? predicate/c]
+  [emission? (-> any/c boolean?)]
   [emission-state (-> emission? transduction-state/c)]
   [emission-value (-> emission? any/c)]
   [half-closed-emission
    (-> half-closed-transduction-state/c any/c half-closed-emission?)]
-  [half-closed-emission? predicate/c]
+  [half-closed-emission? (-> any/c boolean?)]
   [half-closed-emission-state
    (-> half-closed-emission? half-closed-transduction-state/c)]
   [half-closed-emission-value (-> half-closed-emission? any/c)]

streaming/transducer/private.rkt

@@ -8,15 +8,16 @@
   [in-transduced (-> (sequence/c any/c) transducer? (sequence/c any/c))]
   [mapping (-> (-> any/c any/c) transducer?)]
   [peeking (-> (-> any/c void?) transducer?)]
-  [filtering (-> predicate/c transducer?)]
+  [filtering (-> (-> any/c boolean?) transducer?)]
   [folding (-> (-> any/c any/c any/c) any/c transducer?)]
   [append-mapping (-> (-> any/c (sequence/c any/c)) transducer?)]
   [taking (-> natural? transducer?)]
-  [taking-while (-> predicate/c transducer?)]
+  [taking-while (-> (-> any/c boolean?) transducer?)]
   [dropping (-> natural? transducer?)]
-  [dropping-while (-> predicate/c transducer?)]))
+  [dropping-while (-> (-> any/c boolean?) transducer?)]))
 
-(require racket/bool
+(require guard
+         racket/bool
          racket/list
          racket/match
          racket/math
@@ -25,7 +26,6 @@
          rebellion/base/option
          rebellion/base/variant
          rebellion/collection/list
-         guard
          rebellion/private/static-name
          rebellion/streaming/reducer
          rebellion/streaming/transducer/base

streaming/transducer/testing.rkt

@@ -6,25 +6,25 @@
  (contract-out
   [observing-transduction-events
    (-> transducer? (transducer/c any/c transduction-event?))]
-  [transduction-event? predicate/c]
+  [transduction-event? (-> any/c boolean?)]
   [start-event transduction-event?]
   [half-close-event transduction-event?]
   [finish-event transduction-event?]
   [consume-event (-> any/c consume-event?)]
-  [consume-event? predicate/c]
+  [consume-event? (-> any/c boolean?)]
   [consume-event-value (-> consume-event? any/c)]
   [emit-event (-> any/c emit-event?)]
-  [emit-event? predicate/c]
+  [emit-event? (-> any/c boolean?)]
   [emit-event-value (-> emit-event? any/c)]
   [half-closed-emit-event (-> any/c half-closed-emit-event?)]
-  [half-closed-emit-event? predicate/c]
+  [half-closed-emit-event? (-> any/c boolean?)]
   [half-closed-emit-event-value (-> half-closed-emit-event? any/c)]))
 
-(require rebellion/base/variant
-         guard
+(require guard
+         rebellion/base/variant
          rebellion/private/static-name
-         rebellion/streaming/transducer/private/contract
          rebellion/streaming/transducer/base
+         rebellion/streaming/transducer/private/contract
          rebellion/type/record
          rebellion/type/singleton
          rebellion/type/wrapper)