Initial data commit

Task/Priority-queue/Picat/priority-queue-1.picat

@@ -0,0 +1,17 @@
+main =>
+  Tasks = [[3,"Clear drains"],
+           [4,"Feed cat"],
+           [5,"Make tea"],
+           [1,"Solve RC tasks"],
+           [2,"Tax return"]],
+  Heap = new_min_heap([]),
+  foreach(Task in Tasks)
+     Heap.heap_push(Task),
+     println(top=Heap.heap_top())
+  end,
+  nl,
+  println(Heap),
+  println(size=Heap.heap_size),
+  nl,
+  println("Pop the elements from the queue:"),
+  println([Heap.heap_pop() : _ in 1..Heap.heap_size]).