unrename

coerce.rkt

@@ -0,0 +1,4 @@
+#lang racket/base
+
+(require "coerce/values.rkt" "coerce/contracts.rkt")
+(provide (all-from-out "coerce/values.rkt" "coerce/contracts.rkt"))

coercion.rkt

@@ -1,4 +0,0 @@
-#lang racket/base
-
-(require "coercion/values.rkt" "coercion/contracts.rkt")
-(provide (all-from-out "coercion/values.rkt" "coercion/contracts.rkt"))

container.rkt

@@ -1,6 +1,6 @@
 #lang racket/base
 (require "define/contract.rkt")
-(require "coercion.rkt" "len.rkt" racket/list)
+(require "coerce.rkt" "len.rkt" racket/list)
 
 (define (sliceable-container? x)
   (ormap (λ(proc) (proc x)) (list list? string? symbol? vector?)))

list.rkt

@@ -1,6 +1,6 @@
 #lang racket/base
 (require racket/list racket/set)
-(require "define/contract.rkt" "len.rkt" "coercion/values.rkt")
+(require "define/contract.rkt" "len.rkt" "coerce/values.rkt")
 
 (define+provide/contract (trim items test-proc)
   (list? procedure? . -> . list?)

main.rkt

@@ -1,7 +1,7 @@
 #lang racket/base
 
 (require
-  "coercion.rkt"
+  "coerce.rkt"
   "container.rkt"
   "debug.rkt"
   "define.rkt"
@@ -16,7 +16,7 @@
 
 (provide 
  (all-from-out
-  "coercion.rkt"
+  "coerce.rkt"
   "container.rkt"
   "debug.rkt"
   "define.rkt"

scribble.rkt

@@ -1,6 +1,6 @@
 #lang racket
 (require (for-syntax racket/base))
-(require "coercion/values.rkt")
+(require "coerce/values.rkt")
 
 (provide when/block)
 

string.rkt

@@ -1,5 +1,5 @@
 #lang racket/base
-(require "define/contract.rkt" "coercion.rkt")
+(require "define/contract.rkt" "coerce.rkt")
 
 
 (define+provide/contract (starts-with? str starter)