removed old main file sofun.F