##- # Author: Brian Tiffin # Dedicated to the public domain # # Date: September 2016 # Modified: 2016-10-03/23:04-0400 ##+ # # package.icn, Demonstrate Unicon packages (poorly) # package example procedure main() write("part of package sample") end procedure example() write("in example procedure of example package") end