# isto é um comentario 
# declarando uma variavel com valor e tipo string

Var diego = "Variavel 1\n"

#imprimindo a variavel 

printf diego

#declarando uma variavel sem valor e tipo unknow

Var rocha 

#assignando um valor a variavel 

rocha = "Variavel 2 com valor assignado\n"

printf rocha

#invertendo os valores 

Var tmp = diego
diego = rocha
rocha = tmp

printf diego
printf rocha

printf "diego --> %1%rocha --> %2%" % diego rocha

#no futuro as funções seram nesse modelo :P

#begin function swap Var *a Var *b
#	Var tmp = a
#	a = b
#	b = tmp
#end function

#begin Main
#	call swap % diego rocha 
#	printf "%1%%2%" % diego rocha
#end Main

# saida 
[diego@localhost /usr/home/diego/Projects/Drl]$ ./drl teste.drl
Variavel 1
Variavel 2 com valor assignado
Variavel 2 com valor assignado
Variavel 1
diego --> Variavel 2 com valor assignado
rocha --> Variavel 1