Revision 00b15752 Ganeti/HTools/Node.hs

b/Ganeti/HTools/Node.hs
64 64 
later via the 'setIdx' and 'buildPeers' functions.
65 65 

  		





  66
  66
  
    
-}


  		





  67
  
  
    
create :: Double -> Int -> Int -> Double -> Int -> Node


  		





  68
  
  
    
create mem_t_init mem_n_init mem_f_init dsk_t_init dsk_f_init =


  		





  
  67
  
    
create :: Double -> Int -> Int -> Double -> Int -> Bool -> Node


  		





  
  68
  
    
create mem_t_init mem_n_init mem_f_init dsk_t_init dsk_f_init


  		





  
  69
  
    
       offline_init =


  		





  69
  70
  
    
    Node


  		





  70
  71
  
    
    {


  		





  71
  72
  
    
      t_mem = mem_t_init,


  		





  ......




  82
  83
  
    
      p_mem = (fromIntegral mem_f_init) / mem_t_init,


  		





  83
  84
  
    
      p_dsk = (fromIntegral dsk_f_init) / dsk_t_init,


  		





  84
  85
  
    
      p_rem = 0,


  		





  85
  
  
    
      offline = False,


  		





  
  86
  
    
      offline = offline_init,


  		





  86
  87
  
    
      x_mem = 0


  		





  87
  88
  
    
    }


  		





  88
  89
  
    

  		












Also available in:
  Unified diff