$ perl ex_marpa_bool_expr_truth_table.pl ex_c
Expression to parse:
A+!B

Parse tree:

(OR (variable A) (NOT (variable B)))

Variables: A, B

TRUTH TABLE

A B : OUT
0 0 : 1
0 1 : 0
1 0 : 1
1 1 : 1

Roboticus@Waubli ~/parse_example
$ perl ex_marpa_bool_expr_truth_table.pl ex_e
Expression to parse:
A*B*C + A*!B*!C + !A*!B

Parse tree:

(OR (OR (AND (AND (variable A) (variable B)) (variable C)) (AND (AND (variable A) (NOT (variable B))) (NOT (variable C)))) (AND (NOT (variable A)) (NOT (variable B))))

Variables: A, B, C

TRUTH TABLE

A B C : OUT
0 0 0 : 1
0 0 1 : 1
0 1 0 : 0
0 1 1 : 0
1 0 0 : 1
1 0 1 : 0
1 1 0 : 0
1 1 1 : 1

Roboticus@Waubli ~/parse_example
$ perl ex_marpa_bool_expr_truth_table.pl ex_f
Expression to parse:
A*B*C+!B+C*A

Parse tree:

(OR (OR (AND (AND (variable A) (variable B)) (variable C)) (NOT (variable B))) (AND (variable C) (variable A)))

Variables: A, B, C

TRUTH TABLE

A B C : OUT
0 0 0 : 1
0 0 1 : 1
0 1 0 : 0
0 1 1 : 0
1 0 0 : 1
1 0 1 : 1
1 1 0 : 0
1 1 1 : 1