Imported Upstream version 6.6.0.89

Former-commit-id: b39a328747c2f3414dc52e009fb6f0aa80ca2492

external/api-doc-tools/mdoc/mdoc.Test/mdoc.Test.FSharp/Library1.fs

@@ -0,0 +1,29 @@
+namespace mdoc.Test.FSharp
+
+type Class1() = 
+    member this.X = "F#"
+
+    member this.T = Functions.function6(1, "32")
+
+type ClassPipes() = 
+    let cylinderVolume (radius : float) (length : float) : float = radius * length
+    let smallPipeRadius = 2.0
+    let bigPipeRadius = 3.0
+
+    // These define functions that take the length as a remaining
+    // argument:
+
+    let smallPipeVolume = cylinderVolume(smallPipeRadius)
+    let bigPipeVolume = cylinderVolume bigPipeRadius
+
+    let length1 = 30.0
+    let length2 = 40.0
+    member this.smallPipeVol1 = smallPipeVolume length1
+    member this.smallPipeVol2 = smallPipeVolume length2
+    member this.bigPipeVol1 = bigPipeVolume length1
+    member this.bigPipeVol2 = bigPipeVolume length2
+    member this.ff = Quotations.Var.Global("", typedefof<ClassPipes>)
+    //member this.ff2 = Quotations.Var.Global "" typedefof<ClassPipes>
+    member this.ff3 = Array.blit 
+    //member this.ff4 = Array.averageBy None None
+