core, basis, extra: Remove DOS line endings from files.

[factor.git] / basis / models / product / product-docs.factor

diff --git a/basis/models/product/product-docs.factor b/basis/models/product/product-docs.factor
index 29b26159a778fcc0100ca16ab76019bdfa1fe85b..18a4bc5092b5dcea1bf4d58c9702a2427a704f1f 100644 (file)
--- a/basis/models/product/product-docs.factor
+++ b/basis/models/product/product-docs.factor
@@ -1,38 +1,38 @@
-USING: help.syntax help.markup kernel math classes classes.tuple\r
-calendar models ;\r
-IN: models.product\r
-\r
-HELP: product\r
-{ $class-description "Product model values are computed by collecting the values from a sequence of underlying models into a new sequence. Product models are automatically updated when underlying models change. Product models are constructed by " { $link <product> } "."\r
-$nl\r
-"A product model whose children are all " { $link "models-range" } " conforms to the " { $link "range-model-protocol" } " and represents a point in n-dimensional space which is bounded by a rectangle." }\r
-{ $examples\r
-    "The following code displays a pair of sliders, and an updating label showing their current values:"\r
-    { $code\r
-        "USING: models models.product models.range ui.gadgets"\r
-        "ui.gadgets.labels ui.gadgets.packs ui.gadgets.panes"\r
-        "ui.gadgets.sliders ;"\r
-        ""\r
-        ": <funny-model> ( -- model ) 0 10 0 100 1 <range> ;"\r
-        ": <funny-slider> ( model -- slider ) horizontal <slider> ;"\r
-        ""\r
-        "<funny-model> <funny-model> 2array"\r
-        "[ <pile> [ horizontal <slider> add-gadget ] reduce gadget. ]"\r
-        "[ <product> [ unparse ] <arrow> <label-control> gadget. ]"\r
-        "bi"\r
-    }\r
-} ;\r
-\r
-HELP: <product>\r
-{ $values { "models" "a sequence of models" } { "product" "a new " { $link product } } }\r
-{ $description "Creates a new instance of " { $link product } ". The value of the new product model is obtained by mapping the " { $snippet "value" } " slot accessor over the given sequence of models." }\r
-{ $examples "See the example in the documentation for " { $link product } "." } ;\r
-\r
-ARTICLE: "models.product" "Product models"\r
-"Product model values are computed by collecting the values from a sequence of underlying models into a new sequence."\r
-{ $subsections\r
-    product\r
-    <product>\r
-} ;\r
-\r
-ABOUT: "models.product"\r
+USING: help.syntax help.markup kernel math classes classes.tuple
+calendar models ;
+IN: models.product
+
+HELP: product
+{ $class-description "Product model values are computed by collecting the values from a sequence of underlying models into a new sequence. Product models are automatically updated when underlying models change. Product models are constructed by " { $link <product> } "."
+$nl
+"A product model whose children are all " { $link "models-range" } " conforms to the " { $link "range-model-protocol" } " and represents a point in n-dimensional space which is bounded by a rectangle." }
+{ $examples
+    "The following code displays a pair of sliders, and an updating label showing their current values:"
+    { $code
+        "USING: models models.product models.range ui.gadgets"
+        "ui.gadgets.labels ui.gadgets.packs ui.gadgets.panes"
+        "ui.gadgets.sliders ;"
+        ""
+        ": <funny-model> ( -- model ) 0 10 0 100 1 <range> ;"
+        ": <funny-slider> ( model -- slider ) horizontal <slider> ;"
+        ""
+        "<funny-model> <funny-model> 2array"
+        "[ <pile> [ horizontal <slider> add-gadget ] reduce gadget. ]"
+        "[ <product> [ unparse ] <arrow> <label-control> gadget. ]"
+        "bi"
+    }
+} ;
+
+HELP: <product>
+{ $values { "models" "a sequence of models" } { "product" "a new " { $link product } } }
+{ $description "Creates a new instance of " { $link product } ". The value of the new product model is obtained by mapping the " { $snippet "value" } " slot accessor over the given sequence of models." }
+{ $examples "See the example in the documentation for " { $link product } "." } ;
+
+ARTICLE: "models.product" "Product models"
+"Product model values are computed by collecting the values from a sequence of underlying models into a new sequence."
+{ $subsections
+    product
+    <product>
+} ;
+
+ABOUT: "models.product"