|
/# Rosetta Code problem: http://rosettacode.org/wiki/Priority_queue
|
|
by Galileo, 05/2022 #/
|
|
|
|
include ..\Utilitys.pmt
|
|
|
|
( )
|
|
( 3 "Clear drains" ) 0 put ( 4 "Feed cat" ) 0 put ( 5 "Make tea" ) 0 put ( 1 "Solve RC tasks" ) 0 put ( 2 "Tax return" ) 0 put
|
|
sort pop swap print pstack
|