##- # Author: Brian Tiffin # Dedicated to the public domain # # Date: October 2016 # Modified: 2016-10-14/14:33-0400 ##+ # # utime.icn, demonstrate setting file access times # procedure main() atime := &now mtime := &now - 4 utime("newfile.txt", atime, mtime) end