Min Antara Max

min3 :: Int->Int->Int->Int
min3 a b c
    | (a>b)&&(c>b) = b
    | (a>c)&&(b>c) = c
    | (b>a)&&(c>a) = a

max3 :: Int->Int->Int->Int
max3 a b c
    | (a>b)&&(a>c) = a
    | (b>a)&&(b>c) = b
    | (c>a)&&(c>b) = c


nilaiantara :: Int -> Int ->Int -> Int
nilaiantara a b c = (a+b+c) - (min3 a b c) - (max3 a b c)