How To Calculate Volume analysis using Haskell?

@daisha 

To calculate volume analysis using Haskell, you can follow these steps:

1. Define a data type to represent the shape for which you want to calculate the volume. For example, you can define data types for cubes, cylinders, spheres, etc.

1

data Shape = Cube Float | Cylinder Float Float | Sphere Float

1. Write functions to calculate the volume for each shape. For example, you can write functions that calculate the volume of a cube, cylinder, and sphere respectively.

1
2
3
4
5
6
7
8

cubeVolume :: Float -> Float
cubeVolume s = s * s * s

cylinderVolume :: Float -> Float -> Float
cylinderVolume r h = pi * r * r * h

sphereVolume :: Float -> Float
sphereVolume r = 4/3 * pi * r * r * r

1. Write a function that takes a shape as an input and calculates the volume based on the shape type.

1
2
3
4

calculateVolume :: Shape -> Float
calculateVolume (Cube s) = cubeVolume s
calculateVolume (Cylinder r h) = cylinderVolume r h
calculateVolume (Sphere r) = sphereVolume r

1. Test your functions by creating instances of different shapes and passing them to the calculateVolume function.

1
2
3
4
5
6
7
8

main = do
    let cube = Cube 5
    let cylinder = Cylinder 3 4
    let sphere = Sphere 2
    
    putStrLn $ "Volume of cube: " ++ show (calculateVolume cube)
    putStrLn $ "Volume of cylinder: " ++ show (calculateVolume cylinder)
    putStrLn $ "Volume of sphere: " ++ show (calculateVolume sphere)

When you run this Haskell program, it will calculate the volume of a cube, cylinder, and sphere based on the dimensions provided and print the results to the console.