temp
F18_init.prg