/** This file is part of Shapes.
 **
 ** Shapes is free software: you can redistribute it and/or modify
 ** it under the terms of the GNU General Public License as published by
 ** the Free Software Foundation, either version 3 of the License, or
 ** any later version.
 **
 ** Shapes is distributed in the hope that it will be useful,
 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 ** GNU General Public License for more details.
 **
 ** You should have received a copy of the GNU General Public License
 ** along with Shapes.  If not, see <http://www.gnu.org/licenses/>.
 **
 ** Copyright 2008, 2010, 2014, 2015 Henrik Tidefelt
 **/

##lookin ..Shapes

helper: \ •dst rng →
{
  •dst << `== ´ << [Debug..sourceof rng] << ` ==´ << "{n} << `-->´
      << [rng.foldl \ p e → ( p + `  ´ + [String..show e] ) `´]
      << "{nn}
}

{
  /**
   ** Note that the end value is included in the range of integers...
   **/
  [helper IO..•stdout Debug..locate[][Data..range '3 '10]]
}
{
  /**
   ** ... while it may not be in the range of floats (depending on how the rounding errors come out).
   **/
  [helper IO..•stdout Debug..locate[][Data..range 3 10]]
}

{
  /**
   ** Lengths are just like floats, but one must provide the step length:
   **/
  [helper IO..•stdout Debug..locate[][Data..range 3mm 10mm 1mm]]
}


/**
 ** The following ranges are just examples of how the arguments can be combined.
 **/

{
  [helper IO..•stdout Debug..locate[][Data..range ~4cm 4cm count:'11]]
}

{
  [helper IO..•stdout Debug..locate[][Data..range end:'10 step:'~3 count:'5]]
}