From 1ed8fe68bdbd29eeb7b297984678d45fe4755c83 Mon Sep 17 00:00:00 2001 From: zvezdochiot Date: Tue, 9 Feb 2021 10:56:58 +0300 Subject: [PATCH] givens: Makefile: gfortran --- README.md | 1 + givens/Makefile | 20 ------------------ {geolib.pc => src/geolib.pc}/mt/mtchi1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtdec1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtdeca.for | 0 {geolib.pc => src/geolib.pc}/mt/mtelp1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtelp2.for | 0 {geolib.pc => src/geolib.pc}/mt/mtfun1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtfuna.for | 0 {geolib.pc => src/geolib.pc}/mt/mtgso1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtgso2.for | 0 {geolib.pc => src/geolib.pc}/mt/mtinv1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtinva.for | 0 {geolib.pc => src/geolib.pc}/mt/mtkova.for | 0 {geolib.pc => src/geolib.pc}/mt/mtkovp.for | 0 {geolib.pc => src/geolib.pc}/mt/mtkovq.for | 0 {geolib.pc => src/geolib.pc}/mt/mtlin1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtlina.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmct1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmct3.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmcta.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmctc.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmns2.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmns3.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmns4.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmnsb.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmnsc.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmnsd.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmts1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmts2.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmtsa.for | 0 {geolib.pc => src/geolib.pc}/mt/mtmtsb.for | 0 {geolib.pc => src/geolib.pc}/mt/mtnora.for | 0 {geolib.pc => src/geolib.pc}/mt/mtnorb.for | 0 {geolib.pc => src/geolib.pc}/mt/mtort1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtorta.for | 0 {geolib.pc => src/geolib.pc}/mt/mtstu1.for | 0 {geolib.pc => src/geolib.pc}/mt/mtvzp1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngkru1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngkrua.for | 0 {geolib.pc => src/geolib.pc}/ng/ngoos1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngoosa.for | 0 {geolib.pc => src/geolib.pc}/ng/ngppk1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngppka.for | 0 {geolib.pc => src/geolib.pc}/ng/ngprp1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngprpa.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptd1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptd2.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptda.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptdb.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptv1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptva.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptxa.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptxp.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptxq.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptxr.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptz1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngptza.for | 0 {geolib.pc => src/geolib.pc}/ng/ngsmd1.for | 0 {geolib.pc => src/geolib.pc}/ng/ngsmda.for | 0 {geolib.pc => src/geolib.pc}/ngs/ngsdz1.for | 0 {geolib.pc => src/geolib.pc}/ngs/ngsioz.for | 0 {geolib.pc => src/geolib.pc}/ngs/ngsjdz.for | 0 {geolib.pc => src/geolib.pc}/ngs/ngskkl.for | 0 {geolib.pc => src/geolib.pc}/ngs/ngslk1.for | 0 {geolib.pc => src/geolib.pc}/ngs/ngslk2.for | 0 {geolib.pc => src/geolib.pc}/ngs/ngsort.for | 0 {geolib.pc => src/geolib.pc}/ngs/ngsrkl.for | 0 {geolib.pc => src/geolib.pc}/pp/ppbit1.for | 0 {geolib.pc => src/geolib.pc}/pp/ppcmp1.for | 0 {geolib.pc => src/geolib.pc}/pp/ppkmb1.for | 0 {geolib.pc => src/geolib.pc}/pp/ppkoml.for | 0 {geolib.pc => src/geolib.pc}/pp/ppmov1.for | 0 {geolib.pc => src/geolib.pc}/pp/ppres1.for | 0 {geolib.pc => src/geolib.pc}/tr/trafk1.for | 0 {geolib.pc => src/geolib.pc}/tr/trafka.for | 0 {geolib.pc => src/geolib.pc}/tr/trank2.for | 0 {geolib.pc => src/geolib.pc}/tr/trlin1.for | 0 {geolib.pc => src/geolib.pc}/tr/trlina.for | 0 {geolib.pc => src/geolib.pc}/tr/trpdk1.for | 0 {geolib.pc => src/geolib.pc}/tr/trpdka.for | 0 {geolib.pc => src/geolib.pc}/tr/trshk1.for | 0 {geolib.pc => src/geolib.pc}/tr/trshka.for | 0 {geolib.pc => src/geolib.pc}/tt/ttask.for | 0 {geolib.pc => src/geolib.pc}/tt/ttaskd.for | 0 {geolib.pc => src/geolib.pc}/tt/ttaskj.for | 0 {geolib.pc => src/geolib.pc}/tt/ttaskn.for | 0 {geolib.pc => src/geolib.pc}/tt/ttaskr.for | 0 {geolib.pc => src/geolib.pc}/tt/ttasks.for | 0 {geolib.pc => src/geolib.pc}/tt/ttasku.for | 0 {geolib.pc => src/geolib.pc}/tt/ttexit.for | 0 {geolib.pc => src/geolib.pc}/tt/ttlenf.for | 0 {geolib.pc => src/geolib.pc}/tt/ttrol1.for | 0 {geolib.pc => src/geolib.pc}/tt/ttzahl.for | 0 {geolib.pc => src/geolib.pc}/vg/vgpoka.for | 0 {geolib.pc => src/geolib.pc}/vg/vgrdda.for | 0 {geolib.pc => src/geolib.pc}/vg/vgrddb.for | 0 {geolib.pc => src/geolib.pc}/vg/vgrddf.for | 0 {geolib.pc => src/geolib.pc}/vg/vgrdsa.for | 0 {geolib.pc => src/geolib.pc}/vg/vgtrka.for | 0 {getu03 => src/getu03}/gddchw.com | 0 {getu03 => src/getu03}/gdi01w.com | 0 {getu03 => src/getu03}/gdi02w.com | 0 {getu03 => src/getu03}/gdsopt.com | 0 {getu03 => src/getu03}/gdt000.for | 0 {getu03 => src/getu03}/gdta1s.for | 0 {getu03 => src/getu03}/gdta2s.for | 0 {getu03 => src/getu03}/gdta3s.for | 0 {getu03 => src/getu03}/gdta41.for | 0 {getu03 => src/getu03}/gdta5s.for | 0 {getu03 => src/getu03}/gdta62.for | 0 {getu03 => src/getu03}/gdta7s.for | 0 {getu03 => src/getu03}/gdta81.for | 0 {getu03 => src/getu03}/gdta90.for | 0 {getu03 => src/getu03}/gdtamv.for | 0 {getu03 => src/getu03}/gdtan1.for | 0 {getu03 => src/getu03}/gdtann.for | 0 {getu03 => src/getu03}/gdtaoo.for | 0 {getu03 => src/getu03}/gdtasi.for | 0 {getu03 => src/getu03}/gdtat1.for | 0 {getu03 => src/getu03}/gdtatv.for | 0 {getu03 => src/getu03}/gdtavs.for | 0 {getu03 => src/getu03}/gdtavz.for | 0 {getu03 => src/getu03}/gdtbuf.for | 0 {getu03 => src/getu03}/gdtdfs.for | 0 {getu03 => src/getu03}/gdtdif.for | 0 {getu03 => src/getu03}/gdtds1.for | 0 {getu03 => src/getu03}/gdtdsa.for | 0 {getu03 => src/getu03}/gdtdsp.for | 0 {getu03 => src/getu03}/gdteli.for | 0 {getu03 => src/getu03}/gdtexi.for | 0 {getu03 => src/getu03}/gdtext.for | 0 {getu03 => src/getu03}/gdtgzs.for | 0 {getu03 => src/getu03}/gdthcb.for | 0 {getu03 => src/getu03}/gdthpr.for | 0 {getu03 => src/getu03}/gdtiaw.for | 0 {getu03 => src/getu03}/gdticz.for | 0 {getu03 => src/getu03}/gdtinc.for | 0 {getu03 => src/getu03}/gdtind.for | 0 {getu03 => src/getu03}/gdtini.for | 0 {getu03 => src/getu03}/gdtkoe.for | 0 {getu03 => src/getu03}/gdtkon.for | 0 {getu03 => src/getu03}/gdtlin.for | 0 {getu03 => src/getu03}/gdtm01.for | 0 {getu03 => src/getu03}/gdtopv.for | 0 {getu03 => src/getu03}/gdtopw.for | 0 {getu03 => src/getu03}/gdtosn.for | 0 {getu03 => src/getu03}/gdtpau.for | 0 {getu03 => src/getu03}/gdtpgv.for | 0 {getu03 => src/getu03}/gdtpm1.for | 0 {getu03 => src/getu03}/gdtpm2.for | 0 {getu03 => src/getu03}/gdtpm3.for | 0 {getu03 => src/getu03}/gdtpm4.for | 0 {getu03 => src/getu03}/gdtpnv.for | 0 {getu03 => src/getu03}/gdtppk.for | 0 {getu03 => src/getu03}/gdtpr2.for | 0 {getu03 => src/getu03}/gdtpr3.for | 0 {getu03 => src/getu03}/gdtpr4.for | 0 {getu03 => src/getu03}/gdtpvp.for | 0 {getu03 => src/getu03}/gdtqyx.for | 0 {getu03 => src/getu03}/gdtrmp.for | 0 {getu03 => src/getu03}/gdtrr1.for | 0 {getu03 => src/getu03}/gdtrro.for | 0 {getu03 => src/getu03}/gdtrsb.for | 0 {getu03 => src/getu03}/gdtrsx.for | 0 {getu03 => src/getu03}/gdtsch.for | 0 {getu03 => src/getu03}/gdtscp.for | 0 {getu03 => src/getu03}/gdtsds.for | 0 {getu03 => src/getu03}/gdtsez.for | 0 {getu03 => src/getu03}/gdtsks.for | 0 {getu03 => src/getu03}/gdtsme.for | 0 {getu03 => src/getu03}/gdtsow.com | 0 {getu03 => src/getu03}/gdtsr1.for | 0 {getu03 => src/getu03}/gdtsro.for | 0 {getu03 => src/getu03}/gdtsso.for | 0 {getu03 => src/getu03}/gdtstb.for | 0 {getu03 => src/getu03}/gdtstr.for | 0 {getu03 => src/getu03}/gdtsum.for | 0 {getu03 => src/getu03}/gdtsuv.for | 0 {getu03 => src/getu03}/gdtsuw.for | 0 {getu03 => src/getu03}/gdtthl.for | 0 {getu03 => src/getu03}/gdttle.for | 0 {getu03 => src/getu03}/gdttpn.for | 0 {getu03 => src/getu03}/gdttps.for | 0 {getu03 => src/getu03}/gdttpt.for | 0 {getu03 => src/getu03}/gdttvo.for | 0 {getu03 => src/getu03}/gdtulz.for | 0 {getu03 => src/getu03}/gdtuvo.for | 0 {getu03 => src/getu03}/gdtvac.for | 0 {getu03 => src/getu03}/gdtvar.for | 0 {getu03 => src/getu03}/gdtvas.for | 0 {getu03 => src/getu03}/gdtvaw.for | 0 {getu03 => src/getu03}/gdtvc1.for | 0 {getu03 => src/getu03}/gdtvop.for | 0 {getu03 => src/getu03}/gdtvpn.for | 0 {getu03 => src/getu03}/gdtvpo.for | 0 {getu03 => src/getu03}/gdtvso.for | 0 {getu03 => src/getu03}/gdtvy2.for | 0 {getu03 => src/getu03}/gdtwar.for | 0 {getu03 => src/getu03}/gdtwtt.for | 0 {getu03 => src/getu03}/gdtzav.for | 0 {getu03 => src/getu03}/gdtzcb.for | 0 {getu03 => src/getu03}/gdtzcp.for | 0 {getu03 => src/getu03}/gdtzes.for | 0 {getu03 => src/getu03}/gdtzpa.for | 0 {getu03 => src/getu03}/getu03.for | 0 {getu03 => src/getu03}/ladeni.for | 0 {getu03 => src/getu03}/mtgso2.for | 0 src/givens/Makefile | 23 +++++++++++++++++++++ {givens => src/givens}/README.TXT | 0 {givens => src/givens}/data/gope.1 | 0 {givens => src/givens}/data/gope.2 | 0 {givens => src/givens}/data/gope.3 | 0 {givens => src/givens}/data/prch.1 | 0 {givens => src/givens}/data/prch.2 | 0 {givens => src/givens}/data/prch.3 | 0 {givens => src/givens}/data/priklad.1 | 0 {givens => src/givens}/data/priklad.2 | 0 {givens => src/givens}/data/priklad.3 | 0 {givens => src/givens}/givens.for | 0 {givens => src/givens}/gt4lsa.for | 0 {givens => src/givens}/gtdimr.for | 0 {givens => src/givens}/gtfree.for | 0 {givens => src/givens}/gtgetr.for | 0 {givens => src/givens}/gtmnor.for | 0 {givens => src/givens}/gtortm.for | 0 {givens => src/givens}/gtperm.for | 0 {givens => src/givens}/gtperv.for | 0 {givens => src/givens}/gtrad1.for | 0 {givens => src/givens}/gtrans.for | 0 {givens => src/givens}/gtrpar.for | 0 {givens => src/givens}/gtrzs1.for | 0 {givens => src/givens}/gtschr.for | 0 {givens => src/givens}/gtsing.for | 0 {givens => src/givens}/gttime.for | 0 {givens => src/givens}/gtvadj.for | 0 {givens => src/givens}/gtvahk.for | 0 {givens => src/givens}/sparspak.for | 0 {givens => src/givens}/sparspak/fn1wd.for | 0 {givens => src/givens}/sparspak/fnroot.for | 0 {givens => src/givens}/sparspak/gen1wd.for | 0 {givens => src/givens}/sparspak/genqmd.for | 0 {givens => src/givens}/sparspak/qmdmrg.for | 0 {givens => src/givens}/sparspak/qmdqt.for | 0 {givens => src/givens}/sparspak/qmdrch.for | 0 {givens => src/givens}/sparspak/qmdupd.for | 0 {givens => src/givens}/sparspak/rootls.for | 0 {givens => src/givens}/sparspak/smbfct.for | 0 248 files changed, 24 insertions(+), 20 deletions(-) delete mode 100644 givens/Makefile rename {geolib.pc => src/geolib.pc}/mt/mtchi1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtdec1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtdeca.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtelp1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtelp2.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtfun1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtfuna.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtgso1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtgso2.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtinv1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtinva.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtkova.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtkovp.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtkovq.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtlin1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtlina.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmct1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmct3.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmcta.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmctc.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmns2.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmns3.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmns4.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmnsb.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmnsc.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmnsd.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmts1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmts2.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmtsa.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtmtsb.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtnora.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtnorb.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtort1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtorta.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtstu1.for (100%) rename {geolib.pc => src/geolib.pc}/mt/mtvzp1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngkru1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngkrua.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngoos1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngoosa.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngppk1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngppka.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngprp1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngprpa.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptd1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptd2.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptda.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptdb.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptv1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptva.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptxa.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptxp.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptxq.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptxr.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptz1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngptza.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngsmd1.for (100%) rename {geolib.pc => src/geolib.pc}/ng/ngsmda.for (100%) rename {geolib.pc => src/geolib.pc}/ngs/ngsdz1.for (100%) rename {geolib.pc => src/geolib.pc}/ngs/ngsioz.for (100%) rename {geolib.pc => src/geolib.pc}/ngs/ngsjdz.for (100%) rename {geolib.pc => src/geolib.pc}/ngs/ngskkl.for (100%) rename {geolib.pc => src/geolib.pc}/ngs/ngslk1.for (100%) rename {geolib.pc => src/geolib.pc}/ngs/ngslk2.for (100%) rename {geolib.pc => src/geolib.pc}/ngs/ngsort.for (100%) rename {geolib.pc => src/geolib.pc}/ngs/ngsrkl.for (100%) rename {geolib.pc => src/geolib.pc}/pp/ppbit1.for (100%) rename {geolib.pc => src/geolib.pc}/pp/ppcmp1.for (100%) rename {geolib.pc => src/geolib.pc}/pp/ppkmb1.for (100%) rename {geolib.pc => src/geolib.pc}/pp/ppkoml.for (100%) rename {geolib.pc => src/geolib.pc}/pp/ppmov1.for (100%) rename {geolib.pc => src/geolib.pc}/pp/ppres1.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trafk1.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trafka.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trank2.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trlin1.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trlina.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trpdk1.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trpdka.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trshk1.for (100%) rename {geolib.pc => src/geolib.pc}/tr/trshka.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttask.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttaskd.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttaskj.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttaskn.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttaskr.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttasks.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttasku.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttexit.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttlenf.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttrol1.for (100%) rename {geolib.pc => src/geolib.pc}/tt/ttzahl.for (100%) rename {geolib.pc => src/geolib.pc}/vg/vgpoka.for (100%) rename {geolib.pc => src/geolib.pc}/vg/vgrdda.for (100%) rename {geolib.pc => src/geolib.pc}/vg/vgrddb.for (100%) rename {geolib.pc => src/geolib.pc}/vg/vgrddf.for (100%) rename {geolib.pc => src/geolib.pc}/vg/vgrdsa.for (100%) rename {geolib.pc => src/geolib.pc}/vg/vgtrka.for (100%) rename {getu03 => src/getu03}/gddchw.com (100%) rename {getu03 => src/getu03}/gdi01w.com (100%) rename {getu03 => src/getu03}/gdi02w.com (100%) rename {getu03 => src/getu03}/gdsopt.com (100%) rename {getu03 => src/getu03}/gdt000.for (100%) rename {getu03 => src/getu03}/gdta1s.for (100%) rename {getu03 => src/getu03}/gdta2s.for (100%) rename {getu03 => src/getu03}/gdta3s.for (100%) rename {getu03 => src/getu03}/gdta41.for (100%) rename {getu03 => src/getu03}/gdta5s.for (100%) rename {getu03 => src/getu03}/gdta62.for (100%) rename {getu03 => src/getu03}/gdta7s.for (100%) rename {getu03 => src/getu03}/gdta81.for (100%) rename {getu03 => src/getu03}/gdta90.for (100%) rename {getu03 => src/getu03}/gdtamv.for (100%) rename {getu03 => src/getu03}/gdtan1.for (100%) rename {getu03 => src/getu03}/gdtann.for (100%) rename {getu03 => src/getu03}/gdtaoo.for (100%) rename {getu03 => src/getu03}/gdtasi.for (100%) rename {getu03 => src/getu03}/gdtat1.for (100%) rename {getu03 => src/getu03}/gdtatv.for (100%) rename {getu03 => src/getu03}/gdtavs.for (100%) rename {getu03 => src/getu03}/gdtavz.for (100%) rename {getu03 => src/getu03}/gdtbuf.for (100%) rename {getu03 => src/getu03}/gdtdfs.for (100%) rename {getu03 => src/getu03}/gdtdif.for (100%) rename {getu03 => src/getu03}/gdtds1.for (100%) rename {getu03 => src/getu03}/gdtdsa.for (100%) rename {getu03 => src/getu03}/gdtdsp.for (100%) rename {getu03 => src/getu03}/gdteli.for (100%) rename {getu03 => src/getu03}/gdtexi.for (100%) rename {getu03 => src/getu03}/gdtext.for (100%) rename {getu03 => src/getu03}/gdtgzs.for (100%) rename {getu03 => src/getu03}/gdthcb.for (100%) rename {getu03 => src/getu03}/gdthpr.for (100%) rename {getu03 => src/getu03}/gdtiaw.for (100%) rename {getu03 => src/getu03}/gdticz.for (100%) rename {getu03 => src/getu03}/gdtinc.for (100%) rename {getu03 => src/getu03}/gdtind.for (100%) rename {getu03 => src/getu03}/gdtini.for (100%) rename {getu03 => src/getu03}/gdtkoe.for (100%) rename {getu03 => src/getu03}/gdtkon.for (100%) rename {getu03 => src/getu03}/gdtlin.for (100%) rename {getu03 => src/getu03}/gdtm01.for (100%) rename {getu03 => src/getu03}/gdtopv.for (100%) rename {getu03 => src/getu03}/gdtopw.for (100%) rename {getu03 => src/getu03}/gdtosn.for (100%) rename {getu03 => src/getu03}/gdtpau.for (100%) rename {getu03 => src/getu03}/gdtpgv.for (100%) rename {getu03 => src/getu03}/gdtpm1.for (100%) rename {getu03 => src/getu03}/gdtpm2.for (100%) rename {getu03 => src/getu03}/gdtpm3.for (100%) rename {getu03 => src/getu03}/gdtpm4.for (100%) rename {getu03 => src/getu03}/gdtpnv.for (100%) rename {getu03 => src/getu03}/gdtppk.for (100%) rename {getu03 => src/getu03}/gdtpr2.for (100%) rename {getu03 => src/getu03}/gdtpr3.for (100%) rename {getu03 => src/getu03}/gdtpr4.for (100%) rename {getu03 => src/getu03}/gdtpvp.for (100%) rename {getu03 => src/getu03}/gdtqyx.for (100%) rename {getu03 => src/getu03}/gdtrmp.for (100%) rename {getu03 => src/getu03}/gdtrr1.for (100%) rename {getu03 => src/getu03}/gdtrro.for (100%) rename {getu03 => src/getu03}/gdtrsb.for (100%) rename {getu03 => src/getu03}/gdtrsx.for (100%) rename {getu03 => src/getu03}/gdtsch.for (100%) rename {getu03 => src/getu03}/gdtscp.for (100%) rename {getu03 => src/getu03}/gdtsds.for (100%) rename {getu03 => src/getu03}/gdtsez.for (100%) rename {getu03 => src/getu03}/gdtsks.for (100%) rename {getu03 => src/getu03}/gdtsme.for (100%) rename {getu03 => src/getu03}/gdtsow.com (100%) rename {getu03 => src/getu03}/gdtsr1.for (100%) rename {getu03 => src/getu03}/gdtsro.for (100%) rename {getu03 => src/getu03}/gdtsso.for (100%) rename {getu03 => src/getu03}/gdtstb.for (100%) rename {getu03 => src/getu03}/gdtstr.for (100%) rename {getu03 => src/getu03}/gdtsum.for (100%) rename {getu03 => src/getu03}/gdtsuv.for (100%) rename {getu03 => src/getu03}/gdtsuw.for (100%) rename {getu03 => src/getu03}/gdtthl.for (100%) rename {getu03 => src/getu03}/gdttle.for (100%) rename {getu03 => src/getu03}/gdttpn.for (100%) rename {getu03 => src/getu03}/gdttps.for (100%) rename {getu03 => src/getu03}/gdttpt.for (100%) rename {getu03 => src/getu03}/gdttvo.for (100%) rename {getu03 => src/getu03}/gdtulz.for (100%) rename {getu03 => src/getu03}/gdtuvo.for (100%) rename {getu03 => src/getu03}/gdtvac.for (100%) rename {getu03 => src/getu03}/gdtvar.for (100%) rename {getu03 => src/getu03}/gdtvas.for (100%) rename {getu03 => src/getu03}/gdtvaw.for (100%) rename {getu03 => src/getu03}/gdtvc1.for (100%) rename {getu03 => src/getu03}/gdtvop.for (100%) rename {getu03 => src/getu03}/gdtvpn.for (100%) rename {getu03 => src/getu03}/gdtvpo.for (100%) rename {getu03 => src/getu03}/gdtvso.for (100%) rename {getu03 => src/getu03}/gdtvy2.for (100%) rename {getu03 => src/getu03}/gdtwar.for (100%) rename {getu03 => src/getu03}/gdtwtt.for (100%) rename {getu03 => src/getu03}/gdtzav.for (100%) rename {getu03 => src/getu03}/gdtzcb.for (100%) rename {getu03 => src/getu03}/gdtzcp.for (100%) rename {getu03 => src/getu03}/gdtzes.for (100%) rename {getu03 => src/getu03}/gdtzpa.for (100%) rename {getu03 => src/getu03}/getu03.for (100%) rename {getu03 => src/getu03}/ladeni.for (100%) rename {getu03 => src/getu03}/mtgso2.for (100%) create mode 100644 src/givens/Makefile rename {givens => src/givens}/README.TXT (100%) rename {givens => src/givens}/data/gope.1 (100%) rename {givens => src/givens}/data/gope.2 (100%) rename {givens => src/givens}/data/gope.3 (100%) rename {givens => src/givens}/data/prch.1 (100%) rename {givens => src/givens}/data/prch.2 (100%) rename {givens => src/givens}/data/prch.3 (100%) rename {givens => src/givens}/data/priklad.1 (100%) rename {givens => src/givens}/data/priklad.2 (100%) rename {givens => src/givens}/data/priklad.3 (100%) rename {givens => src/givens}/givens.for (100%) rename {givens => src/givens}/gt4lsa.for (100%) rename {givens => src/givens}/gtdimr.for (100%) rename {givens => src/givens}/gtfree.for (100%) rename {givens => src/givens}/gtgetr.for (100%) rename {givens => src/givens}/gtmnor.for (100%) rename {givens => src/givens}/gtortm.for (100%) rename {givens => src/givens}/gtperm.for (100%) rename {givens => src/givens}/gtperv.for (100%) rename {givens => src/givens}/gtrad1.for (100%) rename {givens => src/givens}/gtrans.for (100%) rename {givens => src/givens}/gtrpar.for (100%) rename {givens => src/givens}/gtrzs1.for (100%) rename {givens => src/givens}/gtschr.for (100%) rename {givens => src/givens}/gtsing.for (100%) rename {givens => src/givens}/gttime.for (100%) rename {givens => src/givens}/gtvadj.for (100%) rename {givens => src/givens}/gtvahk.for (100%) rename {givens => src/givens}/sparspak.for (100%) rename {givens => src/givens}/sparspak/fn1wd.for (100%) rename {givens => src/givens}/sparspak/fnroot.for (100%) rename {givens => src/givens}/sparspak/gen1wd.for (100%) rename {givens => src/givens}/sparspak/genqmd.for (100%) rename {givens => src/givens}/sparspak/qmdmrg.for (100%) rename {givens => src/givens}/sparspak/qmdqt.for (100%) rename {givens => src/givens}/sparspak/qmdrch.for (100%) rename {givens => src/givens}/sparspak/qmdupd.for (100%) rename {givens => src/givens}/sparspak/rootls.for (100%) rename {givens => src/givens}/sparspak/smbfct.for (100%) diff --git a/README.md b/README.md index 45c323b..2a2f3e9 100644 --- a/README.md +++ b/README.md @@ -7,5 +7,6 @@ Fortran 77 - různé zbytky zdrojových kódů http://knihovna.vugtk.cz/record/25137 * Knihovna základních procedur GEOLIB-PC https://knihovna.vugtk.cz/record/42447 + * gt4lsa --- Dává transformaci Givens pro úpravu nejmenších čtverců * Implementace Givensovy transformace pro vyrovnání měření zprostředkujících s řídkou maticí soustavy rovnic oprav diff --git a/givens/Makefile b/givens/Makefile deleted file mode 100644 index 8e3002d..0000000 --- a/givens/Makefile +++ /dev/null @@ -1,20 +0,0 @@ -# -# -# ----------------------------------------------------------------------- - -OBJ=$(shell ls *.for | sed s-sources/--g | sed s/.for/.o/g ) - -gt4lsa: $(OBJ) - g77 -o gt4lsa $(OBJ) - -%.o: %.for; g77 -O -c $< - -# ----------------------------------------------------------------------- - -clean: - rm -f *.o *~ gt4lsa GT4LSA.TMP GT4LSA.WC - -archive: - make clean - tar czf gt4lsa-`awk '/gt4lsa v./{ print $$6 }' gt4lsa.for`.tgz * \ - --exclude=*.tgz diff --git a/geolib.pc/mt/mtchi1.for b/src/geolib.pc/mt/mtchi1.for similarity index 100% rename from geolib.pc/mt/mtchi1.for rename to src/geolib.pc/mt/mtchi1.for diff --git a/geolib.pc/mt/mtdec1.for b/src/geolib.pc/mt/mtdec1.for similarity index 100% rename from geolib.pc/mt/mtdec1.for rename to src/geolib.pc/mt/mtdec1.for diff --git a/geolib.pc/mt/mtdeca.for b/src/geolib.pc/mt/mtdeca.for similarity index 100% rename from geolib.pc/mt/mtdeca.for rename to src/geolib.pc/mt/mtdeca.for diff --git a/geolib.pc/mt/mtelp1.for b/src/geolib.pc/mt/mtelp1.for similarity index 100% rename from geolib.pc/mt/mtelp1.for rename to src/geolib.pc/mt/mtelp1.for diff --git a/geolib.pc/mt/mtelp2.for b/src/geolib.pc/mt/mtelp2.for similarity index 100% rename from geolib.pc/mt/mtelp2.for rename to src/geolib.pc/mt/mtelp2.for diff --git a/geolib.pc/mt/mtfun1.for b/src/geolib.pc/mt/mtfun1.for similarity index 100% rename from geolib.pc/mt/mtfun1.for rename to src/geolib.pc/mt/mtfun1.for diff --git a/geolib.pc/mt/mtfuna.for b/src/geolib.pc/mt/mtfuna.for similarity index 100% rename from geolib.pc/mt/mtfuna.for rename to src/geolib.pc/mt/mtfuna.for diff --git a/geolib.pc/mt/mtgso1.for b/src/geolib.pc/mt/mtgso1.for similarity index 100% rename from geolib.pc/mt/mtgso1.for rename to src/geolib.pc/mt/mtgso1.for diff --git a/geolib.pc/mt/mtgso2.for b/src/geolib.pc/mt/mtgso2.for similarity index 100% rename from geolib.pc/mt/mtgso2.for rename to src/geolib.pc/mt/mtgso2.for diff --git a/geolib.pc/mt/mtinv1.for b/src/geolib.pc/mt/mtinv1.for similarity index 100% rename from geolib.pc/mt/mtinv1.for rename to src/geolib.pc/mt/mtinv1.for diff --git a/geolib.pc/mt/mtinva.for b/src/geolib.pc/mt/mtinva.for similarity index 100% rename from geolib.pc/mt/mtinva.for rename to src/geolib.pc/mt/mtinva.for diff --git a/geolib.pc/mt/mtkova.for b/src/geolib.pc/mt/mtkova.for similarity index 100% rename from geolib.pc/mt/mtkova.for rename to src/geolib.pc/mt/mtkova.for diff --git a/geolib.pc/mt/mtkovp.for b/src/geolib.pc/mt/mtkovp.for similarity index 100% rename from geolib.pc/mt/mtkovp.for rename to src/geolib.pc/mt/mtkovp.for diff --git a/geolib.pc/mt/mtkovq.for b/src/geolib.pc/mt/mtkovq.for similarity index 100% rename from geolib.pc/mt/mtkovq.for rename to src/geolib.pc/mt/mtkovq.for diff --git a/geolib.pc/mt/mtlin1.for b/src/geolib.pc/mt/mtlin1.for similarity index 100% rename from geolib.pc/mt/mtlin1.for rename to src/geolib.pc/mt/mtlin1.for diff --git a/geolib.pc/mt/mtlina.for b/src/geolib.pc/mt/mtlina.for similarity index 100% rename from geolib.pc/mt/mtlina.for rename to src/geolib.pc/mt/mtlina.for diff --git a/geolib.pc/mt/mtmct1.for b/src/geolib.pc/mt/mtmct1.for similarity index 100% rename from geolib.pc/mt/mtmct1.for rename to src/geolib.pc/mt/mtmct1.for diff --git a/geolib.pc/mt/mtmct3.for b/src/geolib.pc/mt/mtmct3.for similarity index 100% rename from geolib.pc/mt/mtmct3.for rename to src/geolib.pc/mt/mtmct3.for diff --git a/geolib.pc/mt/mtmcta.for b/src/geolib.pc/mt/mtmcta.for similarity index 100% rename from geolib.pc/mt/mtmcta.for rename to src/geolib.pc/mt/mtmcta.for diff --git a/geolib.pc/mt/mtmctc.for b/src/geolib.pc/mt/mtmctc.for similarity index 100% rename from geolib.pc/mt/mtmctc.for rename to src/geolib.pc/mt/mtmctc.for diff --git a/geolib.pc/mt/mtmns2.for b/src/geolib.pc/mt/mtmns2.for similarity index 100% rename from geolib.pc/mt/mtmns2.for rename to src/geolib.pc/mt/mtmns2.for diff --git a/geolib.pc/mt/mtmns3.for b/src/geolib.pc/mt/mtmns3.for similarity index 100% rename from geolib.pc/mt/mtmns3.for rename to src/geolib.pc/mt/mtmns3.for diff --git a/geolib.pc/mt/mtmns4.for b/src/geolib.pc/mt/mtmns4.for similarity index 100% rename from geolib.pc/mt/mtmns4.for rename to src/geolib.pc/mt/mtmns4.for diff --git a/geolib.pc/mt/mtmnsb.for b/src/geolib.pc/mt/mtmnsb.for similarity index 100% rename from geolib.pc/mt/mtmnsb.for rename to src/geolib.pc/mt/mtmnsb.for diff --git a/geolib.pc/mt/mtmnsc.for b/src/geolib.pc/mt/mtmnsc.for similarity index 100% rename from geolib.pc/mt/mtmnsc.for rename to src/geolib.pc/mt/mtmnsc.for diff --git a/geolib.pc/mt/mtmnsd.for b/src/geolib.pc/mt/mtmnsd.for similarity index 100% rename from geolib.pc/mt/mtmnsd.for rename to src/geolib.pc/mt/mtmnsd.for diff --git a/geolib.pc/mt/mtmts1.for b/src/geolib.pc/mt/mtmts1.for similarity index 100% rename from geolib.pc/mt/mtmts1.for rename to src/geolib.pc/mt/mtmts1.for diff --git a/geolib.pc/mt/mtmts2.for b/src/geolib.pc/mt/mtmts2.for similarity index 100% rename from geolib.pc/mt/mtmts2.for rename to src/geolib.pc/mt/mtmts2.for diff --git a/geolib.pc/mt/mtmtsa.for b/src/geolib.pc/mt/mtmtsa.for similarity index 100% rename from geolib.pc/mt/mtmtsa.for rename to src/geolib.pc/mt/mtmtsa.for diff --git a/geolib.pc/mt/mtmtsb.for b/src/geolib.pc/mt/mtmtsb.for similarity index 100% rename from geolib.pc/mt/mtmtsb.for rename to src/geolib.pc/mt/mtmtsb.for diff --git a/geolib.pc/mt/mtnora.for b/src/geolib.pc/mt/mtnora.for similarity index 100% rename from geolib.pc/mt/mtnora.for rename to src/geolib.pc/mt/mtnora.for diff --git a/geolib.pc/mt/mtnorb.for b/src/geolib.pc/mt/mtnorb.for similarity index 100% rename from geolib.pc/mt/mtnorb.for rename to src/geolib.pc/mt/mtnorb.for diff --git a/geolib.pc/mt/mtort1.for b/src/geolib.pc/mt/mtort1.for similarity index 100% rename from geolib.pc/mt/mtort1.for rename to src/geolib.pc/mt/mtort1.for diff --git a/geolib.pc/mt/mtorta.for b/src/geolib.pc/mt/mtorta.for similarity index 100% rename from geolib.pc/mt/mtorta.for rename to src/geolib.pc/mt/mtorta.for diff --git a/geolib.pc/mt/mtstu1.for b/src/geolib.pc/mt/mtstu1.for similarity index 100% rename from geolib.pc/mt/mtstu1.for rename to src/geolib.pc/mt/mtstu1.for diff --git a/geolib.pc/mt/mtvzp1.for b/src/geolib.pc/mt/mtvzp1.for similarity index 100% rename from geolib.pc/mt/mtvzp1.for rename to src/geolib.pc/mt/mtvzp1.for diff --git a/geolib.pc/ng/ngkru1.for b/src/geolib.pc/ng/ngkru1.for similarity index 100% rename from geolib.pc/ng/ngkru1.for rename to src/geolib.pc/ng/ngkru1.for diff --git a/geolib.pc/ng/ngkrua.for b/src/geolib.pc/ng/ngkrua.for similarity index 100% rename from geolib.pc/ng/ngkrua.for rename to src/geolib.pc/ng/ngkrua.for diff --git a/geolib.pc/ng/ngoos1.for b/src/geolib.pc/ng/ngoos1.for similarity index 100% rename from geolib.pc/ng/ngoos1.for rename to src/geolib.pc/ng/ngoos1.for diff --git a/geolib.pc/ng/ngoosa.for b/src/geolib.pc/ng/ngoosa.for similarity index 100% rename from geolib.pc/ng/ngoosa.for rename to src/geolib.pc/ng/ngoosa.for diff --git a/geolib.pc/ng/ngppk1.for b/src/geolib.pc/ng/ngppk1.for similarity index 100% rename from geolib.pc/ng/ngppk1.for rename to src/geolib.pc/ng/ngppk1.for diff --git a/geolib.pc/ng/ngppka.for b/src/geolib.pc/ng/ngppka.for similarity index 100% rename from geolib.pc/ng/ngppka.for rename to src/geolib.pc/ng/ngppka.for diff --git a/geolib.pc/ng/ngprp1.for b/src/geolib.pc/ng/ngprp1.for similarity index 100% rename from geolib.pc/ng/ngprp1.for rename to src/geolib.pc/ng/ngprp1.for diff --git a/geolib.pc/ng/ngprpa.for b/src/geolib.pc/ng/ngprpa.for similarity index 100% rename from geolib.pc/ng/ngprpa.for rename to src/geolib.pc/ng/ngprpa.for diff --git a/geolib.pc/ng/ngptd1.for b/src/geolib.pc/ng/ngptd1.for similarity index 100% rename from geolib.pc/ng/ngptd1.for rename to src/geolib.pc/ng/ngptd1.for diff --git a/geolib.pc/ng/ngptd2.for b/src/geolib.pc/ng/ngptd2.for similarity index 100% rename from geolib.pc/ng/ngptd2.for rename to src/geolib.pc/ng/ngptd2.for diff --git a/geolib.pc/ng/ngptda.for b/src/geolib.pc/ng/ngptda.for similarity index 100% rename from geolib.pc/ng/ngptda.for rename to src/geolib.pc/ng/ngptda.for diff --git a/geolib.pc/ng/ngptdb.for b/src/geolib.pc/ng/ngptdb.for similarity index 100% rename from geolib.pc/ng/ngptdb.for rename to src/geolib.pc/ng/ngptdb.for diff --git a/geolib.pc/ng/ngptv1.for b/src/geolib.pc/ng/ngptv1.for similarity index 100% rename from geolib.pc/ng/ngptv1.for rename to src/geolib.pc/ng/ngptv1.for diff --git a/geolib.pc/ng/ngptva.for b/src/geolib.pc/ng/ngptva.for similarity index 100% rename from geolib.pc/ng/ngptva.for rename to src/geolib.pc/ng/ngptva.for diff --git a/geolib.pc/ng/ngptxa.for b/src/geolib.pc/ng/ngptxa.for similarity index 100% rename from geolib.pc/ng/ngptxa.for rename to src/geolib.pc/ng/ngptxa.for diff --git a/geolib.pc/ng/ngptxp.for b/src/geolib.pc/ng/ngptxp.for similarity index 100% rename from geolib.pc/ng/ngptxp.for rename to src/geolib.pc/ng/ngptxp.for diff --git a/geolib.pc/ng/ngptxq.for b/src/geolib.pc/ng/ngptxq.for similarity index 100% rename from geolib.pc/ng/ngptxq.for rename to src/geolib.pc/ng/ngptxq.for diff --git a/geolib.pc/ng/ngptxr.for b/src/geolib.pc/ng/ngptxr.for similarity index 100% rename from geolib.pc/ng/ngptxr.for rename to src/geolib.pc/ng/ngptxr.for diff --git a/geolib.pc/ng/ngptz1.for b/src/geolib.pc/ng/ngptz1.for similarity index 100% rename from geolib.pc/ng/ngptz1.for rename to src/geolib.pc/ng/ngptz1.for diff --git a/geolib.pc/ng/ngptza.for b/src/geolib.pc/ng/ngptza.for similarity index 100% rename from geolib.pc/ng/ngptza.for rename to src/geolib.pc/ng/ngptza.for diff --git a/geolib.pc/ng/ngsmd1.for b/src/geolib.pc/ng/ngsmd1.for similarity index 100% rename from geolib.pc/ng/ngsmd1.for rename to src/geolib.pc/ng/ngsmd1.for diff --git a/geolib.pc/ng/ngsmda.for b/src/geolib.pc/ng/ngsmda.for similarity index 100% rename from geolib.pc/ng/ngsmda.for rename to src/geolib.pc/ng/ngsmda.for diff --git a/geolib.pc/ngs/ngsdz1.for b/src/geolib.pc/ngs/ngsdz1.for similarity index 100% rename from geolib.pc/ngs/ngsdz1.for rename to src/geolib.pc/ngs/ngsdz1.for diff --git a/geolib.pc/ngs/ngsioz.for b/src/geolib.pc/ngs/ngsioz.for similarity index 100% rename from geolib.pc/ngs/ngsioz.for rename to src/geolib.pc/ngs/ngsioz.for diff --git a/geolib.pc/ngs/ngsjdz.for b/src/geolib.pc/ngs/ngsjdz.for similarity index 100% rename from geolib.pc/ngs/ngsjdz.for rename to src/geolib.pc/ngs/ngsjdz.for diff --git a/geolib.pc/ngs/ngskkl.for b/src/geolib.pc/ngs/ngskkl.for similarity index 100% rename from geolib.pc/ngs/ngskkl.for rename to src/geolib.pc/ngs/ngskkl.for diff --git a/geolib.pc/ngs/ngslk1.for b/src/geolib.pc/ngs/ngslk1.for similarity index 100% rename from geolib.pc/ngs/ngslk1.for rename to src/geolib.pc/ngs/ngslk1.for diff --git a/geolib.pc/ngs/ngslk2.for b/src/geolib.pc/ngs/ngslk2.for similarity index 100% rename from geolib.pc/ngs/ngslk2.for rename to src/geolib.pc/ngs/ngslk2.for diff --git a/geolib.pc/ngs/ngsort.for b/src/geolib.pc/ngs/ngsort.for similarity index 100% rename from geolib.pc/ngs/ngsort.for rename to src/geolib.pc/ngs/ngsort.for diff --git a/geolib.pc/ngs/ngsrkl.for b/src/geolib.pc/ngs/ngsrkl.for similarity index 100% rename from geolib.pc/ngs/ngsrkl.for rename to src/geolib.pc/ngs/ngsrkl.for diff --git a/geolib.pc/pp/ppbit1.for b/src/geolib.pc/pp/ppbit1.for similarity index 100% rename from geolib.pc/pp/ppbit1.for rename to src/geolib.pc/pp/ppbit1.for diff --git a/geolib.pc/pp/ppcmp1.for b/src/geolib.pc/pp/ppcmp1.for similarity index 100% rename from geolib.pc/pp/ppcmp1.for rename to src/geolib.pc/pp/ppcmp1.for diff --git a/geolib.pc/pp/ppkmb1.for b/src/geolib.pc/pp/ppkmb1.for similarity index 100% rename from geolib.pc/pp/ppkmb1.for rename to src/geolib.pc/pp/ppkmb1.for diff --git a/geolib.pc/pp/ppkoml.for b/src/geolib.pc/pp/ppkoml.for similarity index 100% rename from geolib.pc/pp/ppkoml.for rename to src/geolib.pc/pp/ppkoml.for diff --git a/geolib.pc/pp/ppmov1.for b/src/geolib.pc/pp/ppmov1.for similarity index 100% rename from geolib.pc/pp/ppmov1.for rename to src/geolib.pc/pp/ppmov1.for diff --git a/geolib.pc/pp/ppres1.for b/src/geolib.pc/pp/ppres1.for similarity index 100% rename from geolib.pc/pp/ppres1.for rename to src/geolib.pc/pp/ppres1.for diff --git a/geolib.pc/tr/trafk1.for b/src/geolib.pc/tr/trafk1.for similarity index 100% rename from geolib.pc/tr/trafk1.for rename to src/geolib.pc/tr/trafk1.for diff --git a/geolib.pc/tr/trafka.for b/src/geolib.pc/tr/trafka.for similarity index 100% rename from geolib.pc/tr/trafka.for rename to src/geolib.pc/tr/trafka.for diff --git a/geolib.pc/tr/trank2.for b/src/geolib.pc/tr/trank2.for similarity index 100% rename from geolib.pc/tr/trank2.for rename to src/geolib.pc/tr/trank2.for diff --git a/geolib.pc/tr/trlin1.for b/src/geolib.pc/tr/trlin1.for similarity index 100% rename from geolib.pc/tr/trlin1.for rename to src/geolib.pc/tr/trlin1.for diff --git a/geolib.pc/tr/trlina.for b/src/geolib.pc/tr/trlina.for similarity index 100% rename from geolib.pc/tr/trlina.for rename to src/geolib.pc/tr/trlina.for diff --git a/geolib.pc/tr/trpdk1.for b/src/geolib.pc/tr/trpdk1.for similarity index 100% rename from geolib.pc/tr/trpdk1.for rename to src/geolib.pc/tr/trpdk1.for diff --git a/geolib.pc/tr/trpdka.for b/src/geolib.pc/tr/trpdka.for similarity index 100% rename from geolib.pc/tr/trpdka.for rename to src/geolib.pc/tr/trpdka.for diff --git a/geolib.pc/tr/trshk1.for b/src/geolib.pc/tr/trshk1.for similarity index 100% rename from geolib.pc/tr/trshk1.for rename to src/geolib.pc/tr/trshk1.for diff --git a/geolib.pc/tr/trshka.for b/src/geolib.pc/tr/trshka.for similarity index 100% rename from geolib.pc/tr/trshka.for rename to src/geolib.pc/tr/trshka.for diff --git a/geolib.pc/tt/ttask.for b/src/geolib.pc/tt/ttask.for similarity index 100% rename from geolib.pc/tt/ttask.for rename to src/geolib.pc/tt/ttask.for diff --git a/geolib.pc/tt/ttaskd.for b/src/geolib.pc/tt/ttaskd.for similarity index 100% rename from geolib.pc/tt/ttaskd.for rename to src/geolib.pc/tt/ttaskd.for diff --git a/geolib.pc/tt/ttaskj.for b/src/geolib.pc/tt/ttaskj.for similarity index 100% rename from geolib.pc/tt/ttaskj.for rename to src/geolib.pc/tt/ttaskj.for diff --git a/geolib.pc/tt/ttaskn.for b/src/geolib.pc/tt/ttaskn.for similarity index 100% rename from geolib.pc/tt/ttaskn.for rename to src/geolib.pc/tt/ttaskn.for diff --git a/geolib.pc/tt/ttaskr.for b/src/geolib.pc/tt/ttaskr.for similarity index 100% rename from geolib.pc/tt/ttaskr.for rename to src/geolib.pc/tt/ttaskr.for diff --git a/geolib.pc/tt/ttasks.for b/src/geolib.pc/tt/ttasks.for similarity index 100% rename from geolib.pc/tt/ttasks.for rename to src/geolib.pc/tt/ttasks.for diff --git a/geolib.pc/tt/ttasku.for b/src/geolib.pc/tt/ttasku.for similarity index 100% rename from geolib.pc/tt/ttasku.for rename to src/geolib.pc/tt/ttasku.for diff --git a/geolib.pc/tt/ttexit.for b/src/geolib.pc/tt/ttexit.for similarity index 100% rename from geolib.pc/tt/ttexit.for rename to src/geolib.pc/tt/ttexit.for diff --git a/geolib.pc/tt/ttlenf.for b/src/geolib.pc/tt/ttlenf.for similarity index 100% rename from geolib.pc/tt/ttlenf.for rename to src/geolib.pc/tt/ttlenf.for diff --git a/geolib.pc/tt/ttrol1.for b/src/geolib.pc/tt/ttrol1.for similarity index 100% rename from geolib.pc/tt/ttrol1.for rename to src/geolib.pc/tt/ttrol1.for diff --git a/geolib.pc/tt/ttzahl.for b/src/geolib.pc/tt/ttzahl.for similarity index 100% rename from geolib.pc/tt/ttzahl.for rename to src/geolib.pc/tt/ttzahl.for diff --git a/geolib.pc/vg/vgpoka.for b/src/geolib.pc/vg/vgpoka.for similarity index 100% rename from geolib.pc/vg/vgpoka.for rename to src/geolib.pc/vg/vgpoka.for diff --git a/geolib.pc/vg/vgrdda.for b/src/geolib.pc/vg/vgrdda.for similarity index 100% rename from geolib.pc/vg/vgrdda.for rename to src/geolib.pc/vg/vgrdda.for diff --git a/geolib.pc/vg/vgrddb.for b/src/geolib.pc/vg/vgrddb.for similarity index 100% rename from geolib.pc/vg/vgrddb.for rename to src/geolib.pc/vg/vgrddb.for diff --git a/geolib.pc/vg/vgrddf.for b/src/geolib.pc/vg/vgrddf.for similarity index 100% rename from geolib.pc/vg/vgrddf.for rename to src/geolib.pc/vg/vgrddf.for diff --git a/geolib.pc/vg/vgrdsa.for b/src/geolib.pc/vg/vgrdsa.for similarity index 100% rename from geolib.pc/vg/vgrdsa.for rename to src/geolib.pc/vg/vgrdsa.for diff --git a/geolib.pc/vg/vgtrka.for b/src/geolib.pc/vg/vgtrka.for similarity index 100% rename from geolib.pc/vg/vgtrka.for rename to src/geolib.pc/vg/vgtrka.for diff --git a/getu03/gddchw.com b/src/getu03/gddchw.com similarity index 100% rename from getu03/gddchw.com rename to src/getu03/gddchw.com diff --git a/getu03/gdi01w.com b/src/getu03/gdi01w.com similarity index 100% rename from getu03/gdi01w.com rename to src/getu03/gdi01w.com diff --git a/getu03/gdi02w.com b/src/getu03/gdi02w.com similarity index 100% rename from getu03/gdi02w.com rename to src/getu03/gdi02w.com diff --git a/getu03/gdsopt.com b/src/getu03/gdsopt.com similarity index 100% rename from getu03/gdsopt.com rename to src/getu03/gdsopt.com diff --git a/getu03/gdt000.for b/src/getu03/gdt000.for similarity index 100% rename from getu03/gdt000.for rename to src/getu03/gdt000.for diff --git a/getu03/gdta1s.for b/src/getu03/gdta1s.for similarity index 100% rename from getu03/gdta1s.for rename to src/getu03/gdta1s.for diff --git a/getu03/gdta2s.for b/src/getu03/gdta2s.for similarity index 100% rename from getu03/gdta2s.for rename to src/getu03/gdta2s.for diff --git a/getu03/gdta3s.for b/src/getu03/gdta3s.for similarity index 100% rename from getu03/gdta3s.for rename to src/getu03/gdta3s.for diff --git a/getu03/gdta41.for b/src/getu03/gdta41.for similarity index 100% rename from getu03/gdta41.for rename to src/getu03/gdta41.for diff --git a/getu03/gdta5s.for b/src/getu03/gdta5s.for similarity index 100% rename from getu03/gdta5s.for rename to src/getu03/gdta5s.for diff --git a/getu03/gdta62.for b/src/getu03/gdta62.for similarity index 100% rename from getu03/gdta62.for rename to src/getu03/gdta62.for diff --git a/getu03/gdta7s.for b/src/getu03/gdta7s.for similarity index 100% rename from getu03/gdta7s.for rename to src/getu03/gdta7s.for diff --git a/getu03/gdta81.for b/src/getu03/gdta81.for similarity index 100% rename from getu03/gdta81.for rename to src/getu03/gdta81.for diff --git a/getu03/gdta90.for b/src/getu03/gdta90.for similarity index 100% rename from getu03/gdta90.for rename to src/getu03/gdta90.for diff --git a/getu03/gdtamv.for b/src/getu03/gdtamv.for similarity index 100% rename from getu03/gdtamv.for rename to src/getu03/gdtamv.for diff --git a/getu03/gdtan1.for b/src/getu03/gdtan1.for similarity index 100% rename from getu03/gdtan1.for rename to src/getu03/gdtan1.for diff --git a/getu03/gdtann.for b/src/getu03/gdtann.for similarity index 100% rename from getu03/gdtann.for rename to src/getu03/gdtann.for diff --git a/getu03/gdtaoo.for b/src/getu03/gdtaoo.for similarity index 100% rename from getu03/gdtaoo.for rename to src/getu03/gdtaoo.for diff --git a/getu03/gdtasi.for b/src/getu03/gdtasi.for similarity index 100% rename from getu03/gdtasi.for rename to src/getu03/gdtasi.for diff --git a/getu03/gdtat1.for b/src/getu03/gdtat1.for similarity index 100% rename from getu03/gdtat1.for rename to src/getu03/gdtat1.for diff --git a/getu03/gdtatv.for b/src/getu03/gdtatv.for similarity index 100% rename from getu03/gdtatv.for rename to src/getu03/gdtatv.for diff --git a/getu03/gdtavs.for b/src/getu03/gdtavs.for similarity index 100% rename from getu03/gdtavs.for rename to src/getu03/gdtavs.for diff --git a/getu03/gdtavz.for b/src/getu03/gdtavz.for similarity index 100% rename from getu03/gdtavz.for rename to src/getu03/gdtavz.for diff --git a/getu03/gdtbuf.for b/src/getu03/gdtbuf.for similarity index 100% rename from getu03/gdtbuf.for rename to src/getu03/gdtbuf.for diff --git a/getu03/gdtdfs.for b/src/getu03/gdtdfs.for similarity index 100% rename from getu03/gdtdfs.for rename to src/getu03/gdtdfs.for diff --git a/getu03/gdtdif.for b/src/getu03/gdtdif.for similarity index 100% rename from getu03/gdtdif.for rename to src/getu03/gdtdif.for diff --git a/getu03/gdtds1.for b/src/getu03/gdtds1.for similarity index 100% rename from getu03/gdtds1.for rename to src/getu03/gdtds1.for diff --git a/getu03/gdtdsa.for b/src/getu03/gdtdsa.for similarity index 100% rename from getu03/gdtdsa.for rename to src/getu03/gdtdsa.for diff --git a/getu03/gdtdsp.for b/src/getu03/gdtdsp.for similarity index 100% rename from getu03/gdtdsp.for rename to src/getu03/gdtdsp.for diff --git a/getu03/gdteli.for b/src/getu03/gdteli.for similarity index 100% rename from getu03/gdteli.for rename to src/getu03/gdteli.for diff --git a/getu03/gdtexi.for b/src/getu03/gdtexi.for similarity index 100% rename from getu03/gdtexi.for rename to src/getu03/gdtexi.for diff --git a/getu03/gdtext.for b/src/getu03/gdtext.for similarity index 100% rename from getu03/gdtext.for rename to src/getu03/gdtext.for diff --git a/getu03/gdtgzs.for b/src/getu03/gdtgzs.for similarity index 100% rename from getu03/gdtgzs.for rename to src/getu03/gdtgzs.for diff --git a/getu03/gdthcb.for b/src/getu03/gdthcb.for similarity index 100% rename from getu03/gdthcb.for rename to src/getu03/gdthcb.for diff --git a/getu03/gdthpr.for b/src/getu03/gdthpr.for similarity index 100% rename from getu03/gdthpr.for rename to src/getu03/gdthpr.for diff --git a/getu03/gdtiaw.for b/src/getu03/gdtiaw.for similarity index 100% rename from getu03/gdtiaw.for rename to src/getu03/gdtiaw.for diff --git a/getu03/gdticz.for b/src/getu03/gdticz.for similarity index 100% rename from getu03/gdticz.for rename to src/getu03/gdticz.for diff --git a/getu03/gdtinc.for b/src/getu03/gdtinc.for similarity index 100% rename from getu03/gdtinc.for rename to src/getu03/gdtinc.for diff --git a/getu03/gdtind.for b/src/getu03/gdtind.for similarity index 100% rename from getu03/gdtind.for rename to src/getu03/gdtind.for diff --git a/getu03/gdtini.for b/src/getu03/gdtini.for similarity index 100% rename from getu03/gdtini.for rename to src/getu03/gdtini.for diff --git a/getu03/gdtkoe.for b/src/getu03/gdtkoe.for similarity index 100% rename from getu03/gdtkoe.for rename to src/getu03/gdtkoe.for diff --git a/getu03/gdtkon.for b/src/getu03/gdtkon.for similarity index 100% rename from getu03/gdtkon.for rename to src/getu03/gdtkon.for diff --git a/getu03/gdtlin.for b/src/getu03/gdtlin.for similarity index 100% rename from getu03/gdtlin.for rename to src/getu03/gdtlin.for diff --git a/getu03/gdtm01.for b/src/getu03/gdtm01.for similarity index 100% rename from getu03/gdtm01.for rename to src/getu03/gdtm01.for diff --git a/getu03/gdtopv.for b/src/getu03/gdtopv.for similarity index 100% rename from getu03/gdtopv.for rename to src/getu03/gdtopv.for diff --git a/getu03/gdtopw.for b/src/getu03/gdtopw.for similarity index 100% rename from getu03/gdtopw.for rename to src/getu03/gdtopw.for diff --git a/getu03/gdtosn.for b/src/getu03/gdtosn.for similarity index 100% rename from getu03/gdtosn.for rename to src/getu03/gdtosn.for diff --git a/getu03/gdtpau.for b/src/getu03/gdtpau.for similarity index 100% rename from getu03/gdtpau.for rename to src/getu03/gdtpau.for diff --git a/getu03/gdtpgv.for b/src/getu03/gdtpgv.for similarity index 100% rename from getu03/gdtpgv.for rename to src/getu03/gdtpgv.for diff --git a/getu03/gdtpm1.for b/src/getu03/gdtpm1.for similarity index 100% rename from getu03/gdtpm1.for rename to src/getu03/gdtpm1.for diff --git a/getu03/gdtpm2.for b/src/getu03/gdtpm2.for similarity index 100% rename from getu03/gdtpm2.for rename to src/getu03/gdtpm2.for diff --git a/getu03/gdtpm3.for b/src/getu03/gdtpm3.for similarity index 100% rename from getu03/gdtpm3.for rename to src/getu03/gdtpm3.for diff --git a/getu03/gdtpm4.for b/src/getu03/gdtpm4.for similarity index 100% rename from getu03/gdtpm4.for rename to src/getu03/gdtpm4.for diff --git a/getu03/gdtpnv.for b/src/getu03/gdtpnv.for similarity index 100% rename from getu03/gdtpnv.for rename to src/getu03/gdtpnv.for diff --git a/getu03/gdtppk.for b/src/getu03/gdtppk.for similarity index 100% rename from getu03/gdtppk.for rename to src/getu03/gdtppk.for diff --git a/getu03/gdtpr2.for b/src/getu03/gdtpr2.for similarity index 100% rename from getu03/gdtpr2.for rename to src/getu03/gdtpr2.for diff --git a/getu03/gdtpr3.for b/src/getu03/gdtpr3.for similarity index 100% rename from getu03/gdtpr3.for rename to src/getu03/gdtpr3.for diff --git a/getu03/gdtpr4.for b/src/getu03/gdtpr4.for similarity index 100% rename from getu03/gdtpr4.for rename to src/getu03/gdtpr4.for diff --git a/getu03/gdtpvp.for b/src/getu03/gdtpvp.for similarity index 100% rename from getu03/gdtpvp.for rename to src/getu03/gdtpvp.for diff --git a/getu03/gdtqyx.for b/src/getu03/gdtqyx.for similarity index 100% rename from getu03/gdtqyx.for rename to src/getu03/gdtqyx.for diff --git a/getu03/gdtrmp.for b/src/getu03/gdtrmp.for similarity index 100% rename from getu03/gdtrmp.for rename to src/getu03/gdtrmp.for diff --git a/getu03/gdtrr1.for b/src/getu03/gdtrr1.for similarity index 100% rename from getu03/gdtrr1.for rename to src/getu03/gdtrr1.for diff --git a/getu03/gdtrro.for b/src/getu03/gdtrro.for similarity index 100% rename from getu03/gdtrro.for rename to src/getu03/gdtrro.for diff --git a/getu03/gdtrsb.for b/src/getu03/gdtrsb.for similarity index 100% rename from getu03/gdtrsb.for rename to src/getu03/gdtrsb.for diff --git a/getu03/gdtrsx.for b/src/getu03/gdtrsx.for similarity index 100% rename from getu03/gdtrsx.for rename to src/getu03/gdtrsx.for diff --git a/getu03/gdtsch.for b/src/getu03/gdtsch.for similarity index 100% rename from getu03/gdtsch.for rename to src/getu03/gdtsch.for diff --git a/getu03/gdtscp.for b/src/getu03/gdtscp.for similarity index 100% rename from getu03/gdtscp.for rename to src/getu03/gdtscp.for diff --git a/getu03/gdtsds.for b/src/getu03/gdtsds.for similarity index 100% rename from getu03/gdtsds.for rename to src/getu03/gdtsds.for diff --git a/getu03/gdtsez.for b/src/getu03/gdtsez.for similarity index 100% rename from getu03/gdtsez.for rename to src/getu03/gdtsez.for diff --git a/getu03/gdtsks.for b/src/getu03/gdtsks.for similarity index 100% rename from getu03/gdtsks.for rename to src/getu03/gdtsks.for diff --git a/getu03/gdtsme.for b/src/getu03/gdtsme.for similarity index 100% rename from getu03/gdtsme.for rename to src/getu03/gdtsme.for diff --git a/getu03/gdtsow.com b/src/getu03/gdtsow.com similarity index 100% rename from getu03/gdtsow.com rename to src/getu03/gdtsow.com diff --git a/getu03/gdtsr1.for b/src/getu03/gdtsr1.for similarity index 100% rename from getu03/gdtsr1.for rename to src/getu03/gdtsr1.for diff --git a/getu03/gdtsro.for b/src/getu03/gdtsro.for similarity index 100% rename from getu03/gdtsro.for rename to src/getu03/gdtsro.for diff --git a/getu03/gdtsso.for b/src/getu03/gdtsso.for similarity index 100% rename from getu03/gdtsso.for rename to src/getu03/gdtsso.for diff --git a/getu03/gdtstb.for b/src/getu03/gdtstb.for similarity index 100% rename from getu03/gdtstb.for rename to src/getu03/gdtstb.for diff --git a/getu03/gdtstr.for b/src/getu03/gdtstr.for similarity index 100% rename from getu03/gdtstr.for rename to src/getu03/gdtstr.for diff --git a/getu03/gdtsum.for b/src/getu03/gdtsum.for similarity index 100% rename from getu03/gdtsum.for rename to src/getu03/gdtsum.for diff --git a/getu03/gdtsuv.for b/src/getu03/gdtsuv.for similarity index 100% rename from getu03/gdtsuv.for rename to src/getu03/gdtsuv.for diff --git a/getu03/gdtsuw.for b/src/getu03/gdtsuw.for similarity index 100% rename from getu03/gdtsuw.for rename to src/getu03/gdtsuw.for diff --git a/getu03/gdtthl.for b/src/getu03/gdtthl.for similarity index 100% rename from getu03/gdtthl.for rename to src/getu03/gdtthl.for diff --git a/getu03/gdttle.for b/src/getu03/gdttle.for similarity index 100% rename from getu03/gdttle.for rename to src/getu03/gdttle.for diff --git a/getu03/gdttpn.for b/src/getu03/gdttpn.for similarity index 100% rename from getu03/gdttpn.for rename to src/getu03/gdttpn.for diff --git a/getu03/gdttps.for b/src/getu03/gdttps.for similarity index 100% rename from getu03/gdttps.for rename to src/getu03/gdttps.for diff --git a/getu03/gdttpt.for b/src/getu03/gdttpt.for similarity index 100% rename from getu03/gdttpt.for rename to src/getu03/gdttpt.for diff --git a/getu03/gdttvo.for b/src/getu03/gdttvo.for similarity index 100% rename from getu03/gdttvo.for rename to src/getu03/gdttvo.for diff --git a/getu03/gdtulz.for b/src/getu03/gdtulz.for similarity index 100% rename from getu03/gdtulz.for rename to src/getu03/gdtulz.for diff --git a/getu03/gdtuvo.for b/src/getu03/gdtuvo.for similarity index 100% rename from getu03/gdtuvo.for rename to src/getu03/gdtuvo.for diff --git a/getu03/gdtvac.for b/src/getu03/gdtvac.for similarity index 100% rename from getu03/gdtvac.for rename to src/getu03/gdtvac.for diff --git a/getu03/gdtvar.for b/src/getu03/gdtvar.for similarity index 100% rename from getu03/gdtvar.for rename to src/getu03/gdtvar.for diff --git a/getu03/gdtvas.for b/src/getu03/gdtvas.for similarity index 100% rename from getu03/gdtvas.for rename to src/getu03/gdtvas.for diff --git a/getu03/gdtvaw.for b/src/getu03/gdtvaw.for similarity index 100% rename from getu03/gdtvaw.for rename to src/getu03/gdtvaw.for diff --git a/getu03/gdtvc1.for b/src/getu03/gdtvc1.for similarity index 100% rename from getu03/gdtvc1.for rename to src/getu03/gdtvc1.for diff --git a/getu03/gdtvop.for b/src/getu03/gdtvop.for similarity index 100% rename from getu03/gdtvop.for rename to src/getu03/gdtvop.for diff --git a/getu03/gdtvpn.for b/src/getu03/gdtvpn.for similarity index 100% rename from getu03/gdtvpn.for rename to src/getu03/gdtvpn.for diff --git a/getu03/gdtvpo.for b/src/getu03/gdtvpo.for similarity index 100% rename from getu03/gdtvpo.for rename to src/getu03/gdtvpo.for diff --git a/getu03/gdtvso.for b/src/getu03/gdtvso.for similarity index 100% rename from getu03/gdtvso.for rename to src/getu03/gdtvso.for diff --git a/getu03/gdtvy2.for b/src/getu03/gdtvy2.for similarity index 100% rename from getu03/gdtvy2.for rename to src/getu03/gdtvy2.for diff --git a/getu03/gdtwar.for b/src/getu03/gdtwar.for similarity index 100% rename from getu03/gdtwar.for rename to src/getu03/gdtwar.for diff --git a/getu03/gdtwtt.for b/src/getu03/gdtwtt.for similarity index 100% rename from getu03/gdtwtt.for rename to src/getu03/gdtwtt.for diff --git a/getu03/gdtzav.for b/src/getu03/gdtzav.for similarity index 100% rename from getu03/gdtzav.for rename to src/getu03/gdtzav.for diff --git a/getu03/gdtzcb.for b/src/getu03/gdtzcb.for similarity index 100% rename from getu03/gdtzcb.for rename to src/getu03/gdtzcb.for diff --git a/getu03/gdtzcp.for b/src/getu03/gdtzcp.for similarity index 100% rename from getu03/gdtzcp.for rename to src/getu03/gdtzcp.for diff --git a/getu03/gdtzes.for b/src/getu03/gdtzes.for similarity index 100% rename from getu03/gdtzes.for rename to src/getu03/gdtzes.for diff --git a/getu03/gdtzpa.for b/src/getu03/gdtzpa.for similarity index 100% rename from getu03/gdtzpa.for rename to src/getu03/gdtzpa.for diff --git a/getu03/getu03.for b/src/getu03/getu03.for similarity index 100% rename from getu03/getu03.for rename to src/getu03/getu03.for diff --git a/getu03/ladeni.for b/src/getu03/ladeni.for similarity index 100% rename from getu03/ladeni.for rename to src/getu03/ladeni.for diff --git a/getu03/mtgso2.for b/src/getu03/mtgso2.for similarity index 100% rename from getu03/mtgso2.for rename to src/getu03/mtgso2.for diff --git a/src/givens/Makefile b/src/givens/Makefile new file mode 100644 index 0000000..fe1fa50 --- /dev/null +++ b/src/givens/Makefile @@ -0,0 +1,23 @@ +# +# +# ----------------------------------------------------------------------- + +PNAME=gt4lsa +PVER=`awk '/$(PNAME) v./{ print $$6 }' $(PNAME).for` +#FORTRAN=g77 +FORTRAN=gfortran +OBJ=$(shell ls *.for | sed s-sources/--g | sed s/.for/.o/g ) + +$(PNAME): $(OBJ) + $(FORTRAN) -o $(PNAME) $(OBJ) + +%.o: %.for; $(FORTRAN) -O -c $< + +# ----------------------------------------------------------------------- + +clean: + rm -f *.o *~ $(PNAME) GT4LSA.TMP GT4LSA.WC + +archive: + make clean + tar czf $(PNAME)-$(PVER).tgz * --exclude=*.tgz diff --git a/givens/README.TXT b/src/givens/README.TXT similarity index 100% rename from givens/README.TXT rename to src/givens/README.TXT diff --git a/givens/data/gope.1 b/src/givens/data/gope.1 similarity index 100% rename from givens/data/gope.1 rename to src/givens/data/gope.1 diff --git a/givens/data/gope.2 b/src/givens/data/gope.2 similarity index 100% rename from givens/data/gope.2 rename to src/givens/data/gope.2 diff --git a/givens/data/gope.3 b/src/givens/data/gope.3 similarity index 100% rename from givens/data/gope.3 rename to src/givens/data/gope.3 diff --git a/givens/data/prch.1 b/src/givens/data/prch.1 similarity index 100% rename from givens/data/prch.1 rename to src/givens/data/prch.1 diff --git a/givens/data/prch.2 b/src/givens/data/prch.2 similarity index 100% rename from givens/data/prch.2 rename to src/givens/data/prch.2 diff --git a/givens/data/prch.3 b/src/givens/data/prch.3 similarity index 100% rename from givens/data/prch.3 rename to src/givens/data/prch.3 diff --git a/givens/data/priklad.1 b/src/givens/data/priklad.1 similarity index 100% rename from givens/data/priklad.1 rename to src/givens/data/priklad.1 diff --git a/givens/data/priklad.2 b/src/givens/data/priklad.2 similarity index 100% rename from givens/data/priklad.2 rename to src/givens/data/priklad.2 diff --git a/givens/data/priklad.3 b/src/givens/data/priklad.3 similarity index 100% rename from givens/data/priklad.3 rename to src/givens/data/priklad.3 diff --git a/givens/givens.for b/src/givens/givens.for similarity index 100% rename from givens/givens.for rename to src/givens/givens.for diff --git a/givens/gt4lsa.for b/src/givens/gt4lsa.for similarity index 100% rename from givens/gt4lsa.for rename to src/givens/gt4lsa.for diff --git a/givens/gtdimr.for b/src/givens/gtdimr.for similarity index 100% rename from givens/gtdimr.for rename to src/givens/gtdimr.for diff --git a/givens/gtfree.for b/src/givens/gtfree.for similarity index 100% rename from givens/gtfree.for rename to src/givens/gtfree.for diff --git a/givens/gtgetr.for b/src/givens/gtgetr.for similarity index 100% rename from givens/gtgetr.for rename to src/givens/gtgetr.for diff --git a/givens/gtmnor.for b/src/givens/gtmnor.for similarity index 100% rename from givens/gtmnor.for rename to src/givens/gtmnor.for diff --git a/givens/gtortm.for b/src/givens/gtortm.for similarity index 100% rename from givens/gtortm.for rename to src/givens/gtortm.for diff --git a/givens/gtperm.for b/src/givens/gtperm.for similarity index 100% rename from givens/gtperm.for rename to src/givens/gtperm.for diff --git a/givens/gtperv.for b/src/givens/gtperv.for similarity index 100% rename from givens/gtperv.for rename to src/givens/gtperv.for diff --git a/givens/gtrad1.for b/src/givens/gtrad1.for similarity index 100% rename from givens/gtrad1.for rename to src/givens/gtrad1.for diff --git a/givens/gtrans.for b/src/givens/gtrans.for similarity index 100% rename from givens/gtrans.for rename to src/givens/gtrans.for diff --git a/givens/gtrpar.for b/src/givens/gtrpar.for similarity index 100% rename from givens/gtrpar.for rename to src/givens/gtrpar.for diff --git a/givens/gtrzs1.for b/src/givens/gtrzs1.for similarity index 100% rename from givens/gtrzs1.for rename to src/givens/gtrzs1.for diff --git a/givens/gtschr.for b/src/givens/gtschr.for similarity index 100% rename from givens/gtschr.for rename to src/givens/gtschr.for diff --git a/givens/gtsing.for b/src/givens/gtsing.for similarity index 100% rename from givens/gtsing.for rename to src/givens/gtsing.for diff --git a/givens/gttime.for b/src/givens/gttime.for similarity index 100% rename from givens/gttime.for rename to src/givens/gttime.for diff --git a/givens/gtvadj.for b/src/givens/gtvadj.for similarity index 100% rename from givens/gtvadj.for rename to src/givens/gtvadj.for diff --git a/givens/gtvahk.for b/src/givens/gtvahk.for similarity index 100% rename from givens/gtvahk.for rename to src/givens/gtvahk.for diff --git a/givens/sparspak.for b/src/givens/sparspak.for similarity index 100% rename from givens/sparspak.for rename to src/givens/sparspak.for diff --git a/givens/sparspak/fn1wd.for b/src/givens/sparspak/fn1wd.for similarity index 100% rename from givens/sparspak/fn1wd.for rename to src/givens/sparspak/fn1wd.for diff --git a/givens/sparspak/fnroot.for b/src/givens/sparspak/fnroot.for similarity index 100% rename from givens/sparspak/fnroot.for rename to src/givens/sparspak/fnroot.for diff --git a/givens/sparspak/gen1wd.for b/src/givens/sparspak/gen1wd.for similarity index 100% rename from givens/sparspak/gen1wd.for rename to src/givens/sparspak/gen1wd.for diff --git a/givens/sparspak/genqmd.for b/src/givens/sparspak/genqmd.for similarity index 100% rename from givens/sparspak/genqmd.for rename to src/givens/sparspak/genqmd.for diff --git a/givens/sparspak/qmdmrg.for b/src/givens/sparspak/qmdmrg.for similarity index 100% rename from givens/sparspak/qmdmrg.for rename to src/givens/sparspak/qmdmrg.for diff --git a/givens/sparspak/qmdqt.for b/src/givens/sparspak/qmdqt.for similarity index 100% rename from givens/sparspak/qmdqt.for rename to src/givens/sparspak/qmdqt.for diff --git a/givens/sparspak/qmdrch.for b/src/givens/sparspak/qmdrch.for similarity index 100% rename from givens/sparspak/qmdrch.for rename to src/givens/sparspak/qmdrch.for diff --git a/givens/sparspak/qmdupd.for b/src/givens/sparspak/qmdupd.for similarity index 100% rename from givens/sparspak/qmdupd.for rename to src/givens/sparspak/qmdupd.for diff --git a/givens/sparspak/rootls.for b/src/givens/sparspak/rootls.for similarity index 100% rename from givens/sparspak/rootls.for rename to src/givens/sparspak/rootls.for diff --git a/givens/sparspak/smbfct.for b/src/givens/sparspak/smbfct.for similarity index 100% rename from givens/sparspak/smbfct.for rename to src/givens/sparspak/smbfct.for