Tcl - Operadores Lógicos

A tabela a seguir mostra todos os operadores lógicos suportados pela linguagem Tcl. Assumir variávelA detém 1 e variável B segura 0, então -

Operador	Descrição	Exemplo
&&	Operador lógico chamado AND. Se ambos os operandos forem diferentes de zero, a condição se torna verdadeira.	(A && B) é falso.
||	Operador lógico ou chamado. Se qualquer um dos dois operandos for diferente de zero, a condição se torna verdadeira.	(A || B) é verdade.
!	Operador lógico chamado NOT. Use para reverter o estado lógico de seu operando. Se uma condição for verdadeira, o operador lógico NOT tornará falso.	! (A && B) é verdade.

Exemplo

Experimente o seguinte exemplo para entender todos os operadores lógicos disponíveis na linguagem Tcl -

#!/usr/bin/tclsh

set a  5
set b 20

if { $a && $b } {
   puts "Line 1 - Condition is true\n"
}
if { $a || $b } {
   puts "Line 2 - Condition is true\n"
}
# lets change the value of  a and b 
set a  0
set b 10
if { $a && $b } {
   puts "Line 3 - Condition is true\n"
} else {
   puts "Line 3 - Condition is not true\n" 
}
if { !($a && $b) } {
   puts "Line 4 - Condition is true\n" 
}

Quando você compila e executa o programa acima, ele produz o seguinte resultado -

Line 1 - Condition is true

Line 2 - Condition is true

Line 3 - Condition is not true

Line 4 - Condition is true