##-
# Author: Brian Tiffin
# Dedicated to the public domain
#
# Date: September 2016
# Modified: 2016-10-03/22:59-0400
##+
#
# local.icn, demonstrate local override of global variables
#
global var
procedure main()
    var := 42
    subproc()
    # var will not be changed
    write("var in main: ", var)
end

# create a local "var", global var not normally accessible inside subproc
procedure subproc()
    local var
    var := 84
    write("var in subproc: ", var)
end