TCL/TK - Operadores

Os operadores matemáticos e lógicos suportados por Tcl são os seguintes, em ordem de precedência:  

Operador	Significado
- ~ !	Negativo, Não bit a bit, Negação lógica
* / %	Multiplicação, divisão, parte inteira da divisão
<< >>	Deslocamento de bits à esquerda, Deslocamento de bits à direita
< > <= >=	Menor, Maior, menor ou igual, maior ou igual
== !=	Igual( comparação lógica ), diferente
&	E (AND) bit a bit
^	OU EXCLUSIVO( XOR ) bit a bit
|	OU( OR ) bit a bit
&&	E lógico( AND )
||	OU lógico( OR )
x ? y : z	Se x então y, caso contrário, z

Tcl também suporta as seguintes funções matemáticas através do comando expr:

Função	Significado
abs	Módulo
acos	Arco-cosseno
asin	Arco-seno
atan	Arco-tangente
atan2	Arco-tangente
ceil	Arredonda para maior
cos	Cosseno
cosh	Cosseno hyperbólico
double	Transforma em um número de dupla precisão
exp	Calcula o número e elevado a x
floor	Arredonda para menor
fmod	Calcula o resto de uma divisão
hypod	Calcula a hypotenusa de um triângulo retângulo
int	Converte em inteiro
log	Calcula o logarítimo natural de x
log10	Calcula o logarítimo na base 10 de x
pow	x elevado a y
rand	Gera um número aleatório
round	Arredonda um número
sin	Seno
sinh	Seno hyperbólico
sqrt	Raiz quadrada
tan	Tangente
tanh	Tangente hyperbólico

Para realizar uma operação matemática basta passar a expressão para o comando expr: puts [expr 2 + 3 * (1 + sin(32))] Exibirá no console: 6.65428004373