Help for this page
use Quantum::Superpositions; @a = qw(-true -depth=1); ... print "right" unless eigenstates(any(@a) ne all(@b)); print "wrong" unless eigenstates(any(@c) ne all(@b));
right