Ternary logic: Difference between revisions
Content added Content deleted
m (→note added) |
|||
| Line 1,729: | Line 1,729: | ||
=={{header|Free Pascal}}== |
=={{header|Free Pascal}}== |
||
Free Pascal version with lookup. |
Free Pascal version with lookup. |
||
Note that for implication and equivalence there are two versions, one lookup and one applied logic as proof. |
|||
<lang pascal>program ternarytests; |
<lang pascal>program ternarytests; |
||
{$mode objfpc} |
{$mode objfpc} |
||
| Line 1,891: | Line 1,892: | ||
U|TUU |
U|TUU |
||
F|TTT</pre> |
F|TTT</pre> |
||
=={{header|Go}}== |
=={{header|Go}}== |
||