fork(4) download
  1. type
  2. Geometry = concept g
  3. area(g) is float64
  4. perim(g) is float64
  5. Rect = tuple
  6. width, height: float64
  7.  
  8. proc area(r: Rect): float64 = r.width * r.height
  9. proc perim(r: Rect): float64 = 2 * r.width + 2 * r.height
Success #stdin #stdout 0s 2372KB
stdin
Standard input is empty
stdout
Standard output is empty