├── .gitattributes ├── .gitignore ├── README.md └── spf64 ├── F.F ├── MM.F ├── Makefile ├── amain.o ├── clibs.c ├── clibs.o ├── clibs ├── fork.c └── sock.c ├── main.c ├── main.lss ├── main.o ├── messy.map ├── spf ├── CCC.F ├── TT.F ├── _af │ └── lib │ │ └── comments.f ├── _mak │ ├── CompIF.f │ ├── CompIF1.f │ ├── DIS486.F │ ├── acceptgo.f │ ├── author.txt │ ├── case.f │ ├── djgpp │ │ └── gdis.f │ ├── do_want.f │ ├── lib │ │ ├── csr.f │ │ ├── disassem.fth │ │ ├── locals-ans2.f │ │ ├── locals4.f │ │ └── map.f │ ├── listing3.f │ ├── temps4.f │ ├── utils.f │ ├── utils_.f │ ├── want.f │ └── ~af │ │ └── lib │ │ └── c │ │ └── zstr.f ├── _nn │ └── lib │ │ └── ifdef.f ├── amain.S ├── bbuild.sh ├── build.sh ├── contst.f ├── float.cc ├── img.s ├── img.ss ├── lib │ ├── SPF.eng.ERR │ ├── asm │ │ ├── 486asm.f │ │ └── asmmac.f │ ├── ext │ │ ├── case.f │ │ ├── disasm.f │ │ ├── help.f │ │ ├── onoff.f │ │ ├── patch.f │ │ ├── spf-asm.f │ │ └── vocs.f │ └── include │ │ ├── core-ext.f │ │ ├── string.f │ │ └── tools.f ├── spf.err ├── spforig └── src │ ├── compiler │ ├── spf_compile.f │ ├── spf_compile0.f │ ├── spf_defwords.f │ ├── spf_error.f │ ├── spf_find.f │ ├── spf_immed_control.f │ ├── spf_immed_lit.f │ ├── spf_immed_loop.f │ ├── spf_immed_transl.f │ ├── spf_literal.f │ ├── spf_modules.f │ ├── spf_parser.f │ ├── spf_read_source.f │ ├── spf_translate.f │ ├── spf_wordlist.f │ └── spf_words.f │ ├── global.f │ ├── gspf.f │ ├── gspf0.f │ ├── linux │ ├── spf_linux_con_io.f │ ├── spf_linux_const.f │ ├── spf_linux_envir.f │ ├── spf_linux_except.f │ ├── spf_linux_io.f │ └── spf_linux_memory.f │ ├── spf.err │ ├── spf_con_io.f │ ├── spf_defkern.f │ ├── spf_except.f │ ├── spf_floatkern.f │ ├── spf_forthproc_hl.f │ ├── spf_init.f │ ├── spf_last.f │ ├── spf_print.f │ └── tc_spfopt.f ├── spf64 ├── spf64.lss └── tst.sh /.gitattributes: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/.gitattributes -------------------------------------------------------------------------------- /.gitignore: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/.gitignore -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/README.md -------------------------------------------------------------------------------- /spf64/F.F: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/F.F -------------------------------------------------------------------------------- /spf64/MM.F: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/MM.F -------------------------------------------------------------------------------- /spf64/Makefile: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/Makefile -------------------------------------------------------------------------------- /spf64/amain.o: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/amain.o -------------------------------------------------------------------------------- /spf64/clibs.c: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/clibs.c -------------------------------------------------------------------------------- /spf64/clibs.o: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/clibs.o -------------------------------------------------------------------------------- /spf64/clibs/fork.c: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/clibs/fork.c -------------------------------------------------------------------------------- /spf64/clibs/sock.c: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/clibs/sock.c -------------------------------------------------------------------------------- /spf64/main.c: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/main.c -------------------------------------------------------------------------------- /spf64/main.lss: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/main.lss -------------------------------------------------------------------------------- /spf64/main.o: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/main.o -------------------------------------------------------------------------------- /spf64/messy.map: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/messy.map -------------------------------------------------------------------------------- /spf64/spf/CCC.F: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/CCC.F -------------------------------------------------------------------------------- /spf64/spf/TT.F: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/TT.F -------------------------------------------------------------------------------- /spf64/spf/_af/lib/comments.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_af/lib/comments.f -------------------------------------------------------------------------------- /spf64/spf/_mak/CompIF.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/CompIF.f -------------------------------------------------------------------------------- /spf64/spf/_mak/CompIF1.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/CompIF1.f -------------------------------------------------------------------------------- /spf64/spf/_mak/DIS486.F: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/DIS486.F -------------------------------------------------------------------------------- /spf64/spf/_mak/acceptgo.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/acceptgo.f -------------------------------------------------------------------------------- /spf64/spf/_mak/author.txt: -------------------------------------------------------------------------------- 1 | Mihail Maksimov [mak@rtc.ru] 2 | -------------------------------------------------------------------------------- /spf64/spf/_mak/case.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/case.f -------------------------------------------------------------------------------- /spf64/spf/_mak/djgpp/gdis.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/djgpp/gdis.f -------------------------------------------------------------------------------- /spf64/spf/_mak/do_want.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/do_want.f -------------------------------------------------------------------------------- /spf64/spf/_mak/lib/csr.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/lib/csr.f -------------------------------------------------------------------------------- /spf64/spf/_mak/lib/disassem.fth: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/lib/disassem.fth -------------------------------------------------------------------------------- /spf64/spf/_mak/lib/locals-ans2.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/lib/locals-ans2.f -------------------------------------------------------------------------------- /spf64/spf/_mak/lib/locals4.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/lib/locals4.f -------------------------------------------------------------------------------- /spf64/spf/_mak/lib/map.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/lib/map.f -------------------------------------------------------------------------------- /spf64/spf/_mak/listing3.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/listing3.f -------------------------------------------------------------------------------- /spf64/spf/_mak/temps4.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/temps4.f -------------------------------------------------------------------------------- /spf64/spf/_mak/utils.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/utils.f -------------------------------------------------------------------------------- /spf64/spf/_mak/utils_.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/utils_.f -------------------------------------------------------------------------------- /spf64/spf/_mak/want.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/want.f -------------------------------------------------------------------------------- /spf64/spf/_mak/~af/lib/c/zstr.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_mak/~af/lib/c/zstr.f -------------------------------------------------------------------------------- /spf64/spf/_nn/lib/ifdef.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/_nn/lib/ifdef.f -------------------------------------------------------------------------------- /spf64/spf/amain.S: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/amain.S -------------------------------------------------------------------------------- /spf64/spf/bbuild.sh: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/bbuild.sh -------------------------------------------------------------------------------- /spf64/spf/build.sh: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/build.sh -------------------------------------------------------------------------------- /spf64/spf/contst.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/contst.f -------------------------------------------------------------------------------- /spf64/spf/float.cc: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/float.cc -------------------------------------------------------------------------------- /spf64/spf/img.s: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/img.s -------------------------------------------------------------------------------- /spf64/spf/img.ss: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/img.ss -------------------------------------------------------------------------------- /spf64/spf/lib/SPF.eng.ERR: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/SPF.eng.ERR -------------------------------------------------------------------------------- /spf64/spf/lib/asm/486asm.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/asm/486asm.f -------------------------------------------------------------------------------- /spf64/spf/lib/asm/asmmac.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/asm/asmmac.f -------------------------------------------------------------------------------- /spf64/spf/lib/ext/case.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/ext/case.f -------------------------------------------------------------------------------- /spf64/spf/lib/ext/disasm.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/ext/disasm.f -------------------------------------------------------------------------------- /spf64/spf/lib/ext/help.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/ext/help.f -------------------------------------------------------------------------------- /spf64/spf/lib/ext/onoff.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/ext/onoff.f -------------------------------------------------------------------------------- /spf64/spf/lib/ext/patch.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/ext/patch.f -------------------------------------------------------------------------------- /spf64/spf/lib/ext/spf-asm.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/ext/spf-asm.f -------------------------------------------------------------------------------- /spf64/spf/lib/ext/vocs.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/ext/vocs.f -------------------------------------------------------------------------------- /spf64/spf/lib/include/core-ext.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/include/core-ext.f -------------------------------------------------------------------------------- /spf64/spf/lib/include/string.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/include/string.f -------------------------------------------------------------------------------- /spf64/spf/lib/include/tools.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/lib/include/tools.f -------------------------------------------------------------------------------- /spf64/spf/spf.err: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/spf.err -------------------------------------------------------------------------------- /spf64/spf/spforig: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/spforig -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_compile.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_compile.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_compile0.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_compile0.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_defwords.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_defwords.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_error.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_error.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_find.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_find.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_immed_control.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_immed_control.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_immed_lit.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_immed_lit.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_immed_loop.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_immed_loop.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_immed_transl.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_immed_transl.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_literal.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_literal.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_modules.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_modules.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_parser.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_parser.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_read_source.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_read_source.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_translate.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_translate.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_wordlist.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_wordlist.f -------------------------------------------------------------------------------- /spf64/spf/src/compiler/spf_words.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/compiler/spf_words.f -------------------------------------------------------------------------------- /spf64/spf/src/global.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/global.f -------------------------------------------------------------------------------- /spf64/spf/src/gspf.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/gspf.f -------------------------------------------------------------------------------- /spf64/spf/src/gspf0.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/gspf0.f -------------------------------------------------------------------------------- /spf64/spf/src/linux/spf_linux_con_io.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/linux/spf_linux_con_io.f -------------------------------------------------------------------------------- /spf64/spf/src/linux/spf_linux_const.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/linux/spf_linux_const.f -------------------------------------------------------------------------------- /spf64/spf/src/linux/spf_linux_envir.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/linux/spf_linux_envir.f -------------------------------------------------------------------------------- /spf64/spf/src/linux/spf_linux_except.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/linux/spf_linux_except.f -------------------------------------------------------------------------------- /spf64/spf/src/linux/spf_linux_io.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/linux/spf_linux_io.f -------------------------------------------------------------------------------- /spf64/spf/src/linux/spf_linux_memory.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/linux/spf_linux_memory.f -------------------------------------------------------------------------------- /spf64/spf/src/spf.err: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf.err -------------------------------------------------------------------------------- /spf64/spf/src/spf_con_io.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf_con_io.f -------------------------------------------------------------------------------- /spf64/spf/src/spf_defkern.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf_defkern.f -------------------------------------------------------------------------------- /spf64/spf/src/spf_except.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf_except.f -------------------------------------------------------------------------------- /spf64/spf/src/spf_floatkern.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf_floatkern.f -------------------------------------------------------------------------------- /spf64/spf/src/spf_forthproc_hl.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf_forthproc_hl.f -------------------------------------------------------------------------------- /spf64/spf/src/spf_init.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf_init.f -------------------------------------------------------------------------------- /spf64/spf/src/spf_last.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf_last.f -------------------------------------------------------------------------------- /spf64/spf/src/spf_print.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/spf_print.f -------------------------------------------------------------------------------- /spf64/spf/src/tc_spfopt.f: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf/src/tc_spfopt.f -------------------------------------------------------------------------------- /spf64/spf64: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf64 -------------------------------------------------------------------------------- /spf64/spf64.lss: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/VoidVolker/spf64/HEAD/spf64/spf64.lss -------------------------------------------------------------------------------- /spf64/tst.sh: -------------------------------------------------------------------------------- 1 | cd spf 2 | ../GTK4th ../MM.F \ & --------------------------------------------------------------------------------