Revision 8bc34c7b htools/Ganeti/HTools/Simu.hs

b/htools/Ganeti/HTools/Simu.hs
6 6 

  		





  7
  7
  
    
{-


  		





  8
  8
  
    

  		





  9
  
  
    
Copyright (C) 2009, 2010, 2011 Google Inc.


  		





  
  9
  
    
Copyright (C) 2009, 2010, 2011, 2012 Google Inc.


  		





  10
  10
  
    

  		





  11
  11
  
    
This program is free software; you can redistribute it and/or modify


  		





  12
  12
  
    
it under the terms of the GNU General Public License as published by


  		





  ......




  74
  74
  
    
                     Node.create (printf "node-%02d-%03d" grpIndex idx)


  		





  75
  75
  
    
                           (fromIntegral mem) 0 mem


  		





  76
  76
  
    
                           (fromIntegral disk) disk


  		





  77
  
  
    
                           (fromIntegral cpu) False grpIndex


  		





  
  77
  
    
                           (fromIntegral cpu) False 1 grpIndex


  		





  78
  78
  
    
                  ) [1..ncount]


  		





  79
  79
  
    
      grp = Group.create (printf "group-%02d" grpIndex)


  		





  80
  80
  
    
            (printf "fake-uuid-%02d" grpIndex) apol defIPolicy


  		












Also available in:
  Unified diff