examples/ugly.boo

   1 #region license
   2 // Copyright (c) 2004, Rodrigo B. de Oliveira (rbo@acm.org)
   3 // All rights reserved.
   4 //
   5 // Redistribution and use in source and binary forms, with or without modification,
   6 // are permitted provided that the following conditions are met:
   7 //
   8 //     * Redistributions of source code must retain the above copyright notice,
   9 //     this list of conditions and the following disclaimer.
  10 //     * Redistributions in binary form must reproduce the above copyright notice,
  11 //     this list of conditions and the following disclaimer in the documentation
  12 //     and/or other materials provided with the distribution.
  13 //     * Neither the name of Rodrigo B. de Oliveira nor the names of its
  14 //     contributors may be used to endorse or promote products derived from this
  15 //     software without specific prior written permission.
  16 //
  17 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" AND
  18 // ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
  19 // WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
  20 // DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE LIABLE
  21 // FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  22 // DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
  23 // SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
  24 // CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
  25 // OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  26 // THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  27 #endregion
  28
  29 def value(x as long, y as long, z as long):
  30         return 2**x * 3**y * 5**z
  31
  32 def ugly(max as int):
  33         uglies = []
  34         counter = 1L
  35         dict = {1L : (0L, 0L, 0L)}
  36
  37         while len(uglies) < max:
  38                 uglies.Add(counter)
  39                 x, y, z = dict[counter] as (long)
  40
  41                 dict[value(x+1, y, z)] = (x+1, y, z)
  42                 dict[value(x, y+1, z)] = (x, y+1, z)
  43                 dict[value(x, y, z+1)] = (x, y, z+1)
  44
  45                 dict.Remove(counter)
  46
  47                 keys = array(long, dict.Count)
  48                 dict.Keys.CopyTo(keys, 0)
  49                 System.Array.Sort(keys)
  50
  51                 counter = keys[0]
  52
  53         return uglies[-1]
  54
  55 iter = 1500
  56 start = date.Now
  57 for i in range(10):
  58         uvalue = ugly(iter)
  59
  60 stop = date.Now
  61 print("${iter} ugly value = ${uvalue} in ${(stop-start).TotalMilliseconds}ms")
  62