provide from unstable instead of main lens collection

lens/private/struct/main.rkt

@@ -1,3 +1,5 @@
-#lang reprovide
+#lang sweet-exp reprovide
 "field.rkt"
-"struct.rkt"
+except-in "struct.rkt"
+  struct-lenses-out
+  struct+lenses-out

lens/private/struct/struct.scrbl

@@ -19,13 +19,3 @@
     (lens-view foo-a-lens (foo 1 2 3))
     (lens-set foo-a-lens (foo 1 2 3) 100)
 ]}
-
-@defform[(struct-lenses-out struct-id)]{
-A @racket[provide] sub-form that provides the lenses defined by
-@racket[define-struct-lenses] or @racket[struct/lens].
-}
-
-@defform[(struct+lenses-out struct-id)]{
-A @racket[provide] sub-form short for using both @racket[struct-out] and
-@racket[struct-lenses-out].
-}

unstable/lens/main.rkt

@@ -13,6 +13,7 @@
 "string-split.rkt"
 "struct-join.rkt"
 "struct-nested.rkt"
+"struct-provide.rkt"
 "sublist.rkt"
 "syntax.rkt"
 "view-set.rkt"

unstable/lens/main.scrbl

@@ -26,6 +26,7 @@ this library being backwards-compatible.
   "string-split.scrbl"
   "struct-join.scrbl"
   "struct-nested.scrbl"
+  "struct-provide.scrbl"
   "sublist.scrbl"
   "syntax.scrbl"
   "view-set.scrbl"

unstable/lens/struct-provide.rkt

@@ -0,0 +1,4 @@
+#lang sweet-exp reprovide
+only-in lens/private/struct/struct
+  struct-lenses-out
+  struct+lenses-out

unstable/lens/struct-provide.scrbl

@@ -0,0 +1,17 @@
+#lang scribble/manual
+
+@(require lens/private/doc-util/main)
+
+@title{Struct-lens provide forms}
+
+@defmodule[unstable/lens/struct-provide]
+
+@defform[(struct-lenses-out struct-id)]{
+A @racket[provide] sub-form that provides the lenses defined by
+@racket[define-struct-lenses] or @racket[struct/lens].
+}
+
+@defform[(struct+lenses-out struct-id)]{
+A @racket[provide] sub-form short for using both @racket[struct-out] and
+@racket[struct-lenses-out].
+}