fly/flightgear
1
0
Fork 0
Code Activity

simplification

Browse source
This commit is contained in:
mfranz 2005-10-30 20:52:54 +00:00
parent 837cf56c1f
commit 7ef74fc1d1
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
utils/Modeller/ac3d-despeckle
View file

@ -10,7 +10,6 @@
# texture area if necessary.
#
use strict;
use POSIX qw(floor);
my $SELF = $0;
$SELF =~ s,.*\/,,;
@ -156,8 +155,8 @@ while (<>) {
$y = 0.0 if $y < 0.0;
$y = 1.0 - $PIXH if $y > 1.0 - $PIXH;
$x -= $x - POSIX::floor($x / $PIXW) * $PIXW;
$y -= $y - POSIX::floor($y / $PIXH) * $PIXH;
$x = int($x / $PIXW) * $PIXW;
$y = int($y / $PIXH) * $PIXH;
$ref0[1] = $x, $ref0[2] = $y;
$ref1[1] = $x + $PIXW;