#description: skip_me

=comment

Setup for non-spiral stair types. This is not run by itself,
but included in stair scripts.

=cut

use POSIX;

$stairheight;

$maxheight=$mb_parms->{'Max stair height'}+0;

$maxheight=0.75 if($maxheight==0);

$numstairs=0;
do {
 ++$numstairs;
 $stairheight=($h/$numstairs);
 #$stairheight=floor(($stairheight*16)+.5)/16;
} while ($stairheight>$maxheight);
$stairwidth=$w/$numstairs;
$laststairheight=$h-($stairheight*($numstairs-1));
