The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

Tangle - a quantum state machine

SYNOPSIS

     use Tangle;
     my $q1 = Tangle->new(1,0);
     print "q1 = $q1\n";
     $q1->x_gate;
     print "X(q1) = $q1\n";
     $q1->hadamard;
     print "H(X(q1)) = $q1\n";
    
     my $q2 = Tangle->new(1,0);
     print "q2 = $q2\n";
    
     # perform CNOT($q1 ⊗ $q2)
     $q1->cnot($q2);
    
     print "q1 = $q1\n";
     print "q2 = $q2\n";
    
     $q1->x_gate;
     print "X(q1) = $q1\n";
     print "entanglement causes q2 to automatically changed: $q2\n";

DESCRIPTION

     create Cayley-Dickson constructed numbers and perform math operations on them.
     also creates tensor products.

USAGE

new()

     # create a new Tangle object in the |0> state ...
     my $q1 = Tangle->new(0,1);

cnot()

     # tensors this object onto the given one and flip the second half accordingly ...
     my $q2 = Tangle->new(0,1);
    
     # q1 ⊗ q2
     $q2->cnot($q1);
    
     # both $q and $q2 are now sharing memory so that changes to one will effect the other.

x_gate()

     something

y_gate()

     something

z_gate()

     something

state()

     something

raw_state()

     something

measure()

     something

measures()

     something

SUMMARY

     create Cayley-Dickson constructions

AUTHOR

 Jeffrey B Anderson
 truejeffanderson@gmail.com