fugafuga.write

日々のログ

2018-01-03から1日間の記事一覧

すごいH本 part34

モジュールを作る Geometry.hs module Geometry ( sphereVolume , sphereArea , cubeVolume , cubeArea , cuboidArea , cuboidVolume ) where sphereVolume :: Float -> Float sphereVolume radius = (4.0 / 3.0) * pi * (radius ^ 3) sphereArea :: Float -…