hmmmm.scala

sealed trait Shape

case class Rectangle(width: Float, length: Float) extends Shape
case class Circle(radius: Float) extends Shape
case class Prism(width: Tuple2[Float, Float], height: Float) extends Shape

val rect : Shape = Rectangle(1.3f, 10f)

def getShapeHeight(shape: Shape): Float = shape match {
  case Rectangle(_,h) => h
  case Circle(r) => 2.0f * r
  case Prism(_, h) => h
}

// getShapeHeight(rect)

hmmmmm.fs

type Shape =
    | Rectangle of width : float * length : float
    | Circle of radius : float
    | Prism of width : float * float * height : float
  
let rect = Rectangle(length = 1.3, width = 10.0)

let getShapeHeight shape =
    match shape with
    | Rectangle(height = h) -> h
    | Circle(radius = r) -> 2. * r
    | Prism(height = h) -> h

let getShapeHeight  = function
    | Rectangle(length = h) -> h
    | Circle(radius = r) -> 2. * r
    | Prism(height = h) -> h

let getShapeHeight2 = function
    | Rectangle(_,h) -> h
    | Circle(r) -> 2. * r
    | Prism(_,_,h) -> h