use v6-alpha; use Test; use v6; use Test; plan 1; # P48 (**) Truth tables for logical expressions (3). # # Generalize problem P47 in such a way that the logical expression may contain # any number of logical variables. Define table/2 in a way that table(List,Expr) # prints the truth table for the expression Expr, which contains the logical # variables enumerated in List. # # Example: # * table([A,B,C], A and (B or C) equ A and B or A and C). # true true true true # true true fail true # true fail true true # true fail fail true # fail true true true # fail true fail true # fail fail true true # fail fail fail true if 1 { skip 1, "Test(s) not yet written: (**) Truth tables for logical expressions (3)."; } else { ok 1, '(**) Truth tables for logical expressions (3).'; }