Select Code to Download

#This program read the triplets from file named "data" into
#an array of array.
...
print "induced=$qw\n";

}

b c a
a c d
d e b

----TRIPLETS-------
$VAR1 = [
          [
...
component 1 = c b a
b c a
induced=3

component 2 = e d
component 1 = c b a
induced=b c a