3D-printing/OrcaSlicer
1
0
Fork 0
mirror of https://github.com/SoftFever/OrcaSlicer.git synced 2025-11-02 20:51:23 -07:00
Code Issues Projects Releases Packages Wiki Activity Actions 4

Small fix/improvement for the vertex indexing

Browse source
This commit is contained in:
Alessandro Ranellucci 2012-02-17 14:58:13 +01:00
parent f814ccf062
commit 94c1b043e3
1 changed files with 6 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lib/Slic3r/STL.pm
View file

@ -43,13 +43,14 @@ sub read_file {
my $vertices = [];
{
my %vertices_map = ();
foreach my $facet (@$facets) {
for (my $f = 0; $f <= $#$facets; $f++) {
for (1..3) {
if ($vertices_map{$facet->[$_]}) {
$facet->[$_] = $vertices_map{$facet->[$_]};
my $point_id = join ',', @{$facets->[$f][$_]};
if (exists $vertices_map{$point_id}) {
$facets->[$f][$_] = $vertices_map{$point_id};
} else {
push @$vertices, $facet->[$_];
$facet->[$_] = $vertices_map{$facet->[$_]} = $#$vertices;
push @$vertices, $facets->[$f][$_];
$facets->[$f][$_] = $vertices_map{$point_id} = $#$vertices;
}
}
}