Example of my procedure-oriented engine