F# 列出的判别联合子类型

要给出 F# 列出的判别联合子类型的代码示例，首先需要定义一个判别联合类型。以下是一个示例：

type Shape =
    | Circle of float
    | Rectangle of float * float

let calculateArea shape =
    match shape with
    | Circle radius -> Math.PI * radius * radius
    | Rectangle width height -> width * height

let circleArea = calculateArea (Circle 5.0)
printfn "Circle area: %f" circleArea

let rectangleArea = calculateArea (Rectangle 3.0, 4.0)
printfn "Rectangle area: %f" rectangleArea

在上面的代码中，我们定义了一个判别联合类型 Shape，它可以是一个 Circle，包含一个半径，或者是一个 Rectangle，包含宽度和高度。然后，我们定义了一个 calculateArea 函数，根据不同的 Shape 类型计算面积。最后，我们使用 Circle 和 Rectangle 创建两个 Shape 实例，并分别计算它们的面积并打印出来。

这是一个简单的例子来说明 F# 中判别联合子类型的使用。实际上，您可以根据需要定义更多的判别联合子类型，并编写适用的模式匹配代码来处理它们。