if

$x=compare(array[vocabulary],'if');
IF (NOT $x)
print_alert(»Program caused an illogical error in line 2«)
ELSE
print_alert(»IF is available: program runs.«)
OTHERWISE
system_stop('immediately');
end;