http://www.adaconcept.com/programs/ontozorendszeres_szimulacio/szimulacio.ads
package Szimulacio is pragma Pure; end Szimulacio;