Revision a80bf544

b/Ganeti/HTools/Utils.hs
25 25
    (
26 26
      debug
27 27
    , sepSplit
28
    , fst3
28 29
    , varianceCoeff
29 30
    , commaJoin
30 31
    , readEitherString
......
72 73
commaSplit :: String -> [String]
73 74
commaSplit = sepSplit ','
74 75

  
76
-- | Simple version of 'fst' for a triple
77
fst3 :: (a, b, c) -> a
78
fst3 (a, _, _) = a
79

  
75 80
-- * Mathematical functions
76 81

  
77 82
-- Simple and slow statistical functions, please replace with better versions

Also available in: Unified diff