Ok, there is the thing ...
I have 2 lists ...
First list @Q where i store all the knots ... of an graf I supose...
ok so the first list is from for ex.: q0 to q1.... ok 2 knots... everything's 
fine... Then second list @Sigma is smth  like $glue (connections) values 
between knots ...
For ex.: @Sigma=(a,b)..
And third list @Delta has elements like (q0,a)={q0,q1}
It means that : q0 has a connection with itself with the value "a" and q0 has a 
connection with the q1 with a value "a"...
And the graf will be like this:

                       a
            ┼─────>q0 ─────────>  q1
            ┼─────╜
              a


now the question is ... how to make smth like next thing ... I should have from 
@Delta all these connections .. May be a list for each knot will have $#Q 
elements (for each knot) for ex.: for the q0=(a,a).
This is the code for now ...

#!/usr/bin/perl -w
print "\n\n\n\nDati nr de varfuri: (nr of knots) \n";
chomp($v=<STDIN>);
my @Q, my @Sigma;
print "Dati elementele Sigma (prin 'Enter') pentru sfarsit apasatzi 
Ctrl-Z:(Sigma elements)\n";
chomp(@Sigma=<STDIN>);
for (my $i=0;$i<$v;$i++)
{
        $Q[$i]="q".$i;
}
print "Elementele [EMAIL PROTECTED] sunt: @Q";
print "\nElementele [EMAIL PROTECTED] sunt: @Sigma";

print "\nDati functia de tranzitie (function Delta) (Delta) dupa model\n
       (q0,1)={q0,q1} shi daca atzi terminat apasatzi tasta 'Enter' : \n";
my @Delta;
chomp(@Delta=<STDIN>);
print "@Delta\n";

that's all And I don't know how to do the rest... HELP ... SOS ... :)

---------------------------------------------
This e-mail was sent using Mail.md




--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to