use strict;
use warnings;
use Quantum::Superpositions;

print(Quantum::Superpositions->VERSION(), "\n");

if (all(1,2,3)*any(5,6) < 21)
   { print "no alcohol\n"; }
                
if (all(1,2,3)*any(5,6) < 18)
   { print "no entry\n"; }
                
if (any(1,2,3)*all(5,6) < 18)
   { print "under-age\n" }


print(all(1,2,3)*any(5,6), "\n");
print(all(1,2,3)*any(5,6), "\n");
print(any(1,2,3)*all(5,6), "\n");