(declare (block) (standard-bindings) (extended-bindings))
(begin
  (define std/srfi/146/vector-edit#vector-without
    (lambda (_v1219_ _start1220_ _end1221_)
      (let* ((_size1223_ (vector-length _v1219_))
             (_gap-size1225_ (- _end1221_ _start1220_))
             (_new-size1227_ (- _size1223_ _gap-size1225_))
             (_result1229_ (make-vector _new-size1227_)))
        (vector-copy! _result1229_ '0 _v1219_ '0 _start1220_)
        (vector-copy! _result1229_ _start1220_ _v1219_ _end1221_ _size1223_)
        _result1229_)))
  (define std/srfi/146/vector-edit#vector-replace-one
    (lambda (_v1213_ _i1214_ _e1215_)
      (let ((_result1217_ (vector-copy _v1213_)))
        (vector-set! _result1217_ _i1214_ _e1215_)
        _result1217_))))
