Programmet upptog först enprolog