-- pascal consult --