Revision ee9724b9 Ganeti/HTools/Types.hs

b/Ganeti/HTools/Types.hs
31 31 
    , Weight
32 32 
    , DynUtil(..)
33 33 
    , zeroUtil
34 
    , baseUtil
34 35 
    , addUtil
35 36 
    , subUtil
36 37 
    , Placement
......
75 76 
zeroUtil = DynUtil { cpuWeight = 0, memWeight = 0
76 77 
                   , dskWeight = 0, netWeight = 0 }
77 78 

  		





  
  79
  
    
baseUtil :: DynUtil


  		





  
  80
  
    
baseUtil = DynUtil { cpuWeight = 1, memWeight = 1


  		





  
  81
  
    
                   , dskWeight = 1, netWeight = 1 }


  		





  
  82
  
    

  		





  78
  83
  
    
addUtil :: DynUtil -> DynUtil -> DynUtil


  		





  79
  84
  
    
addUtil (DynUtil a1 a2 a3 a4) (DynUtil b1 b2 b3 b4) =


  		





  80
  85
  
    
    DynUtil (a1+b1) (a2+b2) (a3+b3) (a4+b4)


  		












Also available in:
  Unified diff