From 62b19990a22946469dca464ccf0fc78db7de6996 Mon Sep 17 00:00:00 2001 From: Mark Gates Date: Mon, 3 Jul 2023 23:48:11 -0400 Subject: [PATCH 1/7] doxygen: new group structure --- BLAS/SRC/caxpy.f | 2 +- BLAS/SRC/ccopy.f | 2 +- BLAS/SRC/cdotc.f | 2 +- BLAS/SRC/cdotu.f | 2 +- BLAS/SRC/cgbmv.f | 2 +- BLAS/SRC/cgemm.f | 2 +- BLAS/SRC/cgemv.f | 2 +- BLAS/SRC/cgerc.f | 2 +- BLAS/SRC/cgeru.f | 2 +- BLAS/SRC/chbmv.f | 2 +- BLAS/SRC/chemm.f | 2 +- BLAS/SRC/chemv.f | 2 +- BLAS/SRC/cher.f | 2 +- BLAS/SRC/cher2.f | 2 +- BLAS/SRC/cher2k.f | 2 +- BLAS/SRC/cherk.f | 2 +- BLAS/SRC/chpmv.f | 2 +- BLAS/SRC/chpr.f | 2 +- BLAS/SRC/chpr2.f | 2 +- BLAS/SRC/crotg.f90 | 2 +- BLAS/SRC/cscal.f | 2 +- BLAS/SRC/csrot.f | 2 +- BLAS/SRC/csscal.f | 2 +- BLAS/SRC/cswap.f | 2 +- BLAS/SRC/csymm.f | 2 +- BLAS/SRC/csyr2k.f | 2 +- BLAS/SRC/csyrk.f | 2 +- BLAS/SRC/ctbmv.f | 2 +- BLAS/SRC/ctbsv.f | 2 +- BLAS/SRC/ctpmv.f | 2 +- BLAS/SRC/ctpsv.f | 2 +- BLAS/SRC/ctrmm.f | 2 +- BLAS/SRC/ctrmv.f | 2 +- BLAS/SRC/ctrsm.f | 2 +- BLAS/SRC/ctrsv.f | 2 +- BLAS/SRC/dasum.f | 2 +- BLAS/SRC/daxpy.f | 2 +- BLAS/SRC/dcabs1.f | 2 +- BLAS/SRC/dcopy.f | 2 +- BLAS/SRC/ddot.f | 2 +- BLAS/SRC/dgbmv.f | 2 +- BLAS/SRC/dgemm.f | 2 +- BLAS/SRC/dgemv.f | 2 +- BLAS/SRC/dger.f | 2 +- BLAS/SRC/dnrm2.f90 | 2 +- BLAS/SRC/drot.f | 2 +- BLAS/SRC/drotg.f90 | 2 +- BLAS/SRC/drotm.f | 2 +- BLAS/SRC/drotmg.f | 2 +- BLAS/SRC/dsbmv.f | 2 +- BLAS/SRC/dscal.f | 2 +- BLAS/SRC/dsdot.f | 2 +- BLAS/SRC/dspmv.f | 2 +- BLAS/SRC/dspr.f | 2 +- BLAS/SRC/dspr2.f | 2 +- BLAS/SRC/dswap.f | 2 +- BLAS/SRC/dsymm.f | 2 +- BLAS/SRC/dsymv.f | 2 +- BLAS/SRC/dsyr.f | 2 +- BLAS/SRC/dsyr2.f | 2 +- BLAS/SRC/dsyr2k.f | 2 +- BLAS/SRC/dsyrk.f | 2 +- BLAS/SRC/dtbmv.f | 2 +- BLAS/SRC/dtbsv.f | 2 +- BLAS/SRC/dtpmv.f | 2 +- BLAS/SRC/dtpsv.f | 2 +- BLAS/SRC/dtrmm.f | 2 +- BLAS/SRC/dtrmv.f | 2 +- BLAS/SRC/dtrsm.f | 2 +- BLAS/SRC/dtrsv.f | 2 +- BLAS/SRC/dzasum.f | 2 +- BLAS/SRC/dznrm2.f90 | 2 +- BLAS/SRC/icamax.f | 2 +- BLAS/SRC/idamax.f | 2 +- BLAS/SRC/isamax.f | 2 +- BLAS/SRC/izamax.f | 2 +- BLAS/SRC/lsame.f | 2 +- BLAS/SRC/sasum.f | 2 +- BLAS/SRC/saxpy.f | 2 +- BLAS/SRC/scabs1.f | 2 +- BLAS/SRC/scasum.f | 2 +- BLAS/SRC/scnrm2.f90 | 2 +- BLAS/SRC/scopy.f | 2 +- BLAS/SRC/sdot.f | 2 +- BLAS/SRC/sdsdot.f | 2 +- BLAS/SRC/sgbmv.f | 2 +- BLAS/SRC/sgemm.f | 2 +- BLAS/SRC/sgemv.f | 2 +- BLAS/SRC/sger.f | 2 +- BLAS/SRC/snrm2.f90 | 2 +- BLAS/SRC/srot.f | 2 +- BLAS/SRC/srotg.f90 | 2 +- BLAS/SRC/srotm.f | 2 +- BLAS/SRC/srotmg.f | 2 +- BLAS/SRC/ssbmv.f | 2 +- BLAS/SRC/sscal.f | 2 +- BLAS/SRC/sspmv.f | 2 +- BLAS/SRC/sspr.f | 2 +- BLAS/SRC/sspr2.f | 2 +- BLAS/SRC/sswap.f | 2 +- BLAS/SRC/ssymm.f | 2 +- BLAS/SRC/ssymv.f | 2 +- BLAS/SRC/ssyr.f | 2 +- BLAS/SRC/ssyr2.f | 2 +- BLAS/SRC/ssyr2k.f | 2 +- BLAS/SRC/ssyrk.f | 2 +- BLAS/SRC/stbmv.f | 2 +- BLAS/SRC/stbsv.f | 2 +- BLAS/SRC/stpmv.f | 2 +- BLAS/SRC/stpsv.f | 2 +- BLAS/SRC/strmm.f | 2 +- BLAS/SRC/strmv.f | 2 +- BLAS/SRC/strsm.f | 2 +- BLAS/SRC/strsv.f | 2 +- BLAS/SRC/xerbla.f | 2 +- BLAS/SRC/xerbla_array.f | 2 +- BLAS/SRC/zaxpy.f | 2 +- BLAS/SRC/zcopy.f | 2 +- BLAS/SRC/zdotc.f | 2 +- BLAS/SRC/zdotu.f | 2 +- BLAS/SRC/zdrot.f | 2 +- BLAS/SRC/zdscal.f | 2 +- BLAS/SRC/zgbmv.f | 2 +- BLAS/SRC/zgemm.f | 2 +- BLAS/SRC/zgemv.f | 2 +- BLAS/SRC/zgerc.f | 2 +- BLAS/SRC/zgeru.f | 2 +- BLAS/SRC/zhbmv.f | 2 +- BLAS/SRC/zhemm.f | 2 +- BLAS/SRC/zhemv.f | 2 +- BLAS/SRC/zher.f | 2 +- BLAS/SRC/zher2.f | 2 +- BLAS/SRC/zher2k.f | 2 +- BLAS/SRC/zherk.f | 2 +- BLAS/SRC/zhpmv.f | 2 +- BLAS/SRC/zhpr.f | 2 +- BLAS/SRC/zhpr2.f | 2 +- BLAS/SRC/zrotg.f90 | 2 +- BLAS/SRC/zscal.f | 2 +- BLAS/SRC/zswap.f | 2 +- BLAS/SRC/zsymm.f | 2 +- BLAS/SRC/zsyr2k.f | 2 +- BLAS/SRC/zsyrk.f | 2 +- BLAS/SRC/ztbmv.f | 2 +- BLAS/SRC/ztbsv.f | 2 +- BLAS/SRC/ztpmv.f | 2 +- BLAS/SRC/ztpsv.f | 2 +- BLAS/SRC/ztrmm.f | 2 +- BLAS/SRC/ztrmv.f | 2 +- BLAS/SRC/ztrsm.f | 2 +- BLAS/SRC/ztrsv.f | 2 +- DOCS/groups-usr.dox | 1573 ++++++++++++++++++++------------- INSTALL/dlamch.f | 5 +- INSTALL/dlamchf77.f | 21 +- INSTALL/droundup_lwork.f | 2 +- INSTALL/dsecnd_EXT_ETIME.f | 2 +- INSTALL/dsecnd_EXT_ETIME_.f | 2 +- INSTALL/dsecnd_INT_CPU_TIME.f | 2 +- INSTALL/dsecnd_INT_ETIME.f | 2 +- INSTALL/dsecnd_NONE.f | 2 +- INSTALL/dsecndtst.f | 2 +- INSTALL/ilaver.f | 2 +- INSTALL/lsame.f | 5 +- INSTALL/second_EXT_ETIME.f | 2 +- INSTALL/second_EXT_ETIME_.f | 2 +- INSTALL/second_INT_CPU_TIME.f | 2 +- INSTALL/second_INT_ETIME.f | 2 +- INSTALL/second_NONE.f | 2 +- INSTALL/secondtst.f | 2 +- INSTALL/slamch.f | 6 +- INSTALL/slamchf77.f | 22 +- INSTALL/sroundup_lwork.f | 2 +- SRC/DEPRECATED/cggsvp.f | 2 +- SRC/DEPRECATED/clahrd.f | 2 +- SRC/DEPRECATED/clatzm.f | 2 +- SRC/DEPRECATED/ctzrqf.f | 2 +- SRC/DEPRECATED/dlahrd.f | 2 +- SRC/DEPRECATED/slahrd.f | 2 +- SRC/DEPRECATED/zggsvp.f | 2 +- SRC/DEPRECATED/zlahrd.f | 2 +- SRC/DEPRECATED/zlatzm.f | 2 +- SRC/DEPRECATED/ztzrqf.f | 2 +- SRC/cbbcsd.f | 2 +- SRC/cbdsqr.f | 2 +- SRC/cgbbrd.f | 2 +- SRC/cgbcon.f | 2 +- SRC/cgbequ.f | 2 +- SRC/cgbequb.f | 2 +- SRC/cgbrfs.f | 2 +- SRC/cgbrfsx.f | 2 +- SRC/cgbsv.f | 2 +- SRC/cgbsvx.f | 2 +- SRC/cgbsvxx.f | 2 +- SRC/cgbtf2.f | 2 +- SRC/cgbtrf.f | 2 +- SRC/cgbtrs.f | 2 +- SRC/cgebak.f | 2 +- SRC/cgebal.f | 2 +- SRC/cgebd2.f | 2 +- SRC/cgebrd.f | 2 +- SRC/cgecon.f | 2 +- SRC/cgeequ.f | 2 +- SRC/cgeequb.f | 2 +- SRC/cgees.f | 2 +- SRC/cgeesx.f | 2 +- SRC/cgeev.f | 2 +- SRC/cgeevx.f | 2 +- SRC/cgehd2.f | 2 +- SRC/cgehrd.f | 2 +- SRC/cgejsv.f | 2 +- SRC/cgelq.f | 2 + SRC/cgelq2.f | 2 +- SRC/cgelqf.f | 2 +- SRC/cgelqt.f | 2 +- SRC/cgelqt3.f | 2 +- SRC/cgels.f | 2 +- SRC/cgelsd.f | 2 +- SRC/cgelss.f | 2 +- SRC/cgelst.f | 2 +- SRC/cgelsy.f | 2 +- SRC/cgemlq.f | 8 +- SRC/cgemlqt.f | 2 +- SRC/cgemqr.f | 6 +- SRC/cgemqrt.f | 2 +- SRC/cgeql2.f | 2 +- SRC/cgeqlf.f | 2 +- SRC/cgeqp3.f | 2 +- SRC/cgeqr.f | 2 + SRC/cgeqr2.f | 2 +- SRC/cgeqr2p.f | 2 +- SRC/cgeqrf.f | 2 +- SRC/cgeqrfp.f | 2 +- SRC/cgeqrt.f | 2 +- SRC/cgeqrt2.f | 2 +- SRC/cgeqrt3.f | 2 +- SRC/cgerfs.f | 2 +- SRC/cgerfsx.f | 2 +- SRC/cgerq2.f | 2 +- SRC/cgerqf.f | 2 +- SRC/cgesc2.f | 2 +- SRC/cgesdd.f | 2 +- SRC/cgesv.f | 4 +- SRC/cgesvd.f | 2 +- SRC/cgesvdq.f | 2 +- SRC/cgesvdx.f | 2 +- SRC/cgesvj.f | 2 +- SRC/cgesvx.f | 2 +- SRC/cgesvxx.f | 2 +- SRC/cgetc2.f | 2 +- SRC/cgetf2.f | 2 +- SRC/cgetrf.f | 2 +- SRC/cgetrf2.f | 2 +- SRC/cgetri.f | 2 +- SRC/cgetrs.f | 2 +- SRC/cgetsls.f | 2 +- SRC/cgetsqrhrt.f | 2 +- SRC/cggbak.f | 2 +- SRC/cggbal.f | 2 +- SRC/cgges.f | 2 +- SRC/cgges3.f | 2 +- SRC/cggesx.f | 2 +- SRC/cggev.f | 2 +- SRC/cggev3.f | 2 +- SRC/cggevx.f | 2 +- SRC/cggglm.f | 2 +- SRC/cgghd3.f | 2 +- SRC/cgghrd.f | 2 +- SRC/cgglse.f | 2 +- SRC/cggqrf.f | 2 +- SRC/cggrqf.f | 2 +- SRC/cggsvd3.f | 2 +- SRC/cggsvp3.f | 2 +- SRC/cgsvj0.f | 2 +- SRC/cgsvj1.f | 2 +- SRC/cgtcon.f | 2 +- SRC/cgtrfs.f | 2 +- SRC/cgtsv.f | 2 +- SRC/cgtsvx.f | 2 +- SRC/cgttrf.f | 2 +- SRC/cgttrs.f | 2 +- SRC/cgtts2.f | 2 +- SRC/chb2st_kernels.f | 2 + SRC/chbev.f | 2 +- SRC/chbev_2stage.f | 12 +- SRC/chbevd.f | 2 +- SRC/chbevd_2stage.f | 16 +- SRC/chbevx.f | 2 +- SRC/chbevx_2stage.f | 18 +- SRC/chbgst.f | 2 +- SRC/chbgv.f | 2 +- SRC/chbgvd.f | 2 +- SRC/chbgvx.f | 2 +- SRC/chbtrd.f | 2 +- SRC/checon.f | 2 +- SRC/checon_3.f | 2 +- SRC/checon_rook.f | 2 +- SRC/cheequb.f | 2 +- SRC/cheev.f | 2 +- SRC/cheev_2stage.f | 16 +- SRC/cheevd.f | 2 +- SRC/cheevd_2stage.f | 14 +- SRC/cheevr.f | 2 +- SRC/cheevr_2stage.f | 20 +- SRC/cheevx.f | 2 +- SRC/cheevx_2stage.f | 18 +- SRC/chegs2.f | 2 +- SRC/chegst.f | 2 +- SRC/chegv.f | 2 +- SRC/chegv_2stage.f | 16 +- SRC/chegvd.f | 2 +- SRC/chegvx.f | 2 +- SRC/cherfs.f | 2 +- SRC/cherfsx.f | 2 +- SRC/chesv.f | 2 +- SRC/chesv_aa.f | 2 +- SRC/chesv_aa_2stage.f | 2 +- SRC/chesv_rk.f | 2 +- SRC/chesv_rook.f | 2 +- SRC/chesvx.f | 2 +- SRC/chesvxx.f | 2 +- SRC/cheswapr.f | 2 +- SRC/chetd2.f | 2 +- SRC/chetf2.f | 2 +- SRC/chetf2_rk.f | 2 +- SRC/chetf2_rook.f | 2 +- SRC/chetrd.f | 2 +- SRC/chetrd_2stage.f | 62 +- SRC/chetrd_hb2st.F | 100 +-- SRC/chetrd_he2hb.f | 2 +- SRC/chetrf.f | 2 +- SRC/chetrf_aa.f | 2 +- SRC/chetrf_aa_2stage.f | 2 +- SRC/chetrf_rk.f | 2 +- SRC/chetrf_rook.f | 2 +- SRC/chetri.f | 2 +- SRC/chetri2.f | 2 +- SRC/chetri2x.f | 2 +- SRC/chetri_3.f | 2 +- SRC/chetri_3x.f | 2 +- SRC/chetri_rook.f | 2 +- SRC/chetrs.f | 2 +- SRC/chetrs2.f | 2 +- SRC/chetrs_3.f | 2 +- SRC/chetrs_aa.f | 2 +- SRC/chetrs_aa_2stage.f | 2 +- SRC/chetrs_rook.f | 2 +- SRC/chfrk.f | 2 +- SRC/chgeqz.f | 2 +- SRC/chla_transtype.f | 2 +- SRC/chpcon.f | 2 +- SRC/chpev.f | 2 +- SRC/chpevd.f | 2 +- SRC/chpevx.f | 2 +- SRC/chpgst.f | 2 +- SRC/chpgv.f | 2 +- SRC/chpgvd.f | 2 +- SRC/chpgvx.f | 2 +- SRC/chprfs.f | 2 +- SRC/chpsv.f | 2 +- SRC/chpsvx.f | 2 +- SRC/chptrd.f | 2 +- SRC/chptrf.f | 2 +- SRC/chptri.f | 2 +- SRC/chptrs.f | 2 +- SRC/chsein.f | 2 +- SRC/chseqr.f | 2 +- SRC/cla_gbamv.f | 2 +- SRC/cla_gbrcond_c.f | 2 +- SRC/cla_gbrcond_x.f | 2 +- SRC/cla_gbrfsx_extended.f | 2 +- SRC/cla_gbrpvgrw.f | 2 +- SRC/cla_geamv.f | 2 +- SRC/cla_gercond_c.f | 2 +- SRC/cla_gercond_x.f | 2 +- SRC/cla_gerfsx_extended.f | 2 +- SRC/cla_gerpvgrw.f | 2 +- SRC/cla_heamv.f | 2 +- SRC/cla_hercond_c.f | 2 +- SRC/cla_hercond_x.f | 2 +- SRC/cla_herfsx_extended.f | 2 +- SRC/cla_herpvgrw.f | 2 +- SRC/cla_lin_berr.f | 2 +- SRC/cla_porcond_c.f | 2 +- SRC/cla_porcond_x.f | 2 +- SRC/cla_porfsx_extended.f | 2 +- SRC/cla_porpvgrw.f | 2 +- SRC/cla_syamv.f | 2 +- SRC/cla_syrcond_c.f | 2 +- SRC/cla_syrcond_x.f | 2 +- SRC/cla_syrfsx_extended.f | 2 +- SRC/cla_syrpvgrw.f | 2 +- SRC/cla_wwaddw.f | 2 +- SRC/clabrd.f | 2 +- SRC/clacgv.f | 2 +- SRC/clacn2.f | 2 +- SRC/clacon.f | 2 +- SRC/clacp2.f | 2 +- SRC/clacpy.f | 2 +- SRC/clacrm.f | 2 +- SRC/clacrt.f | 2 +- SRC/cladiv.f | 2 +- SRC/claed0.f | 2 +- SRC/claed7.f | 2 +- SRC/claed8.f | 2 +- SRC/claein.f | 2 +- SRC/claesy.f | 2 +- SRC/claev2.f | 2 +- SRC/clag2z.f | 2 +- SRC/clags2.f | 2 +- SRC/clagtm.f | 2 +- SRC/clahef.f | 2 +- SRC/clahef_aa.f | 2 +- SRC/clahef_rk.f | 2 +- SRC/clahef_rook.f | 2 +- SRC/clahqr.f | 2 +- SRC/clahr2.f | 2 +- SRC/claic1.f | 2 +- SRC/clals0.f | 2 +- SRC/clalsa.f | 2 +- SRC/clalsd.f | 2 +- SRC/clamswlq.f | 2 + SRC/clamtsqr.f | 2 + SRC/clangb.f | 2 +- SRC/clange.f | 2 +- SRC/clangt.f | 2 +- SRC/clanhb.f | 2 +- SRC/clanhe.f | 2 +- SRC/clanhf.f | 2 +- SRC/clanhp.f | 2 +- SRC/clanhs.f | 2 +- SRC/clanht.f | 2 +- SRC/clansb.f | 2 +- SRC/clansp.f | 2 +- SRC/clansy.f | 2 +- SRC/clantb.f | 2 +- SRC/clantp.f | 2 +- SRC/clantr.f | 2 +- SRC/clapll.f | 2 +- SRC/clapmr.f | 2 +- SRC/clapmt.f | 2 +- SRC/claqgb.f | 2 +- SRC/claqge.f | 2 +- SRC/claqhb.f | 2 +- SRC/claqhe.f | 2 +- SRC/claqhp.f | 2 +- SRC/claqp2.f | 2 +- SRC/claqps.f | 2 +- SRC/claqr0.f | 2 +- SRC/claqr1.f | 2 +- SRC/claqr2.f | 2 +- SRC/claqr3.f | 2 +- SRC/claqr4.f | 2 +- SRC/claqr5.f | 2 +- SRC/claqsb.f | 2 +- SRC/claqsp.f | 2 +- SRC/claqsy.f | 2 +- SRC/claqz0.f | 2 +- SRC/claqz1.f | 2 +- SRC/claqz2.f | 3 +- SRC/claqz3.f | 2 +- SRC/clar1v.f | 2 +- SRC/clar2v.f | 2 +- SRC/clarcm.f | 2 +- SRC/clarf.f | 2 +- SRC/clarfb.f | 2 +- SRC/clarfb_gett.f | 2 +- SRC/clarfg.f | 2 +- SRC/clarfgp.f | 2 +- SRC/clarft.f | 2 +- SRC/clarfx.f | 2 +- SRC/clarfy.f | 2 +- SRC/clargv.f | 2 +- SRC/clarnv.f | 2 +- SRC/clarrv.f | 2 +- SRC/clarscl2.f | 2 +- SRC/clartg.f90 | 6 +- SRC/clartv.f | 2 +- SRC/clarz.f | 2 +- SRC/clarzb.f | 2 +- SRC/clarzt.f | 2 +- SRC/clascl.f | 2 +- SRC/clascl2.f | 2 +- SRC/claset.f | 2 +- SRC/clasr.f | 2 +- SRC/claswlq.f | 2 + SRC/claswp.f | 2 +- SRC/clasyf.f | 2 +- SRC/clasyf_aa.f | 2 +- SRC/clasyf_rk.f | 2 +- SRC/clasyf_rook.f | 2 +- SRC/clatbs.f | 2 +- SRC/clatdf.f | 2 +- SRC/clatps.f | 2 +- SRC/clatrd.f | 2 +- SRC/clatrs.f | 2 +- SRC/clatrs3.f | 2 +- SRC/clatrz.f | 2 +- SRC/clatsqr.f | 2 + SRC/claunhr_col_getrfnp.f | 2 +- SRC/claunhr_col_getrfnp2.f | 2 +- SRC/clauu2.f | 2 +- SRC/clauum.f | 2 +- SRC/cpbcon.f | 2 +- SRC/cpbequ.f | 2 +- SRC/cpbrfs.f | 2 +- SRC/cpbstf.f | 2 +- SRC/cpbsv.f | 2 +- SRC/cpbsvx.f | 2 +- SRC/cpbtf2.f | 2 +- SRC/cpbtrf.f | 2 +- SRC/cpbtrs.f | 2 +- SRC/cpftrf.f | 2 +- SRC/cpftri.f | 2 +- SRC/cpftrs.f | 2 +- SRC/cpocon.f | 2 +- SRC/cpoequ.f | 2 +- SRC/cpoequb.f | 2 +- SRC/cporfs.f | 2 +- SRC/cporfsx.f | 2 +- SRC/cposv.f | 2 +- SRC/cposvx.f | 2 +- SRC/cposvxx.f | 2 +- SRC/cpotf2.f | 2 +- SRC/cpotrf.f | 2 +- SRC/cpotrf2.f | 2 +- SRC/cpotri.f | 2 +- SRC/cpotrs.f | 2 +- SRC/cppcon.f | 2 +- SRC/cppequ.f | 2 +- SRC/cpprfs.f | 2 +- SRC/cppsv.f | 2 +- SRC/cppsvx.f | 2 +- SRC/cpptrf.f | 2 +- SRC/cpptri.f | 2 +- SRC/cpptrs.f | 2 +- SRC/cpstf2.f | 2 +- SRC/cpstrf.f | 2 +- SRC/cptcon.f | 2 +- SRC/cpteqr.f | 2 +- SRC/cptrfs.f | 2 +- SRC/cptsv.f | 2 +- SRC/cptsvx.f | 2 +- SRC/cpttrf.f | 2 +- SRC/cpttrs.f | 2 +- SRC/cptts2.f | 2 +- SRC/crot.f | 4 +- SRC/cspcon.f | 2 +- SRC/cspmv.f | 2 +- SRC/cspr.f | 2 +- SRC/csprfs.f | 2 +- SRC/cspsv.f | 2 +- SRC/cspsvx.f | 2 +- SRC/csptrf.f | 2 +- SRC/csptri.f | 2 +- SRC/csptrs.f | 2 +- SRC/csrscl.f | 2 +- SRC/cstedc.f | 2 +- SRC/cstegr.f | 2 +- SRC/cstein.f | 2 +- SRC/cstemr.f | 2 +- SRC/csteqr.f | 2 +- SRC/csycon.f | 2 +- SRC/csycon_3.f | 2 +- SRC/csycon_rook.f | 2 +- SRC/csyconv.f | 2 +- SRC/csyconvf.f | 2 +- SRC/csyconvf_rook.f | 2 +- SRC/csyequb.f | 2 +- SRC/csymv.f | 2 +- SRC/csyr.f | 2 +- SRC/csyrfs.f | 2 +- SRC/csyrfsx.f | 2 +- SRC/csysv.f | 2 +- SRC/csysv_aa.f | 2 +- SRC/csysv_aa_2stage.f | 2 +- SRC/csysv_rk.f | 2 +- SRC/csysv_rook.f | 2 +- SRC/csysvx.f | 2 +- SRC/csysvxx.f | 2 +- SRC/csyswapr.f | 2 +- SRC/csytf2.f | 2 +- SRC/csytf2_rk.f | 2 +- SRC/csytf2_rook.f | 2 +- SRC/csytrf.f | 2 +- SRC/csytrf_aa.f | 2 +- SRC/csytrf_aa_2stage.f | 2 +- SRC/csytrf_rk.f | 2 +- SRC/csytrf_rook.f | 2 +- SRC/csytri.f | 2 +- SRC/csytri2.f | 2 +- SRC/csytri2x.f | 2 +- SRC/csytri_3.f | 2 +- SRC/csytri_3x.f | 2 +- SRC/csytri_rook.f | 2 +- SRC/csytrs.f | 2 +- SRC/csytrs2.f | 2 +- SRC/csytrs_3.f | 2 +- SRC/csytrs_aa.f | 2 +- SRC/csytrs_aa_2stage.f | 2 +- SRC/csytrs_rook.f | 2 +- SRC/ctbcon.f | 2 +- SRC/ctbrfs.f | 2 +- SRC/ctbtrs.f | 2 +- SRC/ctfsm.f | 2 +- SRC/ctftri.f | 2 +- SRC/ctfttp.f | 2 +- SRC/ctfttr.f | 2 +- SRC/ctgevc.f | 2 +- SRC/ctgex2.f | 2 +- SRC/ctgexc.f | 2 +- SRC/ctgsen.f | 2 +- SRC/ctgsja.f | 2 +- SRC/ctgsna.f | 2 +- SRC/ctgsy2.f | 2 +- SRC/ctgsyl.f | 2 +- SRC/ctpcon.f | 2 +- SRC/ctplqt.f | 2 +- SRC/ctplqt2.f | 2 +- SRC/ctpmlqt.f | 2 +- SRC/ctpmqrt.f | 2 +- SRC/ctpqrt.f | 2 +- SRC/ctpqrt2.f | 2 +- SRC/ctprfb.f | 2 +- SRC/ctprfs.f | 2 +- SRC/ctptri.f | 2 +- SRC/ctptrs.f | 2 +- SRC/ctpttf.f | 2 +- SRC/ctpttr.f | 2 +- SRC/ctrcon.f | 2 +- SRC/ctrevc.f | 2 +- SRC/ctrevc3.f | 2 +- SRC/ctrexc.f | 2 +- SRC/ctrrfs.f | 2 +- SRC/ctrsen.f | 2 +- SRC/ctrsna.f | 2 +- SRC/ctrsyl.f | 2 +- SRC/ctrsyl3.f | 2 +- SRC/ctrti2.f | 2 +- SRC/ctrtri.f | 2 +- SRC/ctrtrs.f | 2 +- SRC/ctrttf.f | 2 +- SRC/ctrttp.f | 2 +- SRC/ctzrzf.f | 2 +- SRC/cunbdb.f | 2 +- SRC/cunbdb1.f | 2 +- SRC/cunbdb2.f | 2 +- SRC/cunbdb3.f | 2 +- SRC/cunbdb4.f | 2 +- SRC/cunbdb5.f | 2 +- SRC/cunbdb6.f | 2 +- SRC/cuncsd.f | 2 +- SRC/cuncsd2by1.f | 2 +- SRC/cung2l.f | 2 +- SRC/cung2r.f | 2 +- SRC/cungbr.f | 2 +- SRC/cunghr.f | 2 +- SRC/cungl2.f | 2 +- SRC/cunglq.f | 2 +- SRC/cungql.f | 2 +- SRC/cungqr.f | 2 +- SRC/cungr2.f | 2 +- SRC/cungrq.f | 2 +- SRC/cungtr.f | 2 +- SRC/cungtsqr.f | 2 +- SRC/cungtsqr_row.f | 2 +- SRC/cunhr_col.f | 2 +- SRC/cunm22.f | 2 +- SRC/cunm2l.f | 2 +- SRC/cunm2r.f | 2 +- SRC/cunmbr.f | 2 +- SRC/cunmhr.f | 2 +- SRC/cunml2.f | 2 +- SRC/cunmlq.f | 2 +- SRC/cunmql.f | 2 +- SRC/cunmqr.f | 2 +- SRC/cunmr2.f | 2 +- SRC/cunmr3.f | 2 +- SRC/cunmrq.f | 2 +- SRC/cunmrz.f | 2 +- SRC/cunmtr.f | 2 +- SRC/cupgtr.f | 2 +- SRC/cupmtr.f | 2 +- SRC/dbbcsd.f | 2 +- SRC/dbdsdc.f | 2 +- SRC/dbdsqr.f | 2 +- SRC/dbdsvdx.f | 2 +- SRC/ddisna.f | 2 +- SRC/dgbbrd.f | 2 +- SRC/dgbcon.f | 2 +- SRC/dgbequ.f | 2 +- SRC/dgbequb.f | 2 +- SRC/dgbrfs.f | 2 +- SRC/dgbrfsx.f | 2 +- SRC/dgbsv.f | 2 +- SRC/dgbsvx.f | 2 +- SRC/dgbsvxx.f | 2 +- SRC/dgbtf2.f | 2 +- SRC/dgbtrf.f | 2 +- SRC/dgbtrs.f | 2 +- SRC/dgebak.f | 2 +- SRC/dgebal.f | 2 +- SRC/dgebd2.f | 2 +- SRC/dgebrd.f | 2 +- SRC/dgecon.f | 2 +- SRC/dgeequ.f | 2 +- SRC/dgeequb.f | 2 +- SRC/dgees.f | 2 +- SRC/dgeesx.f | 2 +- SRC/dgeev.f | 2 +- SRC/dgeevx.f | 2 +- SRC/dgehd2.f | 2 +- SRC/dgehrd.f | 2 +- SRC/dgejsv.f | 2 +- SRC/dgelq.f | 2 + SRC/dgelq2.f | 2 +- SRC/dgelqf.f | 2 +- SRC/dgelqt.f | 2 +- SRC/dgelqt3.f | 2 +- SRC/dgels.f | 2 +- SRC/dgelsd.f | 2 +- SRC/dgelss.f | 2 +- SRC/dgelst.f | 2 +- SRC/dgelsy.f | 2 +- SRC/dgemlq.f | 8 +- SRC/dgemlqt.f | 2 +- SRC/dgemqr.f | 8 +- SRC/dgemqrt.f | 2 +- SRC/dgeql2.f | 2 +- SRC/dgeqlf.f | 2 +- SRC/dgeqp3.f | 2 +- SRC/dgeqr.f | 2 + SRC/dgeqr2.f | 2 +- SRC/dgeqr2p.f | 2 +- SRC/dgeqrf.f | 2 +- SRC/dgeqrfp.f | 2 +- SRC/dgeqrt.f | 2 +- SRC/dgeqrt2.f | 2 +- SRC/dgeqrt3.f | 2 +- SRC/dgerfs.f | 2 +- SRC/dgerfsx.f | 2 +- SRC/dgerq2.f | 2 +- SRC/dgerqf.f | 2 +- SRC/dgesc2.f | 2 +- SRC/dgesdd.f | 2 +- SRC/dgesv.f | 4 +- SRC/dgesvd.f | 2 +- SRC/dgesvdq.f | 2 +- SRC/dgesvdx.f | 2 +- SRC/dgesvj.f | 2 +- SRC/dgesvx.f | 2 +- SRC/dgesvxx.f | 2 +- SRC/dgetc2.f | 2 +- SRC/dgetf2.f | 2 +- SRC/dgetrf.f | 2 +- SRC/dgetrf2.f | 2 +- SRC/dgetri.f | 2 +- SRC/dgetrs.f | 2 +- SRC/dgetsls.f | 2 +- SRC/dgetsqrhrt.f | 2 +- SRC/dggbak.f | 2 +- SRC/dggbal.f | 2 +- SRC/dgges.f | 2 +- SRC/dgges3.f | 2 +- SRC/dggesx.f | 2 +- SRC/dggev.f | 2 +- SRC/dggev3.f | 2 +- SRC/dggevx.f | 2 +- SRC/dggglm.f | 2 +- SRC/dgghd3.f | 2 +- SRC/dgghrd.f | 2 +- SRC/dgglse.f | 2 +- SRC/dggqrf.f | 2 +- SRC/dggrqf.f | 2 +- SRC/dggsvd3.f | 2 +- SRC/dggsvp3.f | 2 +- SRC/dgsvj0.f | 2 +- SRC/dgsvj1.f | 2 +- SRC/dgtcon.f | 2 +- SRC/dgtrfs.f | 2 +- SRC/dgtsv.f | 2 +- SRC/dgtsvx.f | 2 +- SRC/dgttrf.f | 2 +- SRC/dgttrs.f | 2 +- SRC/dgtts2.f | 2 +- SRC/dhgeqz.f | 2 +- SRC/dhsein.f | 2 +- SRC/dhseqr.f | 2 +- SRC/disnan.f | 2 +- SRC/dla_gbamv.f | 2 +- SRC/dla_gbrcond.f | 2 +- SRC/dla_gbrfsx_extended.f | 2 +- SRC/dla_gbrpvgrw.f | 2 +- SRC/dla_geamv.f | 2 +- SRC/dla_gercond.f | 2 +- SRC/dla_gerfsx_extended.f | 2 +- SRC/dla_gerpvgrw.f | 2 +- SRC/dla_lin_berr.f | 2 +- SRC/dla_porcond.f | 2 +- SRC/dla_porfsx_extended.f | 2 +- SRC/dla_porpvgrw.f | 2 +- SRC/dla_syamv.f | 2 +- SRC/dla_syrcond.f | 2 +- SRC/dla_syrfsx_extended.f | 2 +- SRC/dla_syrpvgrw.f | 2 +- SRC/dla_wwaddw.f | 2 +- SRC/dlabad.f | 2 +- SRC/dlabrd.f | 2 +- SRC/dlacn2.f | 2 +- SRC/dlacon.f | 2 +- SRC/dlacpy.f | 2 +- SRC/dladiv.f | 6 +- SRC/dlae2.f | 2 +- SRC/dlaebz.f | 2 +- SRC/dlaed0.f | 2 +- SRC/dlaed1.f | 2 +- SRC/dlaed2.f | 2 +- SRC/dlaed3.f | 2 +- SRC/dlaed4.f | 2 +- SRC/dlaed5.f | 2 +- SRC/dlaed6.f | 2 +- SRC/dlaed7.f | 2 +- SRC/dlaed8.f | 2 +- SRC/dlaed9.f | 2 +- SRC/dlaeda.f | 2 +- SRC/dlaein.f | 2 +- SRC/dlaev2.f | 2 +- SRC/dlaexc.f | 2 +- SRC/dlag2.f | 2 +- SRC/dlag2s.f | 2 +- SRC/dlags2.f | 2 +- SRC/dlagtf.f | 2 +- SRC/dlagtm.f | 2 +- SRC/dlagts.f | 6 +- SRC/dlagv2.f | 2 +- SRC/dlahqr.f | 2 +- SRC/dlahr2.f | 2 +- SRC/dlaic1.f | 2 +- SRC/dlaisnan.f | 2 +- SRC/dlaln2.f | 2 +- SRC/dlals0.f | 2 +- SRC/dlalsa.f | 2 +- SRC/dlalsd.f | 2 +- SRC/dlamrg.f | 2 +- SRC/dlamswlq.f | 2 + SRC/dlamtsqr.f | 2 + SRC/dlaneg.f | 2 +- SRC/dlangb.f | 2 +- SRC/dlange.f | 2 +- SRC/dlangt.f | 2 +- SRC/dlanhs.f | 2 +- SRC/dlansb.f | 2 +- SRC/dlansf.f | 2 +- SRC/dlansp.f | 2 +- SRC/dlanst.f | 2 +- SRC/dlansy.f | 2 +- SRC/dlantb.f | 2 +- SRC/dlantp.f | 2 +- SRC/dlantr.f | 2 +- SRC/dlanv2.f | 2 +- SRC/dlaorhr_col_getrfnp.f | 2 +- SRC/dlaorhr_col_getrfnp2.f | 2 +- SRC/dlapll.f | 2 +- SRC/dlapmr.f | 2 +- SRC/dlapmt.f | 2 +- SRC/dlapy2.f | 2 +- SRC/dlapy3.f | 2 +- SRC/dlaqgb.f | 2 +- SRC/dlaqge.f | 2 +- SRC/dlaqp2.f | 2 +- SRC/dlaqps.f | 2 +- SRC/dlaqr0.f | 2 +- SRC/dlaqr1.f | 2 +- SRC/dlaqr2.f | 2 +- SRC/dlaqr3.f | 2 +- SRC/dlaqr4.f | 2 +- SRC/dlaqr5.f | 2 +- SRC/dlaqsb.f | 2 +- SRC/dlaqsp.f | 2 +- SRC/dlaqsy.f | 2 +- SRC/dlaqtr.f | 2 +- SRC/dlaqz0.f | 2 +- SRC/dlaqz1.f | 2 +- SRC/dlaqz2.f | 2 +- SRC/dlaqz3.f | 2 +- SRC/dlaqz4.f | 2 +- SRC/dlar1v.f | 2 +- SRC/dlar2v.f | 2 +- SRC/dlarf.f | 2 +- SRC/dlarfb.f | 2 +- SRC/dlarfb_gett.f | 2 +- SRC/dlarfg.f | 2 +- SRC/dlarfgp.f | 2 +- SRC/dlarft.f | 2 +- SRC/dlarfx.f | 2 +- SRC/dlarfy.f | 2 +- SRC/dlargv.f | 2 +- SRC/dlarmm.f | 2 +- SRC/dlarnv.f | 2 +- SRC/dlarra.f | 2 +- SRC/dlarrb.f | 2 +- SRC/dlarrc.f | 2 +- SRC/dlarrd.f | 2 +- SRC/dlarre.f | 2 +- SRC/dlarrf.f | 2 +- SRC/dlarrj.f | 2 +- SRC/dlarrk.f | 2 +- SRC/dlarrr.f | 2 +- SRC/dlarrv.f | 2 +- SRC/dlarscl2.f | 2 +- SRC/dlartg.f90 | 2 +- SRC/dlartgp.f | 2 +- SRC/dlartgs.f | 2 +- SRC/dlartv.f | 2 +- SRC/dlaruv.f | 2 +- SRC/dlarz.f | 2 +- SRC/dlarzb.f | 2 +- SRC/dlarzt.f | 2 +- SRC/dlas2.f | 2 +- SRC/dlascl.f | 2 +- SRC/dlascl2.f | 2 +- SRC/dlasd0.f | 2 +- SRC/dlasd1.f | 2 +- SRC/dlasd2.f | 2 +- SRC/dlasd3.f | 2 +- SRC/dlasd4.f | 2 +- SRC/dlasd5.f | 2 +- SRC/dlasd6.f | 2 +- SRC/dlasd7.f | 2 +- SRC/dlasd8.f | 2 +- SRC/dlasda.f | 2 +- SRC/dlasdq.f | 2 +- SRC/dlasdt.f | 2 +- SRC/dlaset.f | 2 +- SRC/dlasq1.f | 2 +- SRC/dlasq2.f | 2 +- SRC/dlasq3.f | 2 +- SRC/dlasq4.f | 2 +- SRC/dlasq5.f | 2 +- SRC/dlasq6.f | 2 +- SRC/dlasr.f | 2 +- SRC/dlasrt.f | 2 +- SRC/dlasv2.f | 2 +- SRC/dlaswlq.f | 2 + SRC/dlaswp.f | 2 +- SRC/dlasy2.f | 2 +- SRC/dlasyf.f | 2 +- SRC/dlasyf_aa.f | 2 +- SRC/dlasyf_rk.f | 2 +- SRC/dlasyf_rook.f | 2 +- SRC/dlat2s.f | 2 +- SRC/dlatbs.f | 2 +- SRC/dlatdf.f | 2 +- SRC/dlatps.f | 2 +- SRC/dlatrd.f | 2 +- SRC/dlatrs.f | 2 +- SRC/dlatrs3.f | 2 +- SRC/dlatrz.f | 2 +- SRC/dlatsqr.f | 2 + SRC/dlauu2.f | 2 +- SRC/dlauum.f | 2 +- SRC/dopgtr.f | 2 +- SRC/dopmtr.f | 2 +- SRC/dorbdb.f | 2 +- SRC/dorbdb1.f | 2 +- SRC/dorbdb2.f | 2 +- SRC/dorbdb3.f | 2 +- SRC/dorbdb4.f | 2 +- SRC/dorbdb5.f | 2 +- SRC/dorbdb6.f | 2 +- SRC/dorcsd.f | 2 +- SRC/dorcsd2by1.f | 2 +- SRC/dorg2l.f | 2 +- SRC/dorg2r.f | 2 +- SRC/dorgbr.f | 2 +- SRC/dorghr.f | 2 +- SRC/dorgl2.f | 2 +- SRC/dorglq.f | 2 +- SRC/dorgql.f | 2 +- SRC/dorgqr.f | 2 +- SRC/dorgr2.f | 2 +- SRC/dorgrq.f | 2 +- SRC/dorgtr.f | 2 +- SRC/dorgtsqr.f | 2 +- SRC/dorgtsqr_row.f | 2 +- SRC/dorhr_col.f | 2 +- SRC/dorm22.f | 2 +- SRC/dorm2l.f | 2 +- SRC/dorm2r.f | 2 +- SRC/dormbr.f | 2 +- SRC/dormhr.f | 2 +- SRC/dorml2.f | 2 +- SRC/dormlq.f | 2 +- SRC/dormql.f | 2 +- SRC/dormqr.f | 2 +- SRC/dormr2.f | 2 +- SRC/dormr3.f | 2 +- SRC/dormrq.f | 2 +- SRC/dormrz.f | 2 +- SRC/dormtr.f | 2 +- SRC/dpbcon.f | 2 +- SRC/dpbequ.f | 2 +- SRC/dpbrfs.f | 2 +- SRC/dpbstf.f | 2 +- SRC/dpbsv.f | 2 +- SRC/dpbsvx.f | 2 +- SRC/dpbtf2.f | 2 +- SRC/dpbtrf.f | 2 +- SRC/dpbtrs.f | 2 +- SRC/dpftrf.f | 2 +- SRC/dpftri.f | 2 +- SRC/dpftrs.f | 2 +- SRC/dpocon.f | 2 +- SRC/dpoequ.f | 2 +- SRC/dpoequb.f | 2 +- SRC/dporfs.f | 2 +- SRC/dporfsx.f | 2 +- SRC/dposv.f | 2 +- SRC/dposvx.f | 2 +- SRC/dposvxx.f | 2 +- SRC/dpotf2.f | 2 +- SRC/dpotrf.f | 2 +- SRC/dpotrf2.f | 2 +- SRC/dpotri.f | 2 +- SRC/dpotrs.f | 2 +- SRC/dppcon.f | 2 +- SRC/dppequ.f | 2 +- SRC/dpprfs.f | 2 +- SRC/dppsv.f | 2 +- SRC/dppsvx.f | 2 +- SRC/dpptrf.f | 2 +- SRC/dpptri.f | 2 +- SRC/dpptrs.f | 2 +- SRC/dpstf2.f | 2 +- SRC/dpstrf.f | 2 +- SRC/dptcon.f | 2 +- SRC/dpteqr.f | 2 +- SRC/dptrfs.f | 2 +- SRC/dptsv.f | 2 +- SRC/dptsvx.f | 2 +- SRC/dpttrf.f | 2 +- SRC/dpttrs.f | 2 +- SRC/dptts2.f | 2 +- SRC/drscl.f | 2 +- SRC/dsb2st_kernels.f | 2 + SRC/dsbev.f | 2 +- SRC/dsbev_2stage.f | 14 +- SRC/dsbevd.f | 2 +- SRC/dsbevd_2stage.f | 12 +- SRC/dsbevx.f | 2 +- SRC/dsbevx_2stage.f | 12 +- SRC/dsbgst.f | 2 +- SRC/dsbgv.f | 2 +- SRC/dsbgvd.f | 2 +- SRC/dsbgvx.f | 2 +- SRC/dsbtrd.f | 2 +- SRC/dsfrk.f | 2 +- SRC/dsgesv.f | 2 +- SRC/dspcon.f | 2 +- SRC/dspev.f | 2 +- SRC/dspevd.f | 2 +- SRC/dspevx.f | 2 +- SRC/dspgst.f | 2 +- SRC/dspgv.f | 2 +- SRC/dspgvd.f | 2 +- SRC/dspgvx.f | 2 +- SRC/dsposv.f | 2 +- SRC/dsprfs.f | 2 +- SRC/dspsv.f | 2 +- SRC/dspsvx.f | 2 +- SRC/dsptrd.f | 2 +- SRC/dsptrf.f | 2 +- SRC/dsptri.f | 2 +- SRC/dsptrs.f | 2 +- SRC/dstebz.f | 2 +- SRC/dstedc.f | 2 +- SRC/dstegr.f | 2 +- SRC/dstein.f | 2 +- SRC/dstemr.f | 2 +- SRC/dsteqr.f | 2 +- SRC/dsterf.f | 2 +- SRC/dstev.f | 2 +- SRC/dstevd.f | 2 +- SRC/dstevr.f | 2 +- SRC/dstevx.f | 2 +- SRC/dsycon.f | 2 +- SRC/dsycon_3.f | 2 +- SRC/dsycon_rook.f | 2 +- SRC/dsyconv.f | 2 +- SRC/dsyconvf.f | 2 +- SRC/dsyconvf_rook.f | 2 +- SRC/dsyequb.f | 2 +- SRC/dsyev.f | 2 +- SRC/dsyev_2stage.f | 20 +- SRC/dsyevd.f | 2 +- SRC/dsyevd_2stage.f | 14 +- SRC/dsyevr.f | 2 +- SRC/dsyevr_2stage.f | 18 +- SRC/dsyevx.f | 2 +- SRC/dsyevx_2stage.f | 16 +- SRC/dsygs2.f | 2 +- SRC/dsygst.f | 2 +- SRC/dsygv.f | 2 +- SRC/dsygv_2stage.f | 16 +- SRC/dsygvd.f | 2 +- SRC/dsygvx.f | 2 +- SRC/dsyrfs.f | 2 +- SRC/dsyrfsx.f | 2 +- SRC/dsysv.f | 2 +- SRC/dsysv_aa.f | 2 +- SRC/dsysv_aa_2stage.f | 2 +- SRC/dsysv_rk.f | 2 +- SRC/dsysv_rook.f | 2 +- SRC/dsysvx.f | 2 +- SRC/dsysvxx.f | 2 +- SRC/dsyswapr.f | 2 +- SRC/dsytd2.f | 2 +- SRC/dsytf2.f | 2 +- SRC/dsytf2_rk.f | 2 +- SRC/dsytf2_rook.f | 2 +- SRC/dsytrd.f | 2 +- SRC/dsytrd_2stage.f | 62 +- SRC/dsytrd_sb2st.F | 100 +-- SRC/dsytrd_sy2sb.f | 2 +- SRC/dsytrf.f | 2 +- SRC/dsytrf_aa.f | 2 +- SRC/dsytrf_aa_2stage.f | 2 +- SRC/dsytrf_rk.f | 2 +- SRC/dsytrf_rook.f | 2 +- SRC/dsytri.f | 2 +- SRC/dsytri2.f | 2 +- SRC/dsytri2x.f | 2 +- SRC/dsytri_3.f | 2 +- SRC/dsytri_3x.f | 2 +- SRC/dsytri_rook.f | 2 +- SRC/dsytrs.f | 2 +- SRC/dsytrs2.f | 2 +- SRC/dsytrs_3.f | 2 +- SRC/dsytrs_aa.f | 2 +- SRC/dsytrs_aa_2stage.f | 2 +- SRC/dsytrs_rook.f | 2 +- SRC/dtbcon.f | 2 +- SRC/dtbrfs.f | 2 +- SRC/dtbtrs.f | 2 +- SRC/dtfsm.f | 2 +- SRC/dtftri.f | 2 +- SRC/dtfttp.f | 2 +- SRC/dtfttr.f | 2 +- SRC/dtgevc.f | 2 +- SRC/dtgex2.f | 2 +- SRC/dtgexc.f | 2 +- SRC/dtgsen.f | 2 +- SRC/dtgsja.f | 2 +- SRC/dtgsna.f | 2 +- SRC/dtgsy2.f | 2 +- SRC/dtgsyl.f | 2 +- SRC/dtpcon.f | 2 +- SRC/dtplqt.f | 2 +- SRC/dtplqt2.f | 2 +- SRC/dtpmlqt.f | 2 +- SRC/dtpmqrt.f | 2 +- SRC/dtpqrt.f | 2 +- SRC/dtpqrt2.f | 2 +- SRC/dtprfb.f | 2 +- SRC/dtprfs.f | 2 +- SRC/dtptri.f | 2 +- SRC/dtptrs.f | 2 +- SRC/dtpttf.f | 2 +- SRC/dtpttr.f | 2 +- SRC/dtrcon.f | 2 +- SRC/dtrevc.f | 2 +- SRC/dtrevc3.f | 2 +- SRC/dtrexc.f | 2 +- SRC/dtrrfs.f | 2 +- SRC/dtrsen.f | 2 +- SRC/dtrsna.f | 2 +- SRC/dtrsyl.f | 2 +- SRC/dtrti2.f | 2 +- SRC/dtrtri.f | 2 +- SRC/dtrtrs.f | 2 +- SRC/dtrttf.f | 2 +- SRC/dtrttp.f | 2 +- SRC/dtzrzf.f | 2 +- SRC/dzsum1.f | 2 +- SRC/icmax1.f | 2 +- SRC/ieeeck.f | 2 +- SRC/ilaclc.f | 2 +- SRC/ilaclr.f | 2 +- SRC/iladiag.f | 2 +- SRC/iladlc.f | 2 +- SRC/iladlr.f | 2 +- SRC/ilaenv.f | 2 +- SRC/ilaenv2stage.f | 8 +- SRC/ilaprec.f | 2 +- SRC/ilaslc.f | 2 +- SRC/ilaslr.f | 2 +- SRC/ilatrans.f | 2 +- SRC/ilauplo.f | 2 +- SRC/ilazlc.f | 2 +- SRC/ilazlr.f | 2 +- SRC/iparam2stage.F | 78 +- SRC/iparmq.f | 2 +- SRC/izmax1.f | 2 +- SRC/la_constants.f90 | 10 +- SRC/lsamen.f | 2 +- SRC/sbbcsd.f | 2 +- SRC/sbdsdc.f | 2 +- SRC/sbdsqr.f | 2 +- SRC/sbdsvdx.f | 2 +- SRC/scsum1.f | 2 +- SRC/sdisna.f | 2 +- SRC/sgbbrd.f | 2 +- SRC/sgbcon.f | 2 +- SRC/sgbequ.f | 2 +- SRC/sgbequb.f | 2 +- SRC/sgbrfs.f | 2 +- SRC/sgbrfsx.f | 2 +- SRC/sgbsv.f | 2 +- SRC/sgbsvx.f | 2 +- SRC/sgbsvxx.f | 2 +- SRC/sgbtf2.f | 2 +- SRC/sgbtrf.f | 2 +- SRC/sgbtrs.f | 2 +- SRC/sgebak.f | 2 +- SRC/sgebal.f | 2 +- SRC/sgebd2.f | 2 +- SRC/sgebrd.f | 2 +- SRC/sgecon.f | 2 +- SRC/sgeequ.f | 2 +- SRC/sgeequb.f | 2 +- SRC/sgees.f | 2 +- SRC/sgeesx.f | 2 +- SRC/sgeev.f | 2 +- SRC/sgeevx.f | 2 +- SRC/sgehd2.f | 2 +- SRC/sgehrd.f | 2 +- SRC/sgejsv.f | 2 +- SRC/sgelq.f | 2 + SRC/sgelq2.f | 2 +- SRC/sgelqf.f | 2 +- SRC/sgelqt.f | 2 +- SRC/sgelqt3.f | 2 +- SRC/sgels.f | 2 +- SRC/sgelsd.f | 2 +- SRC/sgelss.f | 2 +- SRC/sgelst.f | 2 +- SRC/sgelsy.f | 2 +- SRC/sgemlq.f | 8 +- SRC/sgemlqt.f | 2 +- SRC/sgemqr.f | 8 +- SRC/sgemqrt.f | 2 +- SRC/sgeql2.f | 2 +- SRC/sgeqlf.f | 2 +- SRC/sgeqp3.f | 2 +- SRC/sgeqr.f | 2 + SRC/sgeqr2.f | 2 +- SRC/sgeqr2p.f | 2 +- SRC/sgeqrf.f | 2 +- SRC/sgeqrfp.f | 2 +- SRC/sgeqrt.f | 2 +- SRC/sgeqrt2.f | 2 +- SRC/sgeqrt3.f | 2 +- SRC/sgerfs.f | 2 +- SRC/sgerfsx.f | 2 +- SRC/sgerq2.f | 2 +- SRC/sgerqf.f | 2 +- SRC/sgesc2.f | 2 +- SRC/sgesdd.f | 2 +- SRC/sgesv.f | 4 +- SRC/sgesvd.f | 2 +- SRC/sgesvdq.f | 2 +- SRC/sgesvdx.f | 2 +- SRC/sgesvj.f | 2 +- SRC/sgesvx.f | 2 +- SRC/sgesvxx.f | 2 +- SRC/sgetc2.f | 2 +- SRC/sgetf2.f | 2 +- SRC/sgetrf.f | 2 +- SRC/sgetrf2.f | 2 +- SRC/sgetri.f | 2 +- SRC/sgetrs.f | 2 +- SRC/sgetsls.f | 2 +- SRC/sgetsqrhrt.f | 2 +- SRC/sggbak.f | 2 +- SRC/sggbal.f | 2 +- SRC/sgges.f | 2 +- SRC/sgges3.f | 2 +- SRC/sggesx.f | 2 +- SRC/sggev.f | 2 +- SRC/sggev3.f | 2 +- SRC/sggevx.f | 2 +- SRC/sggglm.f | 2 +- SRC/sgghd3.f | 2 +- SRC/sgghrd.f | 2 +- SRC/sgglse.f | 2 +- SRC/sggqrf.f | 2 +- SRC/sggrqf.f | 2 +- SRC/sggsvd3.f | 2 +- SRC/sggsvp3.f | 2 +- SRC/sgsvj0.f | 2 +- SRC/sgsvj1.f | 2 +- SRC/sgtcon.f | 2 +- SRC/sgtrfs.f | 2 +- SRC/sgtsv.f | 2 +- SRC/sgtsvx.f | 2 +- SRC/sgttrf.f | 2 +- SRC/sgttrs.f | 2 +- SRC/sgtts2.f | 2 +- SRC/shgeqz.f | 2 +- SRC/shsein.f | 2 +- SRC/shseqr.f | 2 +- SRC/sisnan.f | 2 +- SRC/sla_gbamv.f | 2 +- SRC/sla_gbrcond.f | 2 +- SRC/sla_gbrfsx_extended.f | 2 +- SRC/sla_gbrpvgrw.f | 2 +- SRC/sla_geamv.f | 2 +- SRC/sla_gercond.f | 2 +- SRC/sla_gerfsx_extended.f | 2 +- SRC/sla_gerpvgrw.f | 2 +- SRC/sla_lin_berr.f | 2 +- SRC/sla_porcond.f | 2 +- SRC/sla_porfsx_extended.f | 2 +- SRC/sla_porpvgrw.f | 2 +- SRC/sla_syamv.f | 2 +- SRC/sla_syrcond.f | 2 +- SRC/sla_syrfsx_extended.f | 2 +- SRC/sla_syrpvgrw.f | 2 +- SRC/sla_wwaddw.f | 2 +- SRC/slabad.f | 2 +- SRC/slabrd.f | 2 +- SRC/slacn2.f | 2 +- SRC/slacon.f | 2 +- SRC/slacpy.f | 2 +- SRC/sladiv.f | 6 +- SRC/slae2.f | 2 +- SRC/slaebz.f | 2 +- SRC/slaed0.f | 2 +- SRC/slaed1.f | 2 +- SRC/slaed2.f | 2 +- SRC/slaed3.f | 2 +- SRC/slaed4.f | 2 +- SRC/slaed5.f | 2 +- SRC/slaed6.f | 2 +- SRC/slaed7.f | 2 +- SRC/slaed8.f | 2 +- SRC/slaed9.f | 2 +- SRC/slaeda.f | 2 +- SRC/slaein.f | 2 +- SRC/slaev2.f | 2 +- SRC/slaexc.f | 2 +- SRC/slag2.f | 2 +- SRC/slag2d.f | 2 +- SRC/slags2.f | 2 +- SRC/slagtf.f | 2 +- SRC/slagtm.f | 2 +- SRC/slagts.f | 6 +- SRC/slagv2.f | 2 +- SRC/slahqr.f | 2 +- SRC/slahr2.f | 2 +- SRC/slaic1.f | 2 +- SRC/slaisnan.f | 2 +- SRC/slaln2.f | 2 +- SRC/slals0.f | 2 +- SRC/slalsa.f | 2 +- SRC/slalsd.f | 2 +- SRC/slamrg.f | 2 +- SRC/slamswlq.f | 2 + SRC/slamtsqr.f | 2 + SRC/slaneg.f | 2 +- SRC/slangb.f | 2 +- SRC/slange.f | 2 +- SRC/slangt.f | 2 +- SRC/slanhs.f | 2 +- SRC/slansb.f | 2 +- SRC/slansf.f | 2 +- SRC/slansp.f | 2 +- SRC/slanst.f | 2 +- SRC/slansy.f | 2 +- SRC/slantb.f | 2 +- SRC/slantp.f | 2 +- SRC/slantr.f | 2 +- SRC/slanv2.f | 2 +- SRC/slaorhr_col_getrfnp.f | 2 +- SRC/slaorhr_col_getrfnp2.f | 2 +- SRC/slapll.f | 2 +- SRC/slapmr.f | 2 +- SRC/slapmt.f | 2 +- SRC/slapy2.f | 2 +- SRC/slapy3.f | 2 +- SRC/slaqgb.f | 2 +- SRC/slaqge.f | 2 +- SRC/slaqp2.f | 2 +- SRC/slaqps.f | 2 +- SRC/slaqr0.f | 2 +- SRC/slaqr1.f | 2 +- SRC/slaqr2.f | 2 +- SRC/slaqr3.f | 2 +- SRC/slaqr4.f | 2 +- SRC/slaqr5.f | 2 +- SRC/slaqsb.f | 2 +- SRC/slaqsp.f | 2 +- SRC/slaqsy.f | 2 +- SRC/slaqtr.f | 2 +- SRC/slaqz0.f | 2 +- SRC/slaqz1.f | 2 +- SRC/slaqz2.f | 2 +- SRC/slaqz3.f | 2 +- SRC/slaqz4.f | 2 +- SRC/slar1v.f | 2 +- SRC/slar2v.f | 2 +- SRC/slarf.f | 2 +- SRC/slarfb.f | 2 +- SRC/slarfb_gett.f | 2 +- SRC/slarfg.f | 2 +- SRC/slarfgp.f | 2 +- SRC/slarft.f | 2 +- SRC/slarfx.f | 2 +- SRC/slarfy.f | 2 +- SRC/slargv.f | 2 +- SRC/slarmm.f | 2 +- SRC/slarnv.f | 2 +- SRC/slarra.f | 2 +- SRC/slarrb.f | 2 +- SRC/slarrc.f | 2 +- SRC/slarrd.f | 2 +- SRC/slarre.f | 2 +- SRC/slarrf.f | 2 +- SRC/slarrj.f | 2 +- SRC/slarrk.f | 2 +- SRC/slarrr.f | 2 +- SRC/slarrv.f | 2 +- SRC/slarscl2.f | 2 +- SRC/slartg.f90 | 2 +- SRC/slartgp.f | 2 +- SRC/slartgs.f | 2 +- SRC/slartv.f | 2 +- SRC/slaruv.f | 2 +- SRC/slarz.f | 2 +- SRC/slarzb.f | 2 +- SRC/slarzt.f | 2 +- SRC/slas2.f | 2 +- SRC/slascl.f | 2 +- SRC/slascl2.f | 2 +- SRC/slasd0.f | 2 +- SRC/slasd1.f | 2 +- SRC/slasd2.f | 2 +- SRC/slasd3.f | 2 +- SRC/slasd4.f | 2 +- SRC/slasd5.f | 2 +- SRC/slasd6.f | 2 +- SRC/slasd7.f | 2 +- SRC/slasd8.f | 2 +- SRC/slasda.f | 2 +- SRC/slasdq.f | 2 +- SRC/slasdt.f | 2 +- SRC/slaset.f | 2 +- SRC/slasq1.f | 2 +- SRC/slasq2.f | 2 +- SRC/slasq3.f | 2 +- SRC/slasq4.f | 2 +- SRC/slasq5.f | 2 +- SRC/slasq6.f | 2 +- SRC/slasr.f | 2 +- SRC/slasrt.f | 2 +- SRC/slasv2.f | 2 +- SRC/slaswlq.f | 2 + SRC/slaswp.f | 2 +- SRC/slasy2.f | 2 +- SRC/slasyf.f | 2 +- SRC/slasyf_aa.f | 2 +- SRC/slasyf_rk.f | 2 +- SRC/slasyf_rook.f | 2 +- SRC/slatbs.f | 2 +- SRC/slatdf.f | 2 +- SRC/slatps.f | 2 +- SRC/slatrd.f | 2 +- SRC/slatrs.f | 2 +- SRC/slatrs3.f | 2 +- SRC/slatrz.f | 2 +- SRC/slatsqr.f | 2 + SRC/slauu2.f | 2 +- SRC/slauum.f | 2 +- SRC/sopgtr.f | 2 +- SRC/sopmtr.f | 2 +- SRC/sorbdb.f | 2 +- SRC/sorbdb1.f | 2 +- SRC/sorbdb2.f | 2 +- SRC/sorbdb3.f | 2 +- SRC/sorbdb4.f | 2 +- SRC/sorbdb5.f | 2 +- SRC/sorbdb6.f | 2 +- SRC/sorcsd.f | 2 +- SRC/sorcsd2by1.f | 2 +- SRC/sorg2l.f | 2 +- SRC/sorg2r.f | 2 +- SRC/sorgbr.f | 2 +- SRC/sorghr.f | 2 +- SRC/sorgl2.f | 2 +- SRC/sorglq.f | 2 +- SRC/sorgql.f | 2 +- SRC/sorgqr.f | 2 +- SRC/sorgr2.f | 2 +- SRC/sorgrq.f | 2 +- SRC/sorgtr.f | 2 +- SRC/sorgtsqr.f | 2 +- SRC/sorgtsqr_row.f | 2 +- SRC/sorhr_col.f | 2 +- SRC/sorm22.f | 2 +- SRC/sorm2l.f | 2 +- SRC/sorm2r.f | 2 +- SRC/sormbr.f | 2 +- SRC/sormhr.f | 2 +- SRC/sorml2.f | 2 +- SRC/sormlq.f | 2 +- SRC/sormql.f | 2 +- SRC/sormqr.f | 2 +- SRC/sormr2.f | 2 +- SRC/sormr3.f | 2 +- SRC/sormrq.f | 2 +- SRC/sormrz.f | 2 +- SRC/sormtr.f | 2 +- SRC/spbcon.f | 2 +- SRC/spbequ.f | 2 +- SRC/spbrfs.f | 2 +- SRC/spbstf.f | 2 +- SRC/spbsv.f | 2 +- SRC/spbsvx.f | 2 +- SRC/spbtf2.f | 2 +- SRC/spbtrf.f | 2 +- SRC/spbtrs.f | 2 +- SRC/spftrf.f | 2 +- SRC/spftri.f | 2 +- SRC/spftrs.f | 2 +- SRC/spocon.f | 2 +- SRC/spoequ.f | 2 +- SRC/spoequb.f | 2 +- SRC/sporfs.f | 2 +- SRC/sporfsx.f | 2 +- SRC/sposv.f | 2 +- SRC/sposvx.f | 2 +- SRC/sposvxx.f | 2 +- SRC/spotf2.f | 2 +- SRC/spotrf.f | 2 +- SRC/spotrf2.f | 2 +- SRC/spotri.f | 2 +- SRC/spotrs.f | 2 +- SRC/sppcon.f | 2 +- SRC/sppequ.f | 2 +- SRC/spprfs.f | 2 +- SRC/sppsv.f | 2 +- SRC/sppsvx.f | 2 +- SRC/spptrf.f | 2 +- SRC/spptri.f | 2 +- SRC/spptrs.f | 2 +- SRC/spstf2.f | 2 +- SRC/spstrf.f | 2 +- SRC/sptcon.f | 2 +- SRC/spteqr.f | 2 +- SRC/sptrfs.f | 2 +- SRC/sptsv.f | 2 +- SRC/sptsvx.f | 2 +- SRC/spttrf.f | 2 +- SRC/spttrs.f | 2 +- SRC/sptts2.f | 2 +- SRC/srscl.f | 2 +- SRC/ssb2st_kernels.f | 2 + SRC/ssbev.f | 2 +- SRC/ssbev_2stage.f | 14 +- SRC/ssbevd.f | 2 +- SRC/ssbevd_2stage.f | 12 +- SRC/ssbevx.f | 2 +- SRC/ssbevx_2stage.f | 12 +- SRC/ssbgst.f | 2 +- SRC/ssbgv.f | 2 +- SRC/ssbgvd.f | 2 +- SRC/ssbgvx.f | 2 +- SRC/ssbtrd.f | 2 +- SRC/ssfrk.f | 2 +- SRC/sspcon.f | 2 +- SRC/sspev.f | 2 +- SRC/sspevd.f | 2 +- SRC/sspevx.f | 2 +- SRC/sspgst.f | 2 +- SRC/sspgv.f | 2 +- SRC/sspgvd.f | 2 +- SRC/sspgvx.f | 2 +- SRC/ssprfs.f | 2 +- SRC/sspsv.f | 2 +- SRC/sspsvx.f | 2 +- SRC/ssptrd.f | 2 +- SRC/ssptrf.f | 2 +- SRC/ssptri.f | 2 +- SRC/ssptrs.f | 2 +- SRC/sstebz.f | 2 +- SRC/sstedc.f | 2 +- SRC/sstegr.f | 2 +- SRC/sstein.f | 2 +- SRC/sstemr.f | 2 +- SRC/ssteqr.f | 2 +- SRC/ssterf.f | 2 +- SRC/sstev.f | 2 +- SRC/sstevd.f | 2 +- SRC/sstevr.f | 2 +- SRC/sstevx.f | 2 +- SRC/ssycon.f | 2 +- SRC/ssycon_3.f | 2 +- SRC/ssycon_rook.f | 2 +- SRC/ssyconv.f | 2 +- SRC/ssyconvf.f | 2 +- SRC/ssyconvf_rook.f | 2 +- SRC/ssyequb.f | 2 +- SRC/ssyev.f | 2 +- SRC/ssyev_2stage.f | 20 +- SRC/ssyevd.f | 2 +- SRC/ssyevd_2stage.f | 14 +- SRC/ssyevr.f | 2 +- SRC/ssyevr_2stage.f | 18 +- SRC/ssyevx.f | 2 +- SRC/ssyevx_2stage.f | 16 +- SRC/ssygs2.f | 2 +- SRC/ssygst.f | 2 +- SRC/ssygv.f | 2 +- SRC/ssygv_2stage.f | 14 +- SRC/ssygvd.f | 2 +- SRC/ssygvx.f | 2 +- SRC/ssyrfs.f | 2 +- SRC/ssyrfsx.f | 2 +- SRC/ssysv.f | 2 +- SRC/ssysv_aa.f | 2 +- SRC/ssysv_aa_2stage.f | 2 +- SRC/ssysv_rk.f | 2 +- SRC/ssysv_rook.f | 2 +- SRC/ssysvx.f | 2 +- SRC/ssysvxx.f | 2 +- SRC/ssyswapr.f | 2 +- SRC/ssytd2.f | 2 +- SRC/ssytf2.f | 2 +- SRC/ssytf2_rk.f | 2 +- SRC/ssytf2_rook.f | 2 +- SRC/ssytrd.f | 2 +- SRC/ssytrd_2stage.f | 62 +- SRC/ssytrd_sb2st.F | 100 +-- SRC/ssytrd_sy2sb.f | 2 +- SRC/ssytrf.f | 2 +- SRC/ssytrf_aa.f | 2 +- SRC/ssytrf_aa_2stage.f | 2 +- SRC/ssytrf_rk.f | 2 +- SRC/ssytrf_rook.f | 2 +- SRC/ssytri.f | 2 +- SRC/ssytri2.f | 2 +- SRC/ssytri2x.f | 2 +- SRC/ssytri_3.f | 2 +- SRC/ssytri_3x.f | 2 +- SRC/ssytri_rook.f | 2 +- SRC/ssytrs.f | 2 +- SRC/ssytrs2.f | 2 +- SRC/ssytrs_3.f | 2 +- SRC/ssytrs_aa.f | 2 +- SRC/ssytrs_aa_2stage.f | 2 +- SRC/ssytrs_rook.f | 2 +- SRC/stbcon.f | 2 +- SRC/stbrfs.f | 2 +- SRC/stbtrs.f | 2 +- SRC/stfsm.f | 2 +- SRC/stftri.f | 2 +- SRC/stfttp.f | 2 +- SRC/stfttr.f | 2 +- SRC/stgevc.f | 2 +- SRC/stgex2.f | 2 +- SRC/stgexc.f | 2 +- SRC/stgsen.f | 2 +- SRC/stgsja.f | 2 +- SRC/stgsna.f | 2 +- SRC/stgsy2.f | 2 +- SRC/stgsyl.f | 2 +- SRC/stpcon.f | 2 +- SRC/stplqt.f | 2 +- SRC/stplqt2.f | 2 +- SRC/stpmlqt.f | 2 +- SRC/stpmqrt.f | 2 +- SRC/stpqrt.f | 2 +- SRC/stpqrt2.f | 2 +- SRC/stprfb.f | 2 +- SRC/stprfs.f | 2 +- SRC/stptri.f | 2 +- SRC/stptrs.f | 2 +- SRC/stpttf.f | 2 +- SRC/stpttr.f | 2 +- SRC/strcon.f | 2 +- SRC/strevc.f | 2 +- SRC/strevc3.f | 2 +- SRC/strexc.f | 2 +- SRC/strrfs.f | 2 +- SRC/strsen.f | 2 +- SRC/strsna.f | 2 +- SRC/strsyl.f | 2 +- SRC/strti2.f | 2 +- SRC/strtri.f | 2 +- SRC/strtrs.f | 2 +- SRC/strttf.f | 2 +- SRC/strttp.f | 2 +- SRC/stzrzf.f | 2 +- SRC/xerbla.f | 2 +- SRC/xerbla_array.f | 2 +- SRC/zbbcsd.f | 2 +- SRC/zbdsqr.f | 2 +- SRC/zcgesv.f | 2 +- SRC/zcposv.f | 2 +- SRC/zdrscl.f | 2 +- SRC/zgbbrd.f | 2 +- SRC/zgbcon.f | 2 +- SRC/zgbequ.f | 2 +- SRC/zgbequb.f | 2 +- SRC/zgbrfs.f | 2 +- SRC/zgbrfsx.f | 2 +- SRC/zgbsv.f | 2 +- SRC/zgbsvx.f | 2 +- SRC/zgbsvxx.f | 2 +- SRC/zgbtf2.f | 2 +- SRC/zgbtrf.f | 2 +- SRC/zgbtrs.f | 2 +- SRC/zgebak.f | 2 +- SRC/zgebal.f | 2 +- SRC/zgebd2.f | 2 +- SRC/zgebrd.f | 2 +- SRC/zgecon.f | 2 +- SRC/zgeequ.f | 2 +- SRC/zgeequb.f | 2 +- SRC/zgees.f | 2 +- SRC/zgeesx.f | 2 +- SRC/zgeev.f | 2 +- SRC/zgeevx.f | 2 +- SRC/zgehd2.f | 2 +- SRC/zgehrd.f | 2 +- SRC/zgejsv.f | 2 +- SRC/zgelq.f | 2 + SRC/zgelq2.f | 2 +- SRC/zgelqf.f | 2 +- SRC/zgelqt.f | 2 +- SRC/zgelqt3.f | 2 +- SRC/zgels.f | 2 +- SRC/zgelsd.f | 2 +- SRC/zgelss.f | 2 +- SRC/zgelst.f | 2 +- SRC/zgelsy.f | 2 +- SRC/zgemlq.f | 8 +- SRC/zgemlqt.f | 2 +- SRC/zgemqr.f | 6 +- SRC/zgemqrt.f | 2 +- SRC/zgeql2.f | 2 +- SRC/zgeqlf.f | 2 +- SRC/zgeqp3.f | 2 +- SRC/zgeqr.f | 2 + SRC/zgeqr2.f | 2 +- SRC/zgeqr2p.f | 2 +- SRC/zgeqrf.f | 2 +- SRC/zgeqrfp.f | 2 +- SRC/zgeqrt.f | 2 +- SRC/zgeqrt2.f | 2 +- SRC/zgeqrt3.f | 2 +- SRC/zgerfs.f | 2 +- SRC/zgerfsx.f | 2 +- SRC/zgerq2.f | 2 +- SRC/zgerqf.f | 2 +- SRC/zgesc2.f | 2 +- SRC/zgesdd.f | 2 +- SRC/zgesv.f | 4 +- SRC/zgesvd.f | 2 +- SRC/zgesvdq.f | 2 +- SRC/zgesvdx.f | 2 +- SRC/zgesvj.f | 2 +- SRC/zgesvx.f | 2 +- SRC/zgesvxx.f | 2 +- SRC/zgetc2.f | 2 +- SRC/zgetf2.f | 2 +- SRC/zgetrf.f | 2 +- SRC/zgetrf2.f | 2 +- SRC/zgetri.f | 2 +- SRC/zgetrs.f | 2 +- SRC/zgetsls.f | 2 +- SRC/zgetsqrhrt.f | 2 +- SRC/zggbak.f | 2 +- SRC/zggbal.f | 2 +- SRC/zgges.f | 2 +- SRC/zgges3.f | 2 +- SRC/zggesx.f | 2 +- SRC/zggev.f | 2 +- SRC/zggev3.f | 2 +- SRC/zggevx.f | 2 +- SRC/zggglm.f | 2 +- SRC/zgghd3.f | 2 +- SRC/zgghrd.f | 2 +- SRC/zgglse.f | 2 +- SRC/zggqrf.f | 2 +- SRC/zggrqf.f | 2 +- SRC/zggsvd3.f | 2 +- SRC/zggsvp3.f | 2 +- SRC/zgsvj0.f | 2 +- SRC/zgsvj1.f | 2 +- SRC/zgtcon.f | 2 +- SRC/zgtrfs.f | 2 +- SRC/zgtsv.f | 2 +- SRC/zgtsvx.f | 2 +- SRC/zgttrf.f | 2 +- SRC/zgttrs.f | 2 +- SRC/zgtts2.f | 2 +- SRC/zhb2st_kernels.f | 2 + SRC/zhbev.f | 2 +- SRC/zhbev_2stage.f | 12 +- SRC/zhbevd.f | 2 +- SRC/zhbevd_2stage.f | 16 +- SRC/zhbevx.f | 2 +- SRC/zhbevx_2stage.f | 14 +- SRC/zhbgst.f | 2 +- SRC/zhbgv.f | 2 +- SRC/zhbgvd.f | 2 +- SRC/zhbgvx.f | 2 +- SRC/zhbtrd.f | 2 +- SRC/zhecon.f | 2 +- SRC/zhecon_3.f | 2 +- SRC/zhecon_rook.f | 2 +- SRC/zheequb.f | 2 +- SRC/zheev.f | 2 +- SRC/zheev_2stage.f | 16 +- SRC/zheevd.f | 2 +- SRC/zheevd_2stage.f | 16 +- SRC/zheevr.f | 2 +- SRC/zheevr_2stage.f | 20 +- SRC/zheevx.f | 2 +- SRC/zheevx_2stage.f | 18 +- SRC/zhegs2.f | 2 +- SRC/zhegst.f | 2 +- SRC/zhegv.f | 2 +- SRC/zhegv_2stage.f | 16 +- SRC/zhegvd.f | 2 +- SRC/zhegvx.f | 2 +- SRC/zherfs.f | 2 +- SRC/zherfsx.f | 2 +- SRC/zhesv.f | 2 +- SRC/zhesv_aa.f | 2 +- SRC/zhesv_aa_2stage.f | 2 +- SRC/zhesv_rk.f | 2 +- SRC/zhesv_rook.f | 2 +- SRC/zhesvx.f | 2 +- SRC/zhesvxx.f | 2 +- SRC/zheswapr.f | 2 +- SRC/zhetd2.f | 2 +- SRC/zhetf2.f | 2 +- SRC/zhetf2_rk.f | 2 +- SRC/zhetf2_rook.f | 2 +- SRC/zhetrd.f | 2 +- SRC/zhetrd_2stage.f | 62 +- SRC/zhetrd_hb2st.F | 100 +-- SRC/zhetrd_he2hb.f | 2 +- SRC/zhetrf.f | 2 +- SRC/zhetrf_aa.f | 2 +- SRC/zhetrf_aa_2stage.f | 2 +- SRC/zhetrf_rk.f | 2 +- SRC/zhetrf_rook.f | 2 +- SRC/zhetri.f | 2 +- SRC/zhetri2.f | 2 +- SRC/zhetri2x.f | 2 +- SRC/zhetri_3.f | 2 +- SRC/zhetri_3x.f | 2 +- SRC/zhetri_rook.f | 2 +- SRC/zhetrs.f | 2 +- SRC/zhetrs2.f | 2 +- SRC/zhetrs_3.f | 2 +- SRC/zhetrs_aa.f | 2 +- SRC/zhetrs_aa_2stage.f | 2 +- SRC/zhetrs_rook.f | 2 +- SRC/zhfrk.f | 2 +- SRC/zhgeqz.f | 2 +- SRC/zhpcon.f | 2 +- SRC/zhpev.f | 2 +- SRC/zhpevd.f | 2 +- SRC/zhpevx.f | 2 +- SRC/zhpgst.f | 2 +- SRC/zhpgv.f | 2 +- SRC/zhpgvd.f | 2 +- SRC/zhpgvx.f | 2 +- SRC/zhprfs.f | 2 +- SRC/zhpsv.f | 2 +- SRC/zhpsvx.f | 2 +- SRC/zhptrd.f | 2 +- SRC/zhptrf.f | 2 +- SRC/zhptri.f | 2 +- SRC/zhptrs.f | 2 +- SRC/zhsein.f | 2 +- SRC/zhseqr.f | 2 +- SRC/zla_gbamv.f | 2 +- SRC/zla_gbrcond_c.f | 2 +- SRC/zla_gbrcond_x.f | 2 +- SRC/zla_gbrfsx_extended.f | 2 +- SRC/zla_gbrpvgrw.f | 2 +- SRC/zla_geamv.f | 2 +- SRC/zla_gercond_c.f | 2 +- SRC/zla_gercond_x.f | 2 +- SRC/zla_gerfsx_extended.f | 2 +- SRC/zla_gerpvgrw.f | 2 +- SRC/zla_heamv.f | 2 +- SRC/zla_hercond_c.f | 2 +- SRC/zla_hercond_x.f | 2 +- SRC/zla_herfsx_extended.f | 2 +- SRC/zla_herpvgrw.f | 2 +- SRC/zla_lin_berr.f | 2 +- SRC/zla_porcond_c.f | 2 +- SRC/zla_porcond_x.f | 2 +- SRC/zla_porfsx_extended.f | 2 +- SRC/zla_porpvgrw.f | 2 +- SRC/zla_syamv.f | 2 +- SRC/zla_syrcond_c.f | 2 +- SRC/zla_syrcond_x.f | 2 +- SRC/zla_syrfsx_extended.f | 2 +- SRC/zla_syrpvgrw.f | 2 +- SRC/zla_wwaddw.f | 2 +- SRC/zlabrd.f | 2 +- SRC/zlacgv.f | 2 +- SRC/zlacn2.f | 2 +- SRC/zlacon.f | 2 +- SRC/zlacp2.f | 2 +- SRC/zlacpy.f | 2 +- SRC/zlacrm.f | 2 +- SRC/zlacrt.f | 2 +- SRC/zladiv.f | 2 +- SRC/zlaed0.f | 2 +- SRC/zlaed7.f | 2 +- SRC/zlaed8.f | 2 +- SRC/zlaein.f | 2 +- SRC/zlaesy.f | 2 +- SRC/zlaev2.f | 2 +- SRC/zlag2c.f | 2 +- SRC/zlags2.f | 2 +- SRC/zlagtm.f | 2 +- SRC/zlahef.f | 2 +- SRC/zlahef_aa.f | 2 +- SRC/zlahef_rk.f | 2 +- SRC/zlahef_rook.f | 2 +- SRC/zlahqr.f | 2 +- SRC/zlahr2.f | 2 +- SRC/zlaic1.f | 2 +- SRC/zlals0.f | 2 +- SRC/zlalsa.f | 2 +- SRC/zlalsd.f | 2 +- SRC/zlamswlq.f | 2 + SRC/zlamtsqr.f | 2 + SRC/zlangb.f | 2 +- SRC/zlange.f | 2 +- SRC/zlangt.f | 2 +- SRC/zlanhb.f | 2 +- SRC/zlanhe.f | 2 +- SRC/zlanhf.f | 2 +- SRC/zlanhp.f | 2 +- SRC/zlanhs.f | 2 +- SRC/zlanht.f | 2 +- SRC/zlansb.f | 2 +- SRC/zlansp.f | 2 +- SRC/zlansy.f | 2 +- SRC/zlantb.f | 2 +- SRC/zlantp.f | 2 +- SRC/zlantr.f | 2 +- SRC/zlapll.f | 2 +- SRC/zlapmr.f | 2 +- SRC/zlapmt.f | 2 +- SRC/zlaqgb.f | 2 +- SRC/zlaqge.f | 2 +- SRC/zlaqhb.f | 2 +- SRC/zlaqhe.f | 2 +- SRC/zlaqhp.f | 2 +- SRC/zlaqp2.f | 2 +- SRC/zlaqps.f | 2 +- SRC/zlaqr0.f | 2 +- SRC/zlaqr1.f | 2 +- SRC/zlaqr2.f | 2 +- SRC/zlaqr3.f | 2 +- SRC/zlaqr4.f | 2 +- SRC/zlaqr5.f | 2 +- SRC/zlaqsb.f | 2 +- SRC/zlaqsp.f | 2 +- SRC/zlaqsy.f | 2 +- SRC/zlaqz0.f | 2 +- SRC/zlaqz1.f | 2 +- SRC/zlaqz2.f | 2 +- SRC/zlaqz3.f | 2 +- SRC/zlar1v.f | 2 +- SRC/zlar2v.f | 2 +- SRC/zlarcm.f | 2 +- SRC/zlarf.f | 2 +- SRC/zlarfb.f | 2 +- SRC/zlarfb_gett.f | 2 +- SRC/zlarfg.f | 2 +- SRC/zlarfgp.f | 2 +- SRC/zlarft.f | 2 +- SRC/zlarfx.f | 2 +- SRC/zlarfy.f | 2 +- SRC/zlargv.f | 2 +- SRC/zlarnv.f | 2 +- SRC/zlarrv.f | 2 +- SRC/zlarscl2.f | 2 +- SRC/zlartg.f90 | 6 +- SRC/zlartv.f | 2 +- SRC/zlarz.f | 2 +- SRC/zlarzb.f | 2 +- SRC/zlarzt.f | 2 +- SRC/zlascl.f | 2 +- SRC/zlascl2.f | 2 +- SRC/zlaset.f | 2 +- SRC/zlasr.f | 2 +- SRC/zlaswlq.f | 2 + SRC/zlaswp.f | 2 +- SRC/zlasyf.f | 2 +- SRC/zlasyf_aa.f | 2 +- SRC/zlasyf_rk.f | 2 +- SRC/zlasyf_rook.f | 2 +- SRC/zlat2c.f | 2 +- SRC/zlatbs.f | 2 +- SRC/zlatdf.f | 2 +- SRC/zlatps.f | 2 +- SRC/zlatrd.f | 2 +- SRC/zlatrs.f | 2 +- SRC/zlatrs3.f | 2 +- SRC/zlatrz.f | 2 +- SRC/zlatsqr.f | 2 + SRC/zlaunhr_col_getrfnp.f | 2 +- SRC/zlaunhr_col_getrfnp2.f | 2 +- SRC/zlauu2.f | 2 +- SRC/zlauum.f | 2 +- SRC/zpbcon.f | 2 +- SRC/zpbequ.f | 2 +- SRC/zpbrfs.f | 2 +- SRC/zpbstf.f | 2 +- SRC/zpbsv.f | 2 +- SRC/zpbsvx.f | 2 +- SRC/zpbtf2.f | 2 +- SRC/zpbtrf.f | 2 +- SRC/zpbtrs.f | 2 +- SRC/zpftrf.f | 2 +- SRC/zpftri.f | 2 +- SRC/zpftrs.f | 2 +- SRC/zpocon.f | 2 +- SRC/zpoequ.f | 2 +- SRC/zpoequb.f | 2 +- SRC/zporfs.f | 2 +- SRC/zporfsx.f | 2 +- SRC/zposv.f | 2 +- SRC/zposvx.f | 2 +- SRC/zposvxx.f | 2 +- SRC/zpotf2.f | 2 +- SRC/zpotrf.f | 2 +- SRC/zpotrf2.f | 2 +- SRC/zpotri.f | 2 +- SRC/zpotrs.f | 2 +- SRC/zppcon.f | 2 +- SRC/zppequ.f | 2 +- SRC/zpprfs.f | 2 +- SRC/zppsv.f | 2 +- SRC/zppsvx.f | 2 +- SRC/zpptrf.f | 2 +- SRC/zpptri.f | 2 +- SRC/zpptrs.f | 2 +- SRC/zpstf2.f | 2 +- SRC/zpstrf.f | 2 +- SRC/zptcon.f | 2 +- SRC/zpteqr.f | 2 +- SRC/zptrfs.f | 2 +- SRC/zptsv.f | 2 +- SRC/zptsvx.f | 2 +- SRC/zpttrf.f | 2 +- SRC/zpttrs.f | 2 +- SRC/zptts2.f | 2 +- SRC/zrot.f | 4 +- SRC/zspcon.f | 2 +- SRC/zspmv.f | 2 +- SRC/zspr.f | 2 +- SRC/zsprfs.f | 2 +- SRC/zspsv.f | 2 +- SRC/zspsvx.f | 2 +- SRC/zsptrf.f | 2 +- SRC/zsptri.f | 2 +- SRC/zsptrs.f | 2 +- SRC/zstedc.f | 2 +- SRC/zstegr.f | 2 +- SRC/zstein.f | 2 +- SRC/zstemr.f | 2 +- SRC/zsteqr.f | 2 +- SRC/zsycon.f | 2 +- SRC/zsycon_3.f | 2 +- SRC/zsycon_rook.f | 2 +- SRC/zsyconv.f | 2 +- SRC/zsyconvf.f | 2 +- SRC/zsyconvf_rook.f | 2 +- SRC/zsyequb.f | 2 +- SRC/zsymv.f | 2 +- SRC/zsyr.f | 2 +- SRC/zsyrfs.f | 2 +- SRC/zsyrfsx.f | 2 +- SRC/zsysv.f | 2 +- SRC/zsysv_aa.f | 2 +- SRC/zsysv_aa_2stage.f | 2 +- SRC/zsysv_rk.f | 2 +- SRC/zsysv_rook.f | 2 +- SRC/zsysvx.f | 2 +- SRC/zsysvxx.f | 2 +- SRC/zsyswapr.f | 2 +- SRC/zsytf2.f | 2 +- SRC/zsytf2_rk.f | 2 +- SRC/zsytf2_rook.f | 2 +- SRC/zsytrf.f | 2 +- SRC/zsytrf_aa.f | 2 +- SRC/zsytrf_aa_2stage.f | 2 +- SRC/zsytrf_rk.f | 2 +- SRC/zsytrf_rook.f | 2 +- SRC/zsytri.f | 2 +- SRC/zsytri2.f | 2 +- SRC/zsytri2x.f | 2 +- SRC/zsytri_3.f | 2 +- SRC/zsytri_3x.f | 2 +- SRC/zsytri_rook.f | 2 +- SRC/zsytrs.f | 2 +- SRC/zsytrs2.f | 2 +- SRC/zsytrs_3.f | 2 +- SRC/zsytrs_aa.f | 2 +- SRC/zsytrs_aa_2stage.f | 2 +- SRC/zsytrs_rook.f | 2 +- SRC/ztbcon.f | 2 +- SRC/ztbrfs.f | 2 +- SRC/ztbtrs.f | 2 +- SRC/ztfsm.f | 2 +- SRC/ztftri.f | 2 +- SRC/ztfttp.f | 2 +- SRC/ztfttr.f | 2 +- SRC/ztgevc.f | 2 +- SRC/ztgex2.f | 2 +- SRC/ztgexc.f | 2 +- SRC/ztgsen.f | 2 +- SRC/ztgsja.f | 2 +- SRC/ztgsna.f | 2 +- SRC/ztgsy2.f | 2 +- SRC/ztgsyl.f | 2 +- SRC/ztpcon.f | 2 +- SRC/ztplqt.f | 2 +- SRC/ztplqt2.f | 2 +- SRC/ztpmlqt.f | 2 +- SRC/ztpmqrt.f | 2 +- SRC/ztpqrt.f | 2 +- SRC/ztpqrt2.f | 2 +- SRC/ztprfb.f | 2 +- SRC/ztprfs.f | 2 +- SRC/ztptri.f | 2 +- SRC/ztptrs.f | 2 +- SRC/ztpttf.f | 2 +- SRC/ztpttr.f | 2 +- SRC/ztrcon.f | 2 +- SRC/ztrevc.f | 2 +- SRC/ztrevc3.f | 2 +- SRC/ztrexc.f | 2 +- SRC/ztrrfs.f | 2 +- SRC/ztrsen.f | 2 +- SRC/ztrsna.f | 2 +- SRC/ztrsyl.f | 2 +- SRC/ztrsyl3.f | 2 +- SRC/ztrti2.f | 2 +- SRC/ztrtri.f | 2 +- SRC/ztrtrs.f | 2 +- SRC/ztrttf.f | 2 +- SRC/ztrttp.f | 2 +- SRC/ztzrzf.f | 2 +- SRC/zunbdb.f | 2 +- SRC/zunbdb1.f | 2 +- SRC/zunbdb2.f | 2 +- SRC/zunbdb3.f | 2 +- SRC/zunbdb4.f | 2 +- SRC/zunbdb5.f | 2 +- SRC/zunbdb6.f | 2 +- SRC/zuncsd.f | 2 +- SRC/zuncsd2by1.f | 2 +- SRC/zung2l.f | 2 +- SRC/zung2r.f | 2 +- SRC/zungbr.f | 2 +- SRC/zunghr.f | 2 +- SRC/zungl2.f | 2 +- SRC/zunglq.f | 2 +- SRC/zungql.f | 2 +- SRC/zungqr.f | 2 +- SRC/zungr2.f | 2 +- SRC/zungrq.f | 2 +- SRC/zungtr.f | 2 +- SRC/zungtsqr.f | 2 +- SRC/zungtsqr_row.f | 2 +- SRC/zunhr_col.f | 2 +- SRC/zunm22.f | 2 +- SRC/zunm2l.f | 2 +- SRC/zunm2r.f | 2 +- SRC/zunmbr.f | 2 +- SRC/zunmhr.f | 2 +- SRC/zunml2.f | 2 +- SRC/zunmlq.f | 2 +- SRC/zunmql.f | 2 +- SRC/zunmqr.f | 2 +- SRC/zunmr2.f | 2 +- SRC/zunmr3.f | 2 +- SRC/zunmrq.f | 2 +- SRC/zunmrz.f | 2 +- SRC/zunmtr.f | 2 +- SRC/zupgtr.f | 2 +- SRC/zupmtr.f | 2 +- TESTING/LIN/serrorhr_col.f | 2 +- 2207 files changed, 3867 insertions(+), 3406 deletions(-) diff --git a/BLAS/SRC/caxpy.f b/BLAS/SRC/caxpy.f index 8dfdba9c0a..f50a6bae50 100644 --- a/BLAS/SRC/caxpy.f +++ b/BLAS/SRC/caxpy.f @@ -72,7 +72,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level1 +*> \ingroup axpy * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ccopy.f b/BLAS/SRC/ccopy.f index 1b4999bae6..01ee79aab4 100644 --- a/BLAS/SRC/ccopy.f +++ b/BLAS/SRC/ccopy.f @@ -65,7 +65,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level1 +*> \ingroup copy * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cdotc.f b/BLAS/SRC/cdotc.f index da29fdf896..4f9d8d8d72 100644 --- a/BLAS/SRC/cdotc.f +++ b/BLAS/SRC/cdotc.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level1 +*> \ingroup dot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cdotu.f b/BLAS/SRC/cdotu.f index d8c21d10c1..a482875f47 100644 --- a/BLAS/SRC/cdotu.f +++ b/BLAS/SRC/cdotu.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level1 +*> \ingroup dot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cgbmv.f b/BLAS/SRC/cgbmv.f index 49a635d634..9aab2313ab 100644 --- a/BLAS/SRC/cgbmv.f +++ b/BLAS/SRC/cgbmv.f @@ -165,7 +165,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup gbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cgemm.f b/BLAS/SRC/cgemm.f index 7d3d8d8dab..6f1846c748 100644 --- a/BLAS/SRC/cgemm.f +++ b/BLAS/SRC/cgemm.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup gemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cgemv.f b/BLAS/SRC/cgemv.f index 574be07602..eb2798682e 100644 --- a/BLAS/SRC/cgemv.f +++ b/BLAS/SRC/cgemv.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup gemv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cgerc.f b/BLAS/SRC/cgerc.f index 716628d8ad..ed6061331f 100644 --- a/BLAS/SRC/cgerc.f +++ b/BLAS/SRC/cgerc.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup ger * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cgeru.f b/BLAS/SRC/cgeru.f index 5ff8f9405d..4802cef117 100644 --- a/BLAS/SRC/cgeru.f +++ b/BLAS/SRC/cgeru.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup ger * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/chbmv.f b/BLAS/SRC/chbmv.f index bddab93259..afa447c8d6 100644 --- a/BLAS/SRC/chbmv.f +++ b/BLAS/SRC/chbmv.f @@ -165,7 +165,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup hbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/chemm.f b/BLAS/SRC/chemm.f index db3826fc67..c9a2c3a0ff 100644 --- a/BLAS/SRC/chemm.f +++ b/BLAS/SRC/chemm.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup hemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/chemv.f b/BLAS/SRC/chemv.f index 288ab1436f..2b8866b038 100644 --- a/BLAS/SRC/chemv.f +++ b/BLAS/SRC/chemv.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup hemv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cher.f b/BLAS/SRC/cher.f index 2695a7eb1b..9bec62166c 100644 --- a/BLAS/SRC/cher.f +++ b/BLAS/SRC/cher.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup her * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cher2.f b/BLAS/SRC/cher2.f index 68976b46ee..025c2e5b99 100644 --- a/BLAS/SRC/cher2.f +++ b/BLAS/SRC/cher2.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup her2 * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cher2k.f b/BLAS/SRC/cher2k.f index a77908738a..1d9910c493 100644 --- a/BLAS/SRC/cher2k.f +++ b/BLAS/SRC/cher2k.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup her2k * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cherk.f b/BLAS/SRC/cherk.f index 4b229c2382..01b5d4e37e 100644 --- a/BLAS/SRC/cherk.f +++ b/BLAS/SRC/cherk.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup herk * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/chpmv.f b/BLAS/SRC/chpmv.f index 459a9ba3ed..e8b42d69d8 100644 --- a/BLAS/SRC/chpmv.f +++ b/BLAS/SRC/chpmv.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup hpmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/chpr.f b/BLAS/SRC/chpr.f index 62a946f242..a5b378830d 100644 --- a/BLAS/SRC/chpr.f +++ b/BLAS/SRC/chpr.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup hpr * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/chpr2.f b/BLAS/SRC/chpr2.f index cb07168b0e..a16f08a2a2 100644 --- a/BLAS/SRC/chpr2.f +++ b/BLAS/SRC/chpr2.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup hpr2 * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/crotg.f90 b/BLAS/SRC/crotg.f90 index 8704196408..7e4f36b072 100644 --- a/BLAS/SRC/crotg.f90 +++ b/BLAS/SRC/crotg.f90 @@ -69,7 +69,7 @@ ! !> \date December 2021 ! -!> \ingroup single_blas_level1 +!> \ingroup rotg ! !> \par Further Details: ! ===================== diff --git a/BLAS/SRC/cscal.f b/BLAS/SRC/cscal.f index 411098835c..0fbfb72b4a 100644 --- a/BLAS/SRC/cscal.f +++ b/BLAS/SRC/cscal.f @@ -61,7 +61,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level1 +*> \ingroup scal * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/csrot.f b/BLAS/SRC/csrot.f index 2b4b92b722..45f62c2d2d 100644 --- a/BLAS/SRC/csrot.f +++ b/BLAS/SRC/csrot.f @@ -91,7 +91,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level1 +*> \ingroup rot * * ===================================================================== SUBROUTINE CSROT( N, CX, INCX, CY, INCY, C, S ) diff --git a/BLAS/SRC/csscal.f b/BLAS/SRC/csscal.f index b9a8ca5522..45702c5afa 100644 --- a/BLAS/SRC/csscal.f +++ b/BLAS/SRC/csscal.f @@ -61,7 +61,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level1 +*> \ingroup scal * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/cswap.f b/BLAS/SRC/cswap.f index 310bf18178..9962431c9c 100644 --- a/BLAS/SRC/cswap.f +++ b/BLAS/SRC/cswap.f @@ -65,7 +65,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level1 +*> \ingroup swap * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/csymm.f b/BLAS/SRC/csymm.f index 831bdef693..9a7b360009 100644 --- a/BLAS/SRC/csymm.f +++ b/BLAS/SRC/csymm.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup hemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/csyr2k.f b/BLAS/SRC/csyr2k.f index 09751895d2..5354c39b5b 100644 --- a/BLAS/SRC/csyr2k.f +++ b/BLAS/SRC/csyr2k.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup her2k * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/csyrk.f b/BLAS/SRC/csyrk.f index 97bde056cd..b6ff32da4e 100644 --- a/BLAS/SRC/csyrk.f +++ b/BLAS/SRC/csyrk.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup herk * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ctbmv.f b/BLAS/SRC/ctbmv.f index cc07f6c32b..2008d839f1 100644 --- a/BLAS/SRC/ctbmv.f +++ b/BLAS/SRC/ctbmv.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup tbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ctbsv.f b/BLAS/SRC/ctbsv.f index f1f7076174..25592412cb 100644 --- a/BLAS/SRC/ctbsv.f +++ b/BLAS/SRC/ctbsv.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup tbsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ctpmv.f b/BLAS/SRC/ctpmv.f index 1a37753c69..318738611c 100644 --- a/BLAS/SRC/ctpmv.f +++ b/BLAS/SRC/ctpmv.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup tpmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ctpsv.f b/BLAS/SRC/ctpsv.f index b5cab53a88..c7ba280af4 100644 --- a/BLAS/SRC/ctpsv.f +++ b/BLAS/SRC/ctpsv.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup tpsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ctrmm.f b/BLAS/SRC/ctrmm.f index a015fe990d..c4c3b9a926 100644 --- a/BLAS/SRC/ctrmm.f +++ b/BLAS/SRC/ctrmm.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup trmm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ctrmv.f b/BLAS/SRC/ctrmv.f index 1c312946f8..52ec618daf 100644 --- a/BLAS/SRC/ctrmv.f +++ b/BLAS/SRC/ctrmv.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup trmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ctrsm.f b/BLAS/SRC/ctrsm.f index b59a831ce9..eff616343d 100644 --- a/BLAS/SRC/ctrsm.f +++ b/BLAS/SRC/ctrsm.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level3 +*> \ingroup trsm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ctrsv.f b/BLAS/SRC/ctrsv.f index 77704c9637..3e80e442e8 100644 --- a/BLAS/SRC/ctrsv.f +++ b/BLAS/SRC/ctrsv.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex_blas_level2 +*> \ingroup trsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dasum.f b/BLAS/SRC/dasum.f index 9a360b5acd..7a1c208c5c 100644 --- a/BLAS/SRC/dasum.f +++ b/BLAS/SRC/dasum.f @@ -54,7 +54,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup asum * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/daxpy.f b/BLAS/SRC/daxpy.f index 421f7c630b..1a6dab447d 100644 --- a/BLAS/SRC/daxpy.f +++ b/BLAS/SRC/daxpy.f @@ -73,7 +73,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup axpy * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dcabs1.f b/BLAS/SRC/dcabs1.f index f6212a8595..6505ffc61e 100644 --- a/BLAS/SRC/dcabs1.f +++ b/BLAS/SRC/dcabs1.f @@ -40,7 +40,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup abs1 * * ===================================================================== DOUBLE PRECISION FUNCTION DCABS1(Z) diff --git a/BLAS/SRC/dcopy.f b/BLAS/SRC/dcopy.f index ded46c5ecf..1bf4fd2d09 100644 --- a/BLAS/SRC/dcopy.f +++ b/BLAS/SRC/dcopy.f @@ -66,7 +66,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup copy * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ddot.f b/BLAS/SRC/ddot.f index 683a04bd46..4f85fcd786 100644 --- a/BLAS/SRC/ddot.f +++ b/BLAS/SRC/ddot.f @@ -66,7 +66,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup dot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dgbmv.f b/BLAS/SRC/dgbmv.f index d31ea24ca9..64a1728b16 100644 --- a/BLAS/SRC/dgbmv.f +++ b/BLAS/SRC/dgbmv.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup gbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dgemm.f b/BLAS/SRC/dgemm.f index 6814603357..1484b1900c 100644 --- a/BLAS/SRC/dgemm.f +++ b/BLAS/SRC/dgemm.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level3 +*> \ingroup gemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dgemv.f b/BLAS/SRC/dgemv.f index 6625509b3a..b330da5d0e 100644 --- a/BLAS/SRC/dgemv.f +++ b/BLAS/SRC/dgemv.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup gemv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dger.f b/BLAS/SRC/dger.f index 8c19cb4e41..32bfc0d9b2 100644 --- a/BLAS/SRC/dger.f +++ b/BLAS/SRC/dger.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup ger * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dnrm2.f90 b/BLAS/SRC/dnrm2.f90 index 06f7917cf0..fac9e21b7c 100644 --- a/BLAS/SRC/dnrm2.f90 +++ b/BLAS/SRC/dnrm2.f90 @@ -60,7 +60,7 @@ ! !> \date August 2016 ! -!> \ingroup single_blas_level1 +!> \ingroup nrm2 ! !> \par Contributors: ! ================== diff --git a/BLAS/SRC/drot.f b/BLAS/SRC/drot.f index 0386626c8f..e50e151275 100644 --- a/BLAS/SRC/drot.f +++ b/BLAS/SRC/drot.f @@ -76,7 +76,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup rot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/drotg.f90 b/BLAS/SRC/drotg.f90 index a344cd4856..8544fb451b 100644 --- a/BLAS/SRC/drotg.f90 +++ b/BLAS/SRC/drotg.f90 @@ -74,7 +74,7 @@ !> !> Weslley Pereira, University of Colorado Denver, USA ! -!> \ingroup single_blas_level1 +!> \ingroup rotg ! !> \par Further Details: ! ===================== diff --git a/BLAS/SRC/drotm.f b/BLAS/SRC/drotm.f index 0363ddd888..450510d143 100644 --- a/BLAS/SRC/drotm.f +++ b/BLAS/SRC/drotm.f @@ -89,7 +89,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup rotm * * ===================================================================== SUBROUTINE DROTM(N,DX,INCX,DY,INCY,DPARAM) diff --git a/BLAS/SRC/drotmg.f b/BLAS/SRC/drotmg.f index be59f314a6..920734ae7b 100644 --- a/BLAS/SRC/drotmg.f +++ b/BLAS/SRC/drotmg.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup rotmg * * ===================================================================== SUBROUTINE DROTMG(DD1,DD2,DX1,DY1,DPARAM) diff --git a/BLAS/SRC/dsbmv.f b/BLAS/SRC/dsbmv.f index ad9e418a1e..fdf20620b8 100644 --- a/BLAS/SRC/dsbmv.f +++ b/BLAS/SRC/dsbmv.f @@ -162,7 +162,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup hbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dscal.f b/BLAS/SRC/dscal.f index e055d198af..625afba92a 100644 --- a/BLAS/SRC/dscal.f +++ b/BLAS/SRC/dscal.f @@ -62,7 +62,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup scal * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dsdot.f b/BLAS/SRC/dsdot.f index ae254a6e50..fcfa1aa7b1 100644 --- a/BLAS/SRC/dsdot.f +++ b/BLAS/SRC/dsdot.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup dot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dspmv.f b/BLAS/SRC/dspmv.f index a79c74da7b..518ab77a2b 100644 --- a/BLAS/SRC/dspmv.f +++ b/BLAS/SRC/dspmv.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup hpmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dspr.f b/BLAS/SRC/dspr.f index 67227a2d58..2bc025ec51 100644 --- a/BLAS/SRC/dspr.f +++ b/BLAS/SRC/dspr.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup hpr * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dspr2.f b/BLAS/SRC/dspr2.f index 0756c2bbd6..32c9cd50cf 100644 --- a/BLAS/SRC/dspr2.f +++ b/BLAS/SRC/dspr2.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup hpr2 * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dswap.f b/BLAS/SRC/dswap.f index b7600aa2d4..ae85389db5 100644 --- a/BLAS/SRC/dswap.f +++ b/BLAS/SRC/dswap.f @@ -66,7 +66,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup swap * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dsymm.f b/BLAS/SRC/dsymm.f index 0ddffec7b7..8027389c86 100644 --- a/BLAS/SRC/dsymm.f +++ b/BLAS/SRC/dsymm.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level3 +*> \ingroup hemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dsymv.f b/BLAS/SRC/dsymv.f index 17310d7c62..ebd6e9e3e4 100644 --- a/BLAS/SRC/dsymv.f +++ b/BLAS/SRC/dsymv.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup hemv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dsyr.f b/BLAS/SRC/dsyr.f index ab452dd950..dd722c417a 100644 --- a/BLAS/SRC/dsyr.f +++ b/BLAS/SRC/dsyr.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup her * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dsyr2.f b/BLAS/SRC/dsyr2.f index 4bad19b96b..93616ff7eb 100644 --- a/BLAS/SRC/dsyr2.f +++ b/BLAS/SRC/dsyr2.f @@ -126,7 +126,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup her2 * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dsyr2k.f b/BLAS/SRC/dsyr2k.f index f5d16e0854..54e4ea721d 100644 --- a/BLAS/SRC/dsyr2k.f +++ b/BLAS/SRC/dsyr2k.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level3 +*> \ingroup her2k * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dsyrk.f b/BLAS/SRC/dsyrk.f index 0548c0ce2f..b62fb6d128 100644 --- a/BLAS/SRC/dsyrk.f +++ b/BLAS/SRC/dsyrk.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level3 +*> \ingroup herk * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dtbmv.f b/BLAS/SRC/dtbmv.f index 443415e05e..cdf1e8b075 100644 --- a/BLAS/SRC/dtbmv.f +++ b/BLAS/SRC/dtbmv.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup tbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dtbsv.f b/BLAS/SRC/dtbsv.f index 002ed590a8..683a5eb08d 100644 --- a/BLAS/SRC/dtbsv.f +++ b/BLAS/SRC/dtbsv.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup tbsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dtpmv.f b/BLAS/SRC/dtpmv.f index 48b3035551..a45bf9823e 100644 --- a/BLAS/SRC/dtpmv.f +++ b/BLAS/SRC/dtpmv.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup tpmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dtpsv.f b/BLAS/SRC/dtpsv.f index 3246ac21dd..72bbb88e29 100644 --- a/BLAS/SRC/dtpsv.f +++ b/BLAS/SRC/dtpsv.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup tpsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dtrmm.f b/BLAS/SRC/dtrmm.f index 16b1d48e25..2424ca821e 100644 --- a/BLAS/SRC/dtrmm.f +++ b/BLAS/SRC/dtrmm.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level3 +*> \ingroup trmm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dtrmv.f b/BLAS/SRC/dtrmv.f index 3ecd67ae25..48f2b44450 100644 --- a/BLAS/SRC/dtrmv.f +++ b/BLAS/SRC/dtrmv.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level2 +*> \ingroup trmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dtrsm.f b/BLAS/SRC/dtrsm.f index 53bac55b4a..44b91f4bac 100644 --- a/BLAS/SRC/dtrsm.f +++ b/BLAS/SRC/dtrsm.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level3 +*> \ingroup trsm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dtrsv.f b/BLAS/SRC/dtrsv.f index bf1e760c1b..ce5759b68a 100644 --- a/BLAS/SRC/dtrsv.f +++ b/BLAS/SRC/dtrsv.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup trsv * * ===================================================================== SUBROUTINE DTRSV(UPLO,TRANS,DIAG,N,A,LDA,X,INCX) diff --git a/BLAS/SRC/dzasum.f b/BLAS/SRC/dzasum.f index 7cc6ec506a..98f45b06f4 100644 --- a/BLAS/SRC/dzasum.f +++ b/BLAS/SRC/dzasum.f @@ -55,7 +55,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup double_blas_level1 +*> \ingroup asum * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/dznrm2.f90 b/BLAS/SRC/dznrm2.f90 index 0ca3c75c52..513cbdb18b 100644 --- a/BLAS/SRC/dznrm2.f90 +++ b/BLAS/SRC/dznrm2.f90 @@ -61,7 +61,7 @@ ! !> \date August 2016 ! -!> \ingroup single_blas_level1 +!> \ingroup nrm2 ! !> \par Contributors: ! ================== diff --git a/BLAS/SRC/icamax.f b/BLAS/SRC/icamax.f index c103cc800e..b65cbf8cf3 100644 --- a/BLAS/SRC/icamax.f +++ b/BLAS/SRC/icamax.f @@ -54,7 +54,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup aux_blas +*> \ingroup iamax * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/idamax.f b/BLAS/SRC/idamax.f index 1be301ea3e..06d7d7ee80 100644 --- a/BLAS/SRC/idamax.f +++ b/BLAS/SRC/idamax.f @@ -54,7 +54,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup aux_blas +*> \ingroup iamax * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/isamax.f b/BLAS/SRC/isamax.f index 8ad44ad419..91e8f27537 100644 --- a/BLAS/SRC/isamax.f +++ b/BLAS/SRC/isamax.f @@ -54,7 +54,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup aux_blas +*> \ingroup iamax * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/izamax.f b/BLAS/SRC/izamax.f index e4779a1ff2..0fe4125070 100644 --- a/BLAS/SRC/izamax.f +++ b/BLAS/SRC/izamax.f @@ -54,7 +54,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup aux_blas +*> \ingroup iamax * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/lsame.f b/BLAS/SRC/lsame.f index 6aa4007065..eef9ee513d 100644 --- a/BLAS/SRC/lsame.f +++ b/BLAS/SRC/lsame.f @@ -46,7 +46,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup aux_blas +*> \ingroup lsame * * ===================================================================== LOGICAL FUNCTION LSAME(CA,CB) diff --git a/BLAS/SRC/sasum.f b/BLAS/SRC/sasum.f index 6c2e0c9bc8..95e99b3ab9 100644 --- a/BLAS/SRC/sasum.f +++ b/BLAS/SRC/sasum.f @@ -55,7 +55,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup asum * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/saxpy.f b/BLAS/SRC/saxpy.f index ded238a9f9..f33a35875b 100644 --- a/BLAS/SRC/saxpy.f +++ b/BLAS/SRC/saxpy.f @@ -73,7 +73,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup axpy * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/scabs1.f b/BLAS/SRC/scabs1.f index 9bacf09db6..6fed4267be 100644 --- a/BLAS/SRC/scabs1.f +++ b/BLAS/SRC/scabs1.f @@ -39,7 +39,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup abs1 * * ===================================================================== REAL FUNCTION SCABS1(Z) diff --git a/BLAS/SRC/scasum.f b/BLAS/SRC/scasum.f index 8fd67e9b29..a562746ae2 100644 --- a/BLAS/SRC/scasum.f +++ b/BLAS/SRC/scasum.f @@ -55,7 +55,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup asum * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/scnrm2.f90 b/BLAS/SRC/scnrm2.f90 index 1c2b2d42a8..6729933487 100644 --- a/BLAS/SRC/scnrm2.f90 +++ b/BLAS/SRC/scnrm2.f90 @@ -61,7 +61,7 @@ ! !> \date August 2016 ! -!> \ingroup single_blas_level1 +!> \ingroup nrm2 ! !> \par Contributors: ! ================== diff --git a/BLAS/SRC/scopy.f b/BLAS/SRC/scopy.f index 961025ca44..29e0c74e11 100644 --- a/BLAS/SRC/scopy.f +++ b/BLAS/SRC/scopy.f @@ -66,7 +66,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup copy * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sdot.f b/BLAS/SRC/sdot.f index ed7213e4a9..da8574c07e 100644 --- a/BLAS/SRC/sdot.f +++ b/BLAS/SRC/sdot.f @@ -66,7 +66,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup dot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sdsdot.f b/BLAS/SRC/sdsdot.f index f70fee7974..329a716dda 100644 --- a/BLAS/SRC/sdsdot.f +++ b/BLAS/SRC/sdsdot.f @@ -82,7 +82,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup dot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sgbmv.f b/BLAS/SRC/sgbmv.f index a79a833f7e..07deaca2f0 100644 --- a/BLAS/SRC/sgbmv.f +++ b/BLAS/SRC/sgbmv.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup gbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sgemm.f b/BLAS/SRC/sgemm.f index 0757ee4859..3e31add9fa 100644 --- a/BLAS/SRC/sgemm.f +++ b/BLAS/SRC/sgemm.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level3 +*> \ingroup gemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sgemv.f b/BLAS/SRC/sgemv.f index 0517b124c5..aafcdff0b5 100644 --- a/BLAS/SRC/sgemv.f +++ b/BLAS/SRC/sgemv.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup gemv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sger.f b/BLAS/SRC/sger.f index 9dfe4a2826..1b8aceaf23 100644 --- a/BLAS/SRC/sger.f +++ b/BLAS/SRC/sger.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup ger * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/snrm2.f90 b/BLAS/SRC/snrm2.f90 index 1ea1a473fc..70dc48b248 100644 --- a/BLAS/SRC/snrm2.f90 +++ b/BLAS/SRC/snrm2.f90 @@ -60,7 +60,7 @@ ! !> \date August 2016 ! -!> \ingroup single_blas_level1 +!> \ingroup nrm2 ! !> \par Contributors: ! ================== diff --git a/BLAS/SRC/srot.f b/BLAS/SRC/srot.f index 1441e0d939..ab7bc1efff 100644 --- a/BLAS/SRC/srot.f +++ b/BLAS/SRC/srot.f @@ -76,7 +76,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup rot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/srotg.f90 b/BLAS/SRC/srotg.f90 index af1beceeef..e35235b539 100644 --- a/BLAS/SRC/srotg.f90 +++ b/BLAS/SRC/srotg.f90 @@ -74,7 +74,7 @@ !> !> Weslley Pereira, University of Colorado Denver, USA ! -!> \ingroup single_blas_level1 +!> \ingroup rotg ! !> \par Further Details: ! ===================== diff --git a/BLAS/SRC/srotm.f b/BLAS/SRC/srotm.f index a20cfd9649..a25519b465 100644 --- a/BLAS/SRC/srotm.f +++ b/BLAS/SRC/srotm.f @@ -90,7 +90,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup rotm * * ===================================================================== SUBROUTINE SROTM(N,SX,INCX,SY,INCY,SPARAM) diff --git a/BLAS/SRC/srotmg.f b/BLAS/SRC/srotmg.f index 63d55dde03..9273927d45 100644 --- a/BLAS/SRC/srotmg.f +++ b/BLAS/SRC/srotmg.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup rotmg * * ===================================================================== SUBROUTINE SROTMG(SD1,SD2,SX1,SY1,SPARAM) diff --git a/BLAS/SRC/ssbmv.f b/BLAS/SRC/ssbmv.f index c458131709..c2a0b3eb60 100644 --- a/BLAS/SRC/ssbmv.f +++ b/BLAS/SRC/ssbmv.f @@ -162,7 +162,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup hbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sscal.f b/BLAS/SRC/sscal.f index 44d0437968..b535f222bf 100644 --- a/BLAS/SRC/sscal.f +++ b/BLAS/SRC/sscal.f @@ -62,7 +62,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup scal * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sspmv.f b/BLAS/SRC/sspmv.f index 840fd5c79a..4ca5e3e529 100644 --- a/BLAS/SRC/sspmv.f +++ b/BLAS/SRC/sspmv.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup hpmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sspr.f b/BLAS/SRC/sspr.f index ab24d3f1dc..f57364956a 100644 --- a/BLAS/SRC/sspr.f +++ b/BLAS/SRC/sspr.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup hpr * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sspr2.f b/BLAS/SRC/sspr2.f index 1107a8c655..a51ed32ba4 100644 --- a/BLAS/SRC/sspr2.f +++ b/BLAS/SRC/sspr2.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup hpr2 * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/sswap.f b/BLAS/SRC/sswap.f index 1a0fd9a025..57af902b78 100644 --- a/BLAS/SRC/sswap.f +++ b/BLAS/SRC/sswap.f @@ -66,7 +66,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level1 +*> \ingroup swap * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ssymm.f b/BLAS/SRC/ssymm.f index bfa8d16336..4174fa6e4a 100644 --- a/BLAS/SRC/ssymm.f +++ b/BLAS/SRC/ssymm.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level3 +*> \ingroup hemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ssymv.f b/BLAS/SRC/ssymv.f index 91117989bf..4a15c24837 100644 --- a/BLAS/SRC/ssymv.f +++ b/BLAS/SRC/ssymv.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup hemv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ssyr.f b/BLAS/SRC/ssyr.f index 51164c5c41..0588966ddb 100644 --- a/BLAS/SRC/ssyr.f +++ b/BLAS/SRC/ssyr.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup her * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ssyr2.f b/BLAS/SRC/ssyr2.f index 1dc73eee96..2593986459 100644 --- a/BLAS/SRC/ssyr2.f +++ b/BLAS/SRC/ssyr2.f @@ -126,7 +126,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup her2 * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ssyr2k.f b/BLAS/SRC/ssyr2k.f index 1bb5aa4caf..027927a0c3 100644 --- a/BLAS/SRC/ssyr2k.f +++ b/BLAS/SRC/ssyr2k.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level3 +*> \ingroup her2k * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ssyrk.f b/BLAS/SRC/ssyrk.f index faca01b894..d1dcd124c6 100644 --- a/BLAS/SRC/ssyrk.f +++ b/BLAS/SRC/ssyrk.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level3 +*> \ingroup herk * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/stbmv.f b/BLAS/SRC/stbmv.f index 31c8dcb5f9..1af11e4fff 100644 --- a/BLAS/SRC/stbmv.f +++ b/BLAS/SRC/stbmv.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup tbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/stbsv.f b/BLAS/SRC/stbsv.f index 8f9aeef6c7..24d1105243 100644 --- a/BLAS/SRC/stbsv.f +++ b/BLAS/SRC/stbsv.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup tbsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/stpmv.f b/BLAS/SRC/stpmv.f index d56e90b312..b36ecd3cdc 100644 --- a/BLAS/SRC/stpmv.f +++ b/BLAS/SRC/stpmv.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup tpmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/stpsv.f b/BLAS/SRC/stpsv.f index 2c91d626e4..b409964c3e 100644 --- a/BLAS/SRC/stpsv.f +++ b/BLAS/SRC/stpsv.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup tpsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/strmm.f b/BLAS/SRC/strmm.f index e353e28df4..113999835d 100644 --- a/BLAS/SRC/strmm.f +++ b/BLAS/SRC/strmm.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level3 +*> \ingroup trmm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/strmv.f b/BLAS/SRC/strmv.f index 0982b51c81..ee4032399c 100644 --- a/BLAS/SRC/strmv.f +++ b/BLAS/SRC/strmv.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup trmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/strsm.f b/BLAS/SRC/strsm.f index 006c16e81d..66a295adfe 100644 --- a/BLAS/SRC/strsm.f +++ b/BLAS/SRC/strsm.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level3 +*> \ingroup trsm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/strsv.f b/BLAS/SRC/strsv.f index 435082b147..46c96deb74 100644 --- a/BLAS/SRC/strsv.f +++ b/BLAS/SRC/strsv.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup single_blas_level2 +*> \ingroup trsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/xerbla.f b/BLAS/SRC/xerbla.f index 0d73705fad..8262cf498c 100644 --- a/BLAS/SRC/xerbla.f +++ b/BLAS/SRC/xerbla.f @@ -53,7 +53,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup aux_blas +*> \ingroup xerbla * * ===================================================================== SUBROUTINE XERBLA( SRNAME, INFO ) diff --git a/BLAS/SRC/xerbla_array.f b/BLAS/SRC/xerbla_array.f index 1143094bcb..5eeb548047 100644 --- a/BLAS/SRC/xerbla_array.f +++ b/BLAS/SRC/xerbla_array.f @@ -73,7 +73,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup aux_blas +*> \ingroup xerbla_array * * ===================================================================== SUBROUTINE XERBLA_ARRAY(SRNAME_ARRAY, SRNAME_LEN, INFO) diff --git a/BLAS/SRC/zaxpy.f b/BLAS/SRC/zaxpy.f index 35c0e4b892..d39ccfc300 100644 --- a/BLAS/SRC/zaxpy.f +++ b/BLAS/SRC/zaxpy.f @@ -72,7 +72,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level1 +*> \ingroup axpy * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zcopy.f b/BLAS/SRC/zcopy.f index 1efcdb6b0f..c1ea412c93 100644 --- a/BLAS/SRC/zcopy.f +++ b/BLAS/SRC/zcopy.f @@ -65,7 +65,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level1 +*> \ingroup copy * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zdotc.f b/BLAS/SRC/zdotc.f index bcc29e2dad..96b957e988 100644 --- a/BLAS/SRC/zdotc.f +++ b/BLAS/SRC/zdotc.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level1 +*> \ingroup dot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zdotu.f b/BLAS/SRC/zdotu.f index 11c18da230..82eed8b5d8 100644 --- a/BLAS/SRC/zdotu.f +++ b/BLAS/SRC/zdotu.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level1 +*> \ingroup dot * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zdrot.f b/BLAS/SRC/zdrot.f index 3145561d67..10ac3ac5ee 100644 --- a/BLAS/SRC/zdrot.f +++ b/BLAS/SRC/zdrot.f @@ -91,7 +91,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level1 +*> \ingroup rot * * ===================================================================== SUBROUTINE ZDROT( N, ZX, INCX, ZY, INCY, C, S ) diff --git a/BLAS/SRC/zdscal.f b/BLAS/SRC/zdscal.f index 5a16048771..28fa829942 100644 --- a/BLAS/SRC/zdscal.f +++ b/BLAS/SRC/zdscal.f @@ -61,7 +61,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level1 +*> \ingroup scal * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zgbmv.f b/BLAS/SRC/zgbmv.f index 90b6cef3d0..9375e7d534 100644 --- a/BLAS/SRC/zgbmv.f +++ b/BLAS/SRC/zgbmv.f @@ -165,7 +165,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup gbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zgemm.f b/BLAS/SRC/zgemm.f index 4727310a30..366119577f 100644 --- a/BLAS/SRC/zgemm.f +++ b/BLAS/SRC/zgemm.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup gemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zgemv.f b/BLAS/SRC/zgemv.f index 2664454b94..9667501fce 100644 --- a/BLAS/SRC/zgemv.f +++ b/BLAS/SRC/zgemv.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup gemv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zgerc.f b/BLAS/SRC/zgerc.f index 2eb4349367..42060d3899 100644 --- a/BLAS/SRC/zgerc.f +++ b/BLAS/SRC/zgerc.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup ger * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zgeru.f b/BLAS/SRC/zgeru.f index e1cd2dcd19..65df5edc1c 100644 --- a/BLAS/SRC/zgeru.f +++ b/BLAS/SRC/zgeru.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup ger * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zhbmv.f b/BLAS/SRC/zhbmv.f index 6f8026c693..c98a3e4156 100644 --- a/BLAS/SRC/zhbmv.f +++ b/BLAS/SRC/zhbmv.f @@ -165,7 +165,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup hbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zhemm.f b/BLAS/SRC/zhemm.f index bed14cb9a4..3eb5ee6c80 100644 --- a/BLAS/SRC/zhemm.f +++ b/BLAS/SRC/zhemm.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup hemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zhemv.f b/BLAS/SRC/zhemv.f index dad68bf25b..444f15647e 100644 --- a/BLAS/SRC/zhemv.f +++ b/BLAS/SRC/zhemv.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup hemv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zher.f b/BLAS/SRC/zher.f index 59227305f8..fd4265e16b 100644 --- a/BLAS/SRC/zher.f +++ b/BLAS/SRC/zher.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup her * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zher2.f b/BLAS/SRC/zher2.f index d1f2b57ec4..7d0a5537cd 100644 --- a/BLAS/SRC/zher2.f +++ b/BLAS/SRC/zher2.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup her2 * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zher2k.f b/BLAS/SRC/zher2k.f index 5c75083cd5..f507ff2520 100644 --- a/BLAS/SRC/zher2k.f +++ b/BLAS/SRC/zher2k.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup her2k * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zherk.f b/BLAS/SRC/zherk.f index f2665e6da3..ebe35d51e3 100644 --- a/BLAS/SRC/zherk.f +++ b/BLAS/SRC/zherk.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup herk * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zhpmv.f b/BLAS/SRC/zhpmv.f index c1a2fa006c..ac12365b1a 100644 --- a/BLAS/SRC/zhpmv.f +++ b/BLAS/SRC/zhpmv.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup hpmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zhpr.f b/BLAS/SRC/zhpr.f index 2ba5774a21..5ef5562235 100644 --- a/BLAS/SRC/zhpr.f +++ b/BLAS/SRC/zhpr.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup hpr * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zhpr2.f b/BLAS/SRC/zhpr2.f index 55cfe77e30..8f5a088ce8 100644 --- a/BLAS/SRC/zhpr2.f +++ b/BLAS/SRC/zhpr2.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup hpr2 * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zrotg.f90 b/BLAS/SRC/zrotg.f90 index b3c23be42d..6f07ccb16e 100644 --- a/BLAS/SRC/zrotg.f90 +++ b/BLAS/SRC/zrotg.f90 @@ -69,7 +69,7 @@ ! !> \date December 2021 ! -!> \ingroup single_blas_level1 +!> \ingroup rotg ! !> \par Further Details: ! ===================== diff --git a/BLAS/SRC/zscal.f b/BLAS/SRC/zscal.f index 8b8c2c8ab5..8bbb4fdc0e 100644 --- a/BLAS/SRC/zscal.f +++ b/BLAS/SRC/zscal.f @@ -61,7 +61,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level1 +*> \ingroup scal * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zswap.f b/BLAS/SRC/zswap.f index 93f8fc52d0..d27d4321ef 100644 --- a/BLAS/SRC/zswap.f +++ b/BLAS/SRC/zswap.f @@ -65,7 +65,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level1 +*> \ingroup swap * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zsymm.f b/BLAS/SRC/zsymm.f index da491f1aee..7da6a0ee64 100644 --- a/BLAS/SRC/zsymm.f +++ b/BLAS/SRC/zsymm.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup hemm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zsyr2k.f b/BLAS/SRC/zsyr2k.f index e0f89bb584..40d6fe88e5 100644 --- a/BLAS/SRC/zsyr2k.f +++ b/BLAS/SRC/zsyr2k.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup her2k * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/zsyrk.f b/BLAS/SRC/zsyrk.f index 143a5e235a..c9ddc6cad8 100644 --- a/BLAS/SRC/zsyrk.f +++ b/BLAS/SRC/zsyrk.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup herk * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ztbmv.f b/BLAS/SRC/ztbmv.f index 347a71af86..1a11d3a15b 100644 --- a/BLAS/SRC/ztbmv.f +++ b/BLAS/SRC/ztbmv.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup tbmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ztbsv.f b/BLAS/SRC/ztbsv.f index bbc8cef968..b3042ac8f8 100644 --- a/BLAS/SRC/ztbsv.f +++ b/BLAS/SRC/ztbsv.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup tbsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ztpmv.f b/BLAS/SRC/ztpmv.f index 27ae4d8a81..be20048da9 100644 --- a/BLAS/SRC/ztpmv.f +++ b/BLAS/SRC/ztpmv.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup tpmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ztpsv.f b/BLAS/SRC/ztpsv.f index a29a26dba4..436fb07c12 100644 --- a/BLAS/SRC/ztpsv.f +++ b/BLAS/SRC/ztpsv.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup tpsv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ztrmm.f b/BLAS/SRC/ztrmm.f index 4b7deb1199..e11313dffc 100644 --- a/BLAS/SRC/ztrmm.f +++ b/BLAS/SRC/ztrmm.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup trmm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ztrmv.f b/BLAS/SRC/ztrmv.f index e50bfdb089..f72def8a4b 100644 --- a/BLAS/SRC/ztrmv.f +++ b/BLAS/SRC/ztrmv.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup trmv * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ztrsm.f b/BLAS/SRC/ztrsm.f index aed1eabf8b..8479bf7766 100644 --- a/BLAS/SRC/ztrsm.f +++ b/BLAS/SRC/ztrsm.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level3 +*> \ingroup trsm * *> \par Further Details: * ===================== diff --git a/BLAS/SRC/ztrsv.f b/BLAS/SRC/ztrsv.f index 8b41871cdf..6587355324 100644 --- a/BLAS/SRC/ztrsv.f +++ b/BLAS/SRC/ztrsv.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16_blas_level2 +*> \ingroup trsv * *> \par Further Details: * ===================== diff --git a/DOCS/groups-usr.dox b/DOCS/groups-usr.dox index 6c31e4cf5f..8ca4bbe1af 100644 --- a/DOCS/groups-usr.dox +++ b/DOCS/groups-usr.dox @@ -1,605 +1,972 @@ /** - * - **** - * - * @defgroup lapack LAPACK - * This is the group of LAPACK routines. - * - * @defgroup GE General Matrices - * @ingroup lapack - * This is the group of General Matrices routines - * @defgroup GB General Band Matrix - * @ingroup lapack - * This is the group of General Band routines - * @defgroup SY Symmetric Matrix - * @ingroup lapack - * This is the group of Symmetric Matrix routines - * @defgroup HE Hermitian Matrix - * @ingroup lapack - * This is the group of Hermitian Matrix routines - * @defgroup PO Positive Definite Matrix - * @ingroup lapack - * This is the group of Positive Definite routines - * @defgroup GT General tridiagonal Matrix - * @ingroup lapack - * This is the group of General tridiagonal routines - * @defgroup PT Positive Definite tridiagonal Matrix - * @ingroup lapack - * This is the group of Positive Definite tridiagonal routines - * @defgroup OTHEReigen Eigenvalue - * @ingroup lapack - * This is the group of Other Eigenvalue routines - * @defgroup OTHERauxiliary Other Auxiliary Routines - * @ingroup lapack - * This is the group of Other Auxiliary routines - * @defgroup OTHERcomputational Other Computational Routines - * @ingroup lapack - * This is the group of Other Computational routines - * @defgroup OTHERsolve Other Solve Routines - * @ingroup lapack - * This is the group of Other Solve routines - * - **** - * - * @defgroup solveGE Linear Solve - * @ingroup GE - * This is the group of Linear Solve Driver routines - * @defgroup solveGB Linear Solve - * @ingroup GB - * This is the group of Linear Solve Driver routines - * @defgroup solveSY Linear Solve - * @ingroup SY - * This is the group of Linear Solve Driver routines - * @defgroup solveHE Linear Solve - * @ingroup HE - * This is the group of Linear Solve Driver routines - * @defgroup solvePO Linear Solve - * @ingroup PO - * This is the group of Linear Solve Driver routines - * @defgroup solveGT Linear Solve - * @ingroup GT - * This is the group of Linear Solve Driver routines - * @defgroup solvePT Linear Solve - * @ingroup PT - * This is the group of Linear Solve Driver routines - * @defgroup eigenGE Eigenvalue - * @ingroup GE - * This is the group of Eigenvalue Driver routines - * @defgroup eigenSY Eigenvalue - * @ingroup SY - * This is the group of Eigenvalue Driver routines - * @defgroup eigenHE Eigenvalue - * @ingroup HE - * This is the group of Eigenvalue Driver routines - * @defgroup singGE Singular Value - * @ingroup GE - * This is the group of Singular Value Driver routines - * @defgroup computationalGE Computational routines - * @ingroup GE - * This is the group of Computational routines - * @defgroup variantsGEcomputational Variants Computational routines - * @ingroup GE - * This is the group of Variants Computational routines - * @defgroup computationalGB Computational routines - * @ingroup GB - * This is the group of Computational routines - * @defgroup computationalSY Computational routines - * @ingroup SY - * This is the group of Computational routines - * @defgroup computationalHE Computational routines - * @ingroup HE - * This is the group of Computational routines - * @defgroup computationalPO Computational routines - * @ingroup PO - * This is the group of Computational routines - * @defgroup variantsPOcomputational Variants Computational routines - * @ingroup PO - * This is the group of Variants Computational routines - * @defgroup computationalGT Computational routines - * @ingroup GT - * This is the group of Computational routines - * @defgroup computationalPT Computational routines - * @ingroup PT - * This is the group of Computational routines - * @defgroup variantsOTHERcomputational Variants Computational routines - * @ingroup OTHERcomputational - * This is the group of Variants Computational routines - * @defgroup auxiliaryGE Auxiliary routines - * @ingroup GE - * This is the group of Auxiliary routines - * @defgroup auxiliaryGB Auxiliary routines - * @ingroup GB - * This is the group of Auxiliary routines - * @defgroup auxiliarySY Auxiliary routines - * @ingroup SY - * This is the group of Auxiliary routines - * @defgroup auxiliaryHE Auxiliary routines - * @ingroup HE - * This is the group of Auxiliary routines - * @defgroup auxiliaryPO Auxiliary routines - * @ingroup PO - * This is the group of Auxiliary routines - * @defgroup auxiliaryGT Auxiliary routines - * @ingroup GT - * This is the group of Auxiliary routines - * @defgroup auxiliaryPT Auxiliary routines - * @ingroup PT - * This is the group of Auxiliary routines - * - **** - * - * @defgroup doubleGEsolve double - * @ingroup solveGE - * This is the group of double solve driver functions for GE matrices - * @defgroup doublePOsolve double - * @ingroup solvePO - * This is the group of double solve driver functions for PO matrices - * @defgroup doubleSYsolve double - * @ingroup solveSY - * This is the group of double solve driver functions for SY matrices - * @defgroup doubleGBsolve double - * @ingroup solveGB - * This is the group of double solve driver functions for GB matrices - * @defgroup doubleGTsolve double - * @ingroup solveGT - * This is the group of double solve driver functions for GT matrices - * @defgroup doublePTsolve double - * @ingroup solvePT - * This is the group of double solve driver functions for PT matrices - * @defgroup doubleGEeigen double - * @ingroup eigenGE - * This is the group of double eigenvalue driver functions for GE matrices - * @defgroup doubleSYeigen double - * @ingroup eigenSY - * This is the group of double eigenvalue driver functions for SY matrices - * @defgroup doubleGEsing double - * @ingroup singGE - * This is the group of double singular value driver functions for GE matrices - * @defgroup doubleGEcomputational double - * @ingroup computationalGE - * This is the group of double computational functions for GE matrices - * @defgroup doublePOcomputational double - * @ingroup computationalPO - * This is the group of double computational functions for PO matrices - * @defgroup doubleSYcomputational double - * @ingroup computationalSY - * This is the group of double computational functions for SY matrices - * @defgroup doubleGBcomputational double - * @ingroup computationalGB - * This is the group of double computational functions for GB matrices - * @defgroup doubleGTcomputational double - * @ingroup computationalGT - * This is the group of double computational functions for GT matrices - * @defgroup doublePTcomputational double - * @ingroup computationalPT - * This is the group of double computational functions for PT matrices - * @defgroup doubleGEauxiliary double - * @ingroup auxiliaryGE - * This is the group of double auxiliary functions for GE matrices - * @defgroup doublePOauxiliary double - * @ingroup auxiliaryPO - * This is the group of double auxiliary functions for PO matrices - * @defgroup doubleSYauxiliary double - * @ingroup auxiliarySY - * This is the group of double auxiliary functions for SY matrices - * @defgroup doubleGBauxiliary double - * @ingroup auxiliaryGB - * This is the group of double auxiliary functions for GB matrices - * @defgroup doublePTauxiliary double - * @ingroup auxiliaryPT - * This is the group of double auxiliary functions for PT matrices - * @defgroup doubleGTauxiliary double - * @ingroup auxiliaryGT - * This is the group of double auxiliary functions for GT matrices - * @defgroup doubleOTHERauxiliary double - * @ingroup OTHERauxiliary - * This is the group of double other auxiliary routines - * @defgroup doubleOTHERcomputational double - * @ingroup OTHERcomputational - * This is the group of double other Computational routines - * @defgroup doubleOTHERsolve double Other Solve Routines - * @ingroup OTHERsolve - * This is the group of double Other Solve routines - * @defgroup doubleOTHEReigen double - * @ingroup OTHEReigen - * This is the group of double Other Eigenvalue routines - * - **** - * - * @defgroup realGEsolve real - * @ingroup solveGE - * This is the group of real solve driver functions for GE matrices - * @defgroup realPOsolve real - * @ingroup solvePO - * This is the group of real solve driver functions for PO matrices - * @defgroup realSYsolve real - * @ingroup solveSY - * This is the group of real solve driver functions for SY matrices - * @defgroup realGBsolve real - * @ingroup solveGB - * This is the group of real solve driver functions for GB matrices - * @defgroup realGTsolve real - * @ingroup solveGT - * This is the group of real solve driver functions for GT matrices - * @defgroup realPTsolve real - * @ingroup solvePT - * This is the group of real solve driver functions for PT matrices - * @defgroup realGEeigen real - * @ingroup eigenGE - * This is the group of real eigenvalue driver functions for GE matrices - * @defgroup realSYeigen real - * @ingroup eigenSY - * This is the group of real eigenvalue driver functions for SY matrices - * @defgroup realGEsing real - * @ingroup singGE - * This is the group of real singular value driver functions for GE matrices - * @defgroup realGEcomputational real - * @ingroup computationalGE - * This is the group of real computational functions for GE matrices - * @defgroup realPOcomputational real - * @ingroup computationalPO - * This is the group of real computational functions for PO matrices - * @defgroup realSYcomputational real - * @ingroup computationalSY - * This is the group of real computational functions for SY matrices - * @defgroup realGBcomputational real - * @ingroup computationalGB - * This is the group of real computational functions for GB matrices - * @defgroup realPTcomputational real - * @ingroup computationalPT - * This is the group of real computational functions for PT matrices - * @defgroup realGTcomputational real - * @ingroup computationalGT - * This is the group of real computational functions for GT matrices - * @defgroup realGEauxiliary real - * @ingroup auxiliaryGE - * This is the group of real auxiliary functions for GE matrices - * @defgroup realPOauxiliary real - * @ingroup auxiliaryPO - * This is the group of real auxiliary functions for PO matrices - * @defgroup realSYauxiliary real - * @ingroup auxiliarySY - * This is the group of real auxiliary functions for SY matrices - * @defgroup realGBauxiliary real - * @ingroup auxiliaryGB - * This is the group of real auxiliary functions for GB matrices - * @defgroup realGTauxiliary real - * @ingroup auxiliaryGT - * This is the group of real auxiliary functions for GT matrices - * @defgroup realPTauxiliary real - * @ingroup auxiliaryPT - * This is the group of real auxiliary functions for PT matrices - * @defgroup realOTHERauxiliary real - * @ingroup OTHERauxiliary - * This is the group of real other auxiliary routines - * @defgroup realOTHERcomputational real - * @ingroup OTHERcomputational - * This is the group of real other Computational routines - * @defgroup realOTHERsolve real Other Solve Routines - * @ingroup OTHERsolve - * This is the group of real Other Solve routines - * @defgroup realOTHEReigen real - * @ingroup OTHEReigen - * This is the group of real Other Eigenvalue routines - * - **** - * - * @defgroup complexGEsolve complex - * @ingroup solveGE - * This is the group of complex solve driver functions for GE matrices - * @defgroup complexPOsolve complex - * @ingroup solvePO - * This is the group of complex solve driver functions for PO matrices - * @defgroup complexSYsolve complex - * @ingroup solveSY - * This is the group of complex solve driver functions for SY matrices - * @defgroup complexHEsolve complex - * @ingroup solveHE - * This is the group of complex solve driver functions for HE matrices - * @defgroup complexGBsolve complex - * @ingroup solveGB - * This is the group of complex solve driver functions for GB matrices - * @defgroup complexGTsolve complex - * @ingroup solveGT - * This is the group of complex solve driver functions for GT matrices - * @defgroup complexPTsolve complex - * @ingroup solvePT - * This is the group of complex solve driver functions for PT matrices - * @defgroup complexGEeigen complex - * @ingroup eigenGE - * This is the group of complex eigenvalue driver functions for GE matrices - * @defgroup complexSYeigen complex - * @ingroup eigenSY - * This is the group of complex eigenvalue driver functions for SY matrices - * @defgroup complexHEeigen complex - * @ingroup eigenHE - * This is the group of complex eigenvalue driver functions for HE matrices - * @defgroup complexGEsing complex - * @ingroup singGE - * This is the group of complex singular value driver functions for GE matrices - * @defgroup complexGEcomputational complex - * @ingroup computationalGE - * This is the group of complex computational functions for GE matrices - * @defgroup complexPOcomputational complex - * @ingroup computationalPO - * This is the group of complex computational functions for PO matrices - * @defgroup complexSYcomputational complex - * @ingroup computationalSY - * This is the group of complex computational functions for SY matrices - * @defgroup complexHEcomputational complex - * @ingroup computationalHE - * This is the group of complex computational functions for HE matrices - * @defgroup complexGBcomputational complex - * @ingroup computationalGB - * This is the group of complex computational functions for GB matrices - * @defgroup complexGTcomputational complex - * @ingroup computationalGT - * This is the group of complex computational functions for GT matrices - * @defgroup complexPTcomputational complex - * @ingroup computationalPT - * This is the group of complex computational functions for PT matrices - * @defgroup complexGEauxiliary complex - * @ingroup auxiliaryGE - * This is the group of complex auxiliary functions for GE matrices - * @defgroup complexPOauxiliary complex - * @ingroup auxiliaryPO - * This is the group of complex auxiliary functions for PO matrices - * @defgroup complexSYauxiliary complex - * @ingroup auxiliarySY - * This is the group of complex auxiliary functions for SY matrices - * @defgroup complexHEauxiliary complex - * @ingroup auxiliaryHE - * This is the group of complex auxiliary functions for HE matrices - * @defgroup complexGBauxiliary complex - * @ingroup auxiliaryGB - * This is the group of complex auxiliary functions for GB matrices - * @defgroup complexOTHERauxiliary complex - * @ingroup OTHERauxiliary - * This is the group of complex other auxiliary routines - * @defgroup complexOTHERcomputational complex - * @ingroup OTHERcomputational - * This is the group of complex other Computational routines - * @defgroup complexOTHERsolve complex Other Solve Routines - * @ingroup OTHERsolve - * This is the group of complex Other Solve routines - * @defgroup complexOTHEReigen complex Other Eigenvalue routines - * @ingroup OTHEReigen - * This is the group of complex Other Eigenvalue routines - * - **** - * - * @defgroup complex16GEsolve complex16 - * @ingroup solveGE - * This is the group of complex16 solve driver functions for GE matrices - * @defgroup complex16POsolve complex16 - * @ingroup solvePO - * This is the group of complex16 solve driver functions for PO matrices - * @defgroup complex16SYsolve complex16 - * @ingroup solveSY - * This is the group of complex16 solve driver functions for SY matrices - * @defgroup complex16HEsolve complex16 - * @ingroup solveHE - * This is the group of complex16 solve driver functions for HE matrices - * @defgroup complex16GBsolve complex16 - * @ingroup solveGB - * This is the group of complex16 solve driver functions for GB matrices - * @defgroup complex16GTsolve complex16 - * @ingroup solveGT - * This is the group of complex16 solve driver functions for GT matrices - * @defgroup complex16PTsolve complex16 - * @ingroup solvePT - * This is the group of complex16 solve driver functions for PT matrices - * @defgroup complex16GEeigen complex16 - * @ingroup eigenGE - * This is the group of complex16 eigenvalue driver functions for GE matrices - * @defgroup complex16SYeigen complex16 - * @ingroup eigenSY - * This is the group of complex16 eigenvalue driver functions for SY matrices - * @defgroup complex16HEeigen complex16 - * @ingroup eigenHE - * This is the group of complex16 eigenvalue driver functions for HE matrices - * @defgroup complex16GEsing complex16 - * @ingroup singGE - * This is the group of complex16 singular value driver functions for GE matrices - * @defgroup complex16GEcomputational complex16 - * @ingroup computationalGE - * This is the group of complex16 computational functions for GE matrices - * @defgroup complex16POcomputational complex16 - * @ingroup computationalPO - * This is the group of complex16 computational functions for PO matrices - * @defgroup complex16SYcomputational complex16 - * @ingroup computationalSY - * This is the group of complex16 computational functions for SY matrices - * @defgroup complex16HEcomputational complex16 - * @ingroup computationalHE - * This is the group of complex16 computational functions for HE matrices - * @defgroup complex16GBcomputational complex16 - * @ingroup computationalGB - * This is the group of complex16 computational functions for GB matrices - * @defgroup complex16GTcomputational complex16 - * @ingroup computationalGT - * This is the group of complex16 computational functions for GT matrices - * @defgroup complex16PTcomputational complex16 - * @ingroup computationalPT - * This is the group of complex16 computational functions for PT matrices - * @defgroup complex16GEauxiliary complex16 - * @ingroup auxiliaryGE - * This is the group of complex16 auxiliary functions for GE matrices - * @defgroup complex16POauxiliary complex16 - * @ingroup auxiliaryPO - * This is the group of complex16 auxiliary functions for PO matrices - * @defgroup complex16SYauxiliary complex16 - * @ingroup auxiliarySY - * This is the group of complex16 auxiliary functions for SY matrices - * @defgroup complex16HEauxiliary complex16 - * @ingroup auxiliaryHE - * This is the group of complex16 auxiliary functions for HE matrices - * @defgroup complex16GBauxiliary complex16 - * @ingroup auxiliaryGB - * This is the group of complex16 auxiliary functions for GB matrices - * @defgroup complex16OTHERcomputational complex16 - * @ingroup OTHERcomputational - * This is the group of complex16 other Computational routines - * @defgroup complex16OTHERauxiliary complex16 - * @ingroup OTHERauxiliary - * This is the group of complex16 other auxiliary routines - * @defgroup auxOTHERcomputational auxiliary Computational routines - * @ingroup OTHERcomputational - * This is the group of auxiliary Computational routines - * @defgroup complex16OTHERsolve complex16 Other Solve Routines - * @ingroup OTHERsolve - * This is the group of complex16 Other Solve routines - * @defgroup complex16OTHEReigen complex16 Other Eigenvalue routines - * @ingroup OTHEReigen - * This is the group of complex16 Other Eigenvalue routines - * - **** - * - * @defgroup testing LAPACK Testing - * This is the group of LAPACK TESTING routines. - * - * @defgroup matgen Matrix Generation - * @ingroup testing - * This is the group of LAPACK TESTING MATGEN routines. - * - * @defgroup lin Linear Solve - * @ingroup testing - * This is the group of LAPACK TESTING LIN routines. - * - * @defgroup eig Eigenvalue and Singular value - * @ingroup testing - * This is the group of LAPACK TESTING EIG routines. - * - * @defgroup real_matgen real - * @ingroup matgen - * This is the group of real LAPACK TESTING MATGEN routines. - * - * @defgroup double_matgen double - * @ingroup matgen - * This is the group of double LAPACK TESTING MATGEN routines. - * - * @defgroup complex_matgen complex - * @ingroup matgen - * This is the group of complex LAPACK TESTING MATGEN routines. - * - * @defgroup complex16_matgen complex16 - * @ingroup matgen - * This is the group of complex16 LAPACK TESTING MATGEN routines. - * - * @defgroup aux_matgen aux - * @ingroup matgen - * This is the group of auxiliary LAPACK TESTING MATGEN routines. - * - * @defgroup single_lin real - * @ingroup lin - * This is the group of real LAPACK TESTING LIN routines. - * - * @defgroup double_lin double - * @ingroup lin - * This is the group of double LAPACK TESTING LIN routines. - * - * @defgroup complex_lin complex - * @ingroup lin - * This is the group of complex LAPACK TESTING LIN routines. - * - * @defgroup complex16_lin complex16 - * @ingroup lin - * This is the group of complex16 LAPACK TESTING LIN routines. - * - * @defgroup aux_lin aux - * @ingroup lin - * This is the group of auxiliary LAPACK TESTING LIN routines. - * - * @defgroup single_eig real - * @ingroup eig - * This is the group of real LAPACK TESTING EIG routines. - * - * @defgroup double_eig double - * @ingroup eig - * This is the group of double LAPACK TESTING EIG routines. - * - * @defgroup complex_eig complex - * @ingroup eig - * This is the group of complex LAPACK TESTING EIG routines. - * - * @defgroup complex16_eig complex16 - * @ingroup eig - * This is the group of complex16 LAPACK TESTING EIG routines. - * - * @defgroup aux_eig aux - * @ingroup eig - * This is the group of auxiliary LAPACK TESTING EIG routines. - * - **** - * @defgroup blas Reference BLAS - * This is the group of BLAS routines. - * - * @defgroup level1 Level1 - * @ingroup blas - * This is the group of LEVEL 1 BLAS routines. - * @defgroup level2 Level2 - * @ingroup blas - * This is the group of LEVEL 2 BLAS routines. - * @defgroup level3 Level3 - * @ingroup blas - * This is the group of LEVEL 3 BLAS routines. - * @defgroup aux_blas Auxiliary BLAS - * @ingroup blas - * This is the group of Auxiliary 3 BLAS routines. -* @defgroup blastesting Testing - * @ingroup blas - * This is the group of BLAS TESTING routines. - * - * @defgroup single_blas_level1 real - * @ingroup level1 - * This is the group of real LEVEL 1 BLAS routines. - * @defgroup double_blas_level1 double - * @ingroup level1 - * This is the group of double LEVEL 1 BLAS routines. - * @defgroup complex_blas_level1 complex - * @ingroup level1 - * This is the group of complex LEVEL 1 BLAS routines. - * @defgroup complex16_blas_level1 complex16 - * @ingroup level1 - * This is the group of complex16 LEVEL 1 BLAS routines. - * - * @defgroup single_blas_level2 real - * @ingroup level2 - * This is the group of real LEVEL 2 BLAS routines. - * @defgroup double_blas_level2 double - * @ingroup level2 - * This is the group of double LEVEL 2 BLAS routines. - * @defgroup complex_blas_level2 complex - * @ingroup level2 - * This is the group of complex LEVEL 2 BLAS routines. - * @defgroup complex16_blas_level2 complex16 - * @ingroup level2 - * This is the group of complex16 LEVEL 2 BLAS routines. - * - * @defgroup single_blas_level3 real - * @ingroup level3 - * This is the group of real LEVEL 3 BLAS routines. - * @defgroup double_blas_level3 double - * @ingroup level3 - * This is the group of double LEVEL 3 BLAS routines. - * @defgroup complex_blas_level3 complex - * @ingroup level3 - * This is the group of complex LEVEL 3 BLAS routines. - * @defgroup complex16_blas_level3 complex16 - * @ingroup level3 - * This is the group of complex16 LEVEL 3 BLAS routines. - * - * @defgroup single_blas_testing real - * @ingroup blastesting - * This is the group of real BLAS TESTING routines. - * @defgroup double_blas_testing double - * @ingroup blastesting - * This is the group of double BLAS TESTING routines. - * @defgroup complex_blas_testing complex - * @ingroup blastesting - * This is the group of complex BLAS TESTING routines. - * @defgroup complex16_blas_testing complex16 - * @ingroup blastesting - * This is the group of complex16 BLAS TESTING routines. - * + +@defgroup lapack_top LAPACK +@{ + @defgroup solve_top Linear solve, AX = B + @{ + @defgroup gesv_driver_grp LU: General matrix, driver + @{ + @defgroup gesv_driver --- full --- + @defgroup gesv gesv: factor and solve + @defgroup gesvx gesvx: factor and solve, expert + @defgroup gesvxx gesvxx: factor and solve, extra precise + @defgroup gesv_mixed gesv: factor and solve, mixed precision + + @defgroup gbsv_driver --- banded --- + @defgroup gbsv gbsv: factor and solve + @defgroup gbsvx gbsvx: factor and solve, expert + @defgroup gbsvxx gbsvxx: factor and solve, extra precise + + @defgroup gtsv_driver --- tridiagonal --- + @defgroup gtsv gtsv: factor and solve + @defgroup gtsvx gtsvx: factor and solve, expert + @} + + @defgroup gesv_comp_grp LU: computational routines (factor, cond, etc.) + @{ + @defgroup gesv_comp --- full --- + @defgroup gecon gecon: condition number estimate + @defgroup getrf getrf: triangular factor + @defgroup getrf2 getrf2: triangular factor panel, recursive? + @defgroup getf2 getf2: triangular factor panel, level 2 + @defgroup getrs getrs: triangular solve using factor + @defgroup getri getri: triangular inverse + @defgroup gerfs gerfs: iterative refinement + @defgroup gerfsx gerfsx: iterative refinement, expert + @defgroup geequ geequ: equilibration + @defgroup geequb geequb: equilibration, power of 2 + @defgroup laqge laqge: row/col scale matrix + @defgroup laswp laswp: swap permutation + + @defgroup getc2 getc2: triangular factor, with complete pivoting + @defgroup gesc2 gesc2: triangular solve using factor, with complete pivoting + @defgroup latdf latdf: Dif-estimate with complete pivoting LU, step in tgsen + + @defgroup la_gercond la_gercond: Skeel condition number estimate + @defgroup la_gerpvgrw la_gerpvgrw: reciprocal pivot growth + @defgroup la_gerfsx_extended la_gerfsx_extended: step in gerfsx + + @defgroup gbsv_comp --- banded --- + @defgroup gbcon gbcon: condition number estimate + @defgroup gbtrf gbtrf: triangular factor + @defgroup gbtf2 gbtf2: triangular factor, level 2 + @defgroup gbtrs gbtrs: triangular solve using factor + @defgroup gbrfs gbrfs: iterative refinement + @defgroup gbrfsx gbrfsx: iterative refinement, expert + @defgroup gbequ gbequ: equilibration + @defgroup gbequb gbequb: equilibration, power of 2 + @defgroup laqgb laqgb: row/col scale matrix + @defgroup la_gbrcond la_gbrcond: Skeel condition number estimate + @defgroup la_gbrpvgrw la_gbrpvgrw: reciprocal pivot growth + @defgroup la_gbrfsx_extended la_gbrfsx_extended: step in gbrfsx + + @defgroup gtsv_comp --- tridiagonal --- + @defgroup gtcon gtcon: condition number estimate + @defgroup gttrf gttrf: triangular factor + @defgroup gttrs gttrs: triangular solve using factor + @defgroup gtts2 gtts2: triangular solve using factor + @defgroup gtrfs gtrfs: iterative refinement + @} + + @defgroup posv_driver_grp Cholesky: Hermitian/symmetric positive definite matrix, driver + @{ + @defgroup posv_driver --- full --- + @defgroup posv posv: factor and solve + @defgroup posvx posvx: factor and solve, expert + @defgroup posvxx posvxx: factor and solve, extra precise + @defgroup posv_mixed posv: factor and solve, mixed precision + + @defgroup ppsv_driver --- packed --- + @defgroup ppsv ppsv: factor and solve + @defgroup ppsvx ppsvx: factor and solve, expert + + @defgroup pfsv_driver --- rectangular full packed (RFP) --- + @defgroup pfsv pfsv: factor and solve [not available] + + @defgroup pbsv_driver --- banded --- + @defgroup pbsv pbsv: factor and solve + @defgroup pbsvx pbsvx: factor and solve, expert + + @defgroup ptsv_driver --- tridiagonal --- + @defgroup ptsv ptsv: factor and solve + @defgroup ptsvx ptsvx: factor and solve, expert + @} + + @defgroup posv_comp_grp Cholesky: computational routines (factor, cond, etc.) + @{ + @defgroup posv_comp --- full --- + @defgroup pocon pocon: condition number estimate + @defgroup potrf potrf: triangular factor + @defgroup potrf2 potrf2: triangular factor panel, recursive? + @defgroup potf2 potf2: triangular factor panel, level 2 + @defgroup pstrf pstrf: triangular factor, with pivoting + @defgroup pstf2 pstf2: triangular factor, with pivoting panel, level 2 + @defgroup potrs potrs: triangular solve using factor + @defgroup potri potri: triangular inverse + @defgroup porfs porfs: iterative refinement + @defgroup porfsx porfsx: iterative refinement, expert + @defgroup poequ poequ: equilibration + @defgroup poequb poequb: equilibration, power of 2 + @defgroup laqhe laqhe: row/col scale matrix + @defgroup la_porcond la_porcond: Skeel condition number estimate + @defgroup la_porpvgrw la_porpvgrw: reciprocal pivot growth + @defgroup la_porfsx_extended la_porfsx_extended: step in porfsx + + @defgroup ppsv_comp --- packed --- + @defgroup ppcon ppcon: condition number estimate + @defgroup pptrf pptrf: triangular factor + @defgroup pptrs pptrs: triangular solve using factor + @defgroup pptri pptri: triangular inverse + @defgroup pprfs pprfs: iterative refinement + @defgroup ppequ ppequ: equilibration + @defgroup laqhp laqhp: row/col scale matrix + + @defgroup pfsv_comp --- rectangular full packed (RFP) --- + @defgroup pftrf pftrf: triangular factor + @defgroup pftrs pftrs: triangular solve using factor + @defgroup pftri pftri: triangular inverse + + @defgroup pbsv_comp --- banded --- + @defgroup pbcon pbcon: condition number estimate + @defgroup pbtrf pbtrf: triangular factor + @defgroup pbtf2 pbtf2: triangular factor panel, level 2 + @defgroup pbtrs pbtrs: triangular solve using factor + @defgroup pbrfs pbrfs: iterative refinement + @defgroup pbequ pbequ: equilibration + @defgroup laqhb laqhb: row/col scale matrix + + @defgroup ptsv_comp --- tridiagonal --- + @defgroup ptcon ptcon: condition number estimate + @defgroup pttrf pttrf: triangular factor + @defgroup pttrs pttrs: triangular solve using factor + @defgroup ptts2 ptts2: triangular solve using factor, unblocked + @defgroup ptrfs ptrfs: iterative refinement + @} + + @defgroup hesv_driver_grp LDL: Hermitian/symmetric indefinite matrix, driver + @{ + @defgroup hesv_driver --- full, rook pivoting --- + @defgroup hesv {he,sy}sv: rook (v1) + @defgroup hesv_rook {he,sy}sv_rook: rook (v2) + @defgroup hesv_rk {he,sy}sv_rk: rook (v3) + @defgroup hesvx {he,sy}svx: rook (v1, expert) + @defgroup hesvxx {he,sy}svxx: rook (v1, expert) + + @defgroup hpsv_driver --- packed, rook pivoting --- + @defgroup hpsv {hp,sp}sv: factor and solve + @defgroup hpsvx {hp,sp}svx: factor and solve, expert + + @defgroup hesv_aa_driver --- full, Aasen --- + @defgroup hesv_aa {he,sy}sv_aa: Aasen + @defgroup hesv_aa_2stage {he,sy}sv_aa_2stage: Aasen, blocked 2-stage + @} + + @defgroup hesv_comp_grp LDL: computational routines (factor, cond, etc.) + @{ + @defgroup hesv_comp_v1 --- full, rook v1 --- + @defgroup hecon {he,sy}con: condition number estimate + @defgroup hetrf {he,sy}trf: triangular factor + @defgroup lahef la{he,sy}f: step in hetrf + @defgroup hetf2 {he,sy}tf2: triangular factor, level 2 + @defgroup hetrs {he,sy}trs: triangular solve using factor + @defgroup hetri {he,sy}tri: triangular inverse + @defgroup herfs {he,sy}rfs: iterative refinement + @defgroup herfsx {he,sy}rfsx: iterative refinement, expert + @defgroup heequb {he,sy}equb: equilibration, power of 2 + @defgroup syconv syconv: convert to/from L and D from hetrf + + @defgroup hecon_3 {he,sy}con_3: condition number estimate + @defgroup hetri2 {he,sy}tri2: inverse + @defgroup hetri2x {he,sy}tri2x: inverse + @defgroup hetri_3 {he,sy}tri_3: inverse + @defgroup hetri_3x {he,sy}tri_3x: inverse + @defgroup hetrs2 {he,sy}trs2: solve using factor + @defgroup hetrs_3 {he,sy}trs_3: solve using factor + + @defgroup heswapr {he,sy}swapr: apply 2-sided permutation + @defgroup la_hercond la_hercond: Skeel condition number estimate + @defgroup la_herfsx_extended la_herfsx_extended: step in herfsx + @defgroup la_herpvgrw la_herpvgrw: reciprocal pivot growth + + @defgroup hpsv_comp --- packed, rook v1 --- + @defgroup hpcon {hp,sp}con: condition number estimate + @defgroup hptrf {hp,sp}trf: triangular factor + @defgroup hptrs {hp,sp}trs: triangular solve using factor + @defgroup hptri {hp,sp}tri: triangular inverse + @defgroup hprfs {hp,sp}rfs: iterative refinement + + @defgroup hesv_comp_v2 --- full, rook v2 --- + @defgroup hecon_rook {he,sy}con_rook: condition number estimate + @defgroup hetrf_rook {he,sy}trf_rook: triangular factor + @defgroup lahef_rook la{he,sy}f_rook: triangular factor step + @defgroup hetf2_rook {he,sy}tf2_rook: triangular factor, level 2 + @defgroup hetrs_rook {he,sy}trs_rook: triangular solve using factor + @defgroup hetri_rook {he,sy}tri_rook: triangular inverse + + @defgroup hesv_comp_v3 --- full, rook v3 --- + @defgroup hetrf_rk {he,sy}trf_rk: triangular factor + @defgroup lahef_rk la{he,sy}f_rk: triangular factor step + @defgroup hetf2_rk {he,sy}tf2_rk: triangular factor, level 2 + @defgroup syconvf syconvf: convert to/from hetrf to hetrf_rk format + @defgroup syconvf_rook syconvf_rook: convert to/from hetrf_rook to hetrf_rk format + + @defgroup hesv_comp_aasen --- full, Aasen --- + @defgroup hetrf_aa {he,sy}trf_aa: triangular factor + @defgroup lahef_aa la{he,sy}f_aa: triangular factor partial factor + @defgroup hetrs_aa {he,sy}trs_aa: triangular solve using factor + + @defgroup hesv_comp_aasen2 --- full, Aasen, blocked 2-stage --- + @defgroup hetrf_aa_2stage {he,sy}trf_aa_2stage: triangular factor + @defgroup hetrs_aa_2stage {he,sy}trs_aa_2stage: triangular solve using factor + @} + + @defgroup trsv_comp_grp Triangular computational routines (solve, cond, etc.) + @{ + @defgroup trsv_comp --- full --- + @defgroup trcon trcon: condition number estimate + @defgroup trtrs trtrs: triangular solve + @defgroup latrs latrs: triangular solve with robust scaling + @defgroup latrs3 latrs3: triangular solve with robust scaling, level 3 + @defgroup trtri trtri: triangular inverse + @defgroup trti2 trti2: triangular inverse, level 2 + @defgroup trrfs trrfs: triangular iterative refinement + @defgroup lauum lauum: triangular multiply: U^H U + @defgroup lauu2 lauu2: triangular multiply: U^H U, level 2 + + @defgroup tpsv_comp --- packed --- + @defgroup tpcon tpcon: condition number estimate + @defgroup tptrs tptrs: triangular solve + @defgroup latps latps: triangular solve with robust scaling + @defgroup tptri tptri: triangular inverse + @defgroup tprfs tprfs: triangular iterative refinement + + @defgroup tfsv_comp --- rectangular full packed (RFP) --- + @defgroup tftri tftri: triangular inverse, RFP + + @defgroup tbsv_comp --- banded --- + @defgroup tbcon tbcon: condition number estimate + @defgroup tbtrs tbtrs: triangular solve + @defgroup latbs latbs: triangular solve with scaling + @defgroup tbrfs tbrfs: triangular iterative refinement + @} + + @defgroup solve_aux_grp Auxiliary routines + @{ + @defgroup lacn2 lacn2: 1-norm estimate, e.g., || A^{-1} ||_1 in gecon + @defgroup lacon lacon: 1-norm estimate, e.g., || A^{-1} ||_1 in gecon, old + @defgroup la_lin_berr la_lin_berr: backward error + @} + @} + + @defgroup gels_top Least squares + @{ + @defgroup gels_driver_grp Standard least squares, min || Ax - b ||_2 + @{ + @defgroup gels gels: least squares using QR/LQ + @defgroup gelst gelst: least squares using QR/LQ with T matrix + @defgroup gelss gelss: least squares using SVD, QR iteration + @defgroup gelsd gelsd: least squares using SVD, divide and conquer + @defgroup gelsy gelsy: least squares using complete orthogonal factor + @defgroup getsls getsls: least squares using tall-skinny QR/LQ + @} + + @defgroup ggls_driver_grp Constrained least squares + @{ + @defgroup gglse gglse: equality-constrained least squares + @defgroup ggglm ggglm: Gauss-Markov linear model + @} + + @defgroup gels_aux_grp Auxiliary routines + @{ + @defgroup laic1 laic1: condition estimate, step in gelsy + @defgroup lals0 lals0: back multiplying factors, step in gelsd + @defgroup lalsa lalsa: SVD of coefficient matrix, step in gelsd + @defgroup lalsd lalsd: uses SVD for least squares, step in gelsd + @} + @} + + @defgroup unitary_top Orthogonal/unitary factors (QR, CS, etc.) + @{ + @defgroup geqr_comp_grp QR + @{ + @defgroup geqr_comp1 --- flexible --- + @defgroup geqr geqr: QR factor, flexible + @defgroup gemqr gemqr: multiply by Q from geqr + + @defgroup geqr_comp2 --- classic --- + @defgroup geqrf geqrf: QR factor + @defgroup geqr2 geqr2: QR factor, level 2 + @defgroup ungqr {un,or}gqr: generate explicit Q from geqrf + @defgroup ung2r {un,or}g2r: generate explicit Q from geqrf, level 2 + @defgroup unmqr {un,or}mqr: multiply by Q from geqrf + @defgroup unm2r {un,or}m2r: multiply by Q from geqrf, level 2 + + @defgroup geqr_comp3 --- with T --- + @defgroup geqrt geqrt: QR factor, with T + @defgroup geqrt2 geqrt2: QR factor, with T, level 2 + @defgroup geqrt3 geqrt3: QR factor, with T, recursive panel + @defgroup gemqrt gemqrt: multiply by Q from geqrt + + @defgroup geqr_comp4 --- positive --- + @defgroup geqrfp geqrfp: QR factor, diag( R ) ≥ 0 + @defgroup geqr2p geqr2p: QR factor, diag( R ) ≥ 0, level 2 + @} + + @defgroup geqpf_comp_grp QR with pivoting + @{ + @defgroup geqp3 geqp3: QR factor with pivoting, level 3 + @defgroup laqp2 laqp2: step of geqp3 + @defgroup laqps laqps: step of geqp3 + @} + + @defgroup getsqr_comp_grp QR, tall-skinny + @{ + @defgroup latsqr latsqr: tall-skinny QR factor + @defgroup ungtsqr {un,or}gtsqr: generate Q from latsqr + @defgroup ungtsqr_row {un,or}gtsqr_row: generate Q from latsqr + @defgroup larfb_gett larfb_gett: step in ungtsqr_row + @defgroup lamtsqr lamtsqr: multiply by Q from latsqr + @defgroup getsqrhrt getsqrhrt: tall-skinny QR factor, with Householder reconstruction + @defgroup unhr_col {un,or}hr_col: Householder reconstruction + @defgroup launhr_col_getrfnp la{un,or}hr_col_getrfnp: LU factor without pivoting + @defgroup launhr_col_getrfnp2 la{un,or}hr_col_getrfnp2: LU factor without pivoting, level 2 + @} + + @defgroup tpqr_comp_grp QR, triangular-pentagonal + @{ + @defgroup tpqrt tpqrt: QR factor + @defgroup tpqrt2 tpqrt2: QR factor, level 2 + @defgroup tpmqrt tpmqrt: applies Q + @defgroup tprfb tprfb: applies Q (like larfb) + @} + + @defgroup ggqr_comp_grp Generalized QR + @{ + @defgroup ggqrf ggqrf: Generalized QR factor + @} + + @defgroup gelq_comp_grp LQ + @{ + @defgroup gelq_comp1 --- flexible --- + @defgroup gelq gelq: LQ factor, flexible + @defgroup gemlq gemlq: multiply by Q from gelq + + @defgroup gelq_comp2 --- classic --- + @defgroup gelqf gelqf: LQ factor + @defgroup gelq2 gelq2: LQ factor, level 2 + @defgroup unglq {un,or}glq: generate explicit Q from gelqf + @defgroup ungl2 {un,or}gl2: generate explicit Q, level 2, step in unglq + @defgroup unmlq {un,or}mlq: multiply by Q from gelqf + @defgroup unml2 {un,or}ml2: multiply by Q, level 2, step in unmlq + + @defgroup gelq_comp3 --- with T --- + @defgroup gelqt gelqt: LQ factor, with T + @defgroup gelqt3 gelqt3: LQ factor, with T, recursive + @defgroup gemlqt gemlqt: multiply by Q from gelqt + @} + + @defgroup geswlq_comp_grp LQ, short-wide + @{ + @defgroup laswlq laswlq: short-wide LQ factor + @defgroup lamswlq lamswlq: multiply by Q from laswlq + @} + + @defgroup tplq_comp_grp LQ, triangular-pentagonal + @{ + @defgroup tplqt tplqt: QR factor + @defgroup tplqt2 tplqt2: QR factor, level 2 + @defgroup tpmlqt tpmlqt: applies Q + @} + + @defgroup geql_comp_grp QL + @{ + @defgroup geqlf geqlf: QL factor + @defgroup geql2 geql2: QL factor, level 2 + @defgroup ungql {un,or}gql: generate explicit Q from geqlf + @defgroup unmql {un,or}mql: multiply by Q from geqlf + @defgroup ung2l {un,or}g2l: step in ungql + @defgroup unm2l {un,or}m2l: step in unmql + @} + + @defgroup gerq_comp_grp RQ + @{ + @defgroup gerqf gerqf: RQ factor + @defgroup gerq2 gerq2: RQ factor, level 2 + @defgroup ungrq {un,or}grq: generate explicit Q from gerqf + @defgroup unmrq {un,or}mrq: multiply by Q from gerqf + @defgroup unmr2 {un,or}mr2: step in unmrq + @defgroup ungr2 {un,or}gr2: step in ungrq + @} + + @defgroup ggrq_comp_grp Generalized RQ + @{ + @defgroup ggrqf ggrqf: Generalized RQ factor + @} + + @defgroup gerz_comp_grp RZ + @{ + @defgroup tzrzf tzrzf: RZ factor + @defgroup latrz latrz: RZ factor step + @defgroup unmrz {un,or}mrz: multiply by Z from tzrzf + @defgroup unmr3 {un,or}mr3: step in unmrz + @defgroup larz larz: apply reflector + @defgroup larzb larzb: apply block reflector + @defgroup larzt larzt: generate T matrix + @} + + @defgroup gecs_comp_grp Cosine-Sine (CS) decomposition + @{ + @defgroup bbcsd bbcsd: ?? + @defgroup uncsd {un,or}csd: ?? + @defgroup uncsd2by1 {un,or}csd2by1: ?? + @defgroup unbdb {un,or}bdb: bidiagonalize partitioned unitary matrix, step in uncsd + @defgroup unbdb1 {un,or}bdb1: step in uncsd2by1 + @defgroup unbdb2 {un,or}bdb2: step in uncsd2by1 + @defgroup unbdb3 {un,or}bdb3: step in uncsd2by1 + @defgroup unbdb4 {un,or}bdb4: step in uncsd2by1 + @defgroup unbdb5 {un,or}bdb5: step in uncsd2by1 + @defgroup unbdb6 {un,or}bdb6: step in uncsd2by1 + + @defgroup lapmr lapmr: permute rows + @defgroup lapmt lapmt: permute cols + @} + + @defgroup reflector_aux_grp Householder reflectors + @{ + @defgroup larf larf: apply Householder reflector + @defgroup larfx larfx: apply Householder reflector, unrolled + @defgroup larfy larfy: apply Householder reflector symmetrically (2-sided) + @defgroup larfb larfb: apply block Householder reflector + @defgroup larfg larfg: generate Householder reflector + @defgroup larfgp larfgp: generate Householder reflector, beta ≥ 0 + @defgroup larft larft: generate T matrix + @} + + @defgroup rot_aux_grp Givens/Jacobi plane rotations + @{ + @defgroup lartg lartg: generate plane rotation, more accurate than BLAS rot + @defgroup lartgp lartgp: generate plane rotation, more accurate than BLAS rot + @defgroup lasr lasr: apply series of plane rotations + @defgroup largv largv: generate vector of plane rotations + @defgroup lartv lartv: apply vector of plane rotations to vectors + @defgroup lar2v lar2v: apply vector of plane rotations to 2x2 matrices + @defgroup lacrt lacrt: apply plane rotation (unused?) + @} + @} + + @defgroup geev_top Non-symmetric eigenvalues + @{ + @defgroup geev_driver_grp Standard eig driver, AV = VΛ + @{ + @defgroup geev geev: eig + @defgroup geevx geevx: eig, expert + + @defgroup gees gees: Schur form + @defgroup geesx geesx: Schur form, expert + @} + + @defgroup ggev_driver_grp Generalized eig driver + @{ + @defgroup ggev3 ggev3: eig + @defgroup ggev ggev: eig, unblocked + @defgroup ggevx ggevx: eig, expert + + @defgroup gges3 gges3: Schur form + @defgroup gges gges: Schur form, unblocked + @defgroup ggesx ggesx: Schur form, expert + @} + + @defgroup geev_comp_grp Eig computational routines + @{ + @defgroup gebal gebal: balance matrix + @defgroup gehrd gehrd: reduction to Hessenberg + @defgroup gehd2 gehd2: reduction to Hessenberg, level 2 + @defgroup lahr2 lahr2: step in gehrd + @defgroup unghr {un,or}ghr: generate Q from gehrd + @defgroup unmhr {un,or}mhr: multiply by Q from gehrd + @defgroup gebak gebak: back-transform eigvec + @defgroup hseqr hseqr: Hessenberg eig, QR iteration + @defgroup hsein hsein: Hessenberg inverse iteration for eigvec + @defgroup trevc trevc: eigenvectors of triangular Schur form, old + @defgroup trevc3 trevc3: eigenvectors of triangular Schur form, blocked + @defgroup laln2 laln2: 1x1 or 2x2 solve, step in trevc + + @defgroup trsyl trsyl: Sylvester equation + @defgroup trsyl3 trsyl3: Sylvester equation, level 3 + @defgroup lasy2 lasy2: Sylvester equation + + @defgroup trsna trsna: eig condition numbers + @defgroup laqtr laqtr: quasi-triangular solve + + @defgroup trexc trexc: reorder Schur form + @defgroup trsen trsen: reorder Schur form + @defgroup laexc laexc: reorder Schur form + + @defgroup lanv2 lanv2: 2x2 Schur factor + + @defgroup laqr_group --- hseqr auxiliary --- + @defgroup laein laein: eigvec by Hessenberg inverse iteration + @defgroup lahqr lahqr: eig of Hessenberg, step in hseqr + @defgroup laqr0 laqr0: eig of Hessenberg, step in hseqr + @defgroup laqr1 laqr1: step in hseqr + @defgroup laqr2 laqr2: step in hseqr + @defgroup laqr3 laqr3: step in hseqr + @defgroup laqr4 laqr4: eig of Hessenberg, step in hseqr + @defgroup laqr5 laqr5: step in hseqr + + @defgroup iparmq iparmq: set parameters for hseqr + + @defgroup laqz_group --- ggev3, gges3 auxiliary --- + @defgroup laqz0 laqz0: step in ggev3, gges3 + @defgroup laqz1 laqz1: step in ggev3, gges3 + @defgroup laqz2 laqz2: step in ggev3, gges3 + @defgroup laqz3 laqz3: step in ggev3, gges3 + @defgroup laqz4 laqz4: step in ggev3, gges3 + @} + + @defgroup ggev_comp_grp Generalized eig computational routines + @{ + @defgroup ggbal ggbal: balance matrix + @defgroup gghrd gghrd: reduction to Hessenberg + @defgroup gghd3 gghd3: reduction to Hessenberg, level 3 + @defgroup hgeqz hgeqz: generalized Hessenberg eig + @defgroup ggbak ggbak: back-transform eigvec + @defgroup tgsen tgsen: reorder generalized Schur form + @defgroup tgsna tgsna: reciprocal cond est + @defgroup tgsyl tgsyl: Sylvester equation + @defgroup tgsy2 tgsy2: Sylvester equation panel (?) + @defgroup unm22 {un,or}m22: multiply by banded Q, step in gghd3 + @defgroup lagv2 lagv2: 2x2 generalized Schur factor + @defgroup tgevc tgevc: eigvec of pair of matrices + @defgroup tgexc tgexc: reorder generalized Schur form + @defgroup tgex2 tgex2: reorder generalized Schur form + @} + @} + + @defgroup heev_top Hermitian/symmetric eigenvalues + @{ + @defgroup heev_driver_grp Standard eig driver, AV = VΛ + @{ + @defgroup heev_driver --- full --- + @defgroup heev {he,sy}ev: eig, QR iteration + @defgroup heevd {he,sy}evd: eig, divide and conquer + @defgroup heevr {he,sy}evr: eig, MRRR + @defgroup heevx {he,sy}evx: eig, bisection + + @defgroup heev_driver2 --- full, 2-stage --- + @defgroup heev_2stage {he,sy}ev_2stage: eig, QR iteration + @defgroup heevd_2stage {he,sy}evd_2stage: eig, divide and conquer + @defgroup heevr_2stage {he,sy}evr_2stage: eig, MRRR + @defgroup heevx_2stage {he,sy}evx_2stage: eig, bisection + + @defgroup hpev_driver --- packed --- + @defgroup hpev {hp,sp}ev: eig, QR iteration + @defgroup hpevd {hp,sp}evd: eig, divide and conquer + @defgroup hpevx {hp,sp}evx: eig, bisection + + @defgroup hbev_driver --- banded --- + @defgroup hbev {hb,sb}ev: eig, QR iteration + @defgroup hbevd {hb,sb}evd: eig, divide and conquer + @defgroup hbevx {hb,sb}evx: eig, bisection + + @defgroup hbev_driver2 --- banded, 2nd-stage --- + @defgroup hbev_2stage {hb,sb}ev_2stage: eig, QR iteration + @defgroup hbevd_2stage {hb,sb}evd_2stage: eig, divide and conquer + @defgroup hbevx_2stage {hb,sb}evx_2stage: eig, bisection + + @defgroup stev_driver --- tridiagonal --- + @defgroup stev stev: eig, QR iteration + @defgroup stevd stevd: eig, divide and conquer + @defgroup stevr stevr: eig, MRRR + @defgroup stevx stevx: eig, bisection + @defgroup pteqr pteqr: eig, positive definite tridiagonal + + @defgroup stebz stebz: eig, Kahan + @defgroup sterf sterf: eig, QR iteration + @defgroup stedc stedc: eig, divide and conquer + @defgroup stegr stegr: eig, bisection, see stemr + @defgroup stein stein: eig, inverse iteration + @defgroup stemr stemr: eig, relatively robust representation (RRR) + @defgroup steqr steqr: eig, QR iteration + @} + + @defgroup hegv_driver_grp Generalized eig driver, AV = BVΛ, etc. + @{ + @defgroup hegv_driver --- full --- + @defgroup hegv {he,sy}gv: eig, QR iteration + @defgroup hegv_2stage {he,sy}gv_2stage: eig, QR iteration, 2-stage + @defgroup hegvd {he,sy}gvd: eig, divide and conquer + @defgroup hegvx {he,sy}gvx: eig, bisection + + @defgroup hpgv_driver --- packed --- + @defgroup hpgv {hp,sp}gv: eig, QR iteration + @defgroup hpgvd {hp,sp}gvd: eig, divide and conquer + @defgroup hpgvx {hp,sp}gvx: eig, bisection + + @defgroup hbgv_driver --- banded --- + @defgroup hbgv {hb,sb}gv: eig, QR iteration + @defgroup hbgvd {hb,sb}gvd: eig, divide and conquer + @defgroup hbgvx {hb,sb}gvx: eig, bisection + @} + + @defgroup heev_comp_grp Eig computational routines + @{ + @defgroup heev_comp --- full --- + @defgroup disna disna: eig condition numbers + @defgroup hetrd {he,sy}trd: reduction to tridiagonal + @defgroup hetd2 {he,sy}td2: reduction to tridiagonal, level 2 + @defgroup latrd latrd: step in hetrd + @defgroup ungtr {un,or}gtr: generate Q from hetrd + @defgroup unmtr {un,or}mtr: multiply by Q from hetrd + + @defgroup hetrd_2stage {he,sy}trd_2stage: reduction to tridiagonal, 2-stage + @defgroup hetrd_he2hb {he,sy}trd_he2hb: full to band (1st stage) + @defgroup hetrd_hb2st {he,sy}trd_hb2st: band to tridiagonal (2nd stage) + @defgroup hb2st_kernels {hb,sb}2st_kernels: band to tridiagonal (2nd stage) + + @defgroup lae2 lae2: 2x2 eig, step in steqr, stemr + @defgroup laesy laesy: 2x2 eig + @defgroup laev2 laev2: 2x2 eig + @defgroup lagtf lagtf: LU factor of (T - λI) + @defgroup lagts lagts: LU solve of (T - λI) x = y + + @defgroup hpev_comp --- packed --- + @defgroup hptrd {hp,sp}trd: reduction to tridiagonal + @defgroup upgtr {up,op}gtr: generate Q from hetrd + @defgroup upmtr {up,op}mtr: multiply by Q from hptrd + + @defgroup hbev_comp --- banded --- + @defgroup hbtrd {hb,sb}trd: reduction to tridiagonal + @} + + @defgroup hegv_comp_grp Generalized eig computational routines + @{ + @defgroup hegst {he,sy}gst: reduction to standard form + @defgroup hegs2 {he,sy}gs2: reduction to standard form, level 2 + @defgroup hpgst {hp,sp}gst: reduction to standard form, packed + @defgroup hbgst {hb,sb}gst: reduction to standard form, banded + @defgroup pbstf pbstf: split Cholesky factor, use with hbgst + @defgroup lag2 lag2: 2x2 eig + @} + + @defgroup stev_comp_grp tridiag bisection routines + @{ + @defgroup laebz laebz: counts eigvals <= value + @defgroup laneg laneg: Sturm count + @} + + @defgroup laed_comp_grp tridiag divide and conquer (D&C) routines + @{ + @defgroup laed0 laed0: D&C step: top level solver + @defgroup laed1 laed1: D&C step: merge subproblems + @defgroup laed2 laed2: D&C step: deflation + @defgroup laed3 laed3: D&C step: secular equation + @defgroup laed4 laed4: D&C step: secular equation nonlinear solver + @defgroup laed5 laed5: D&C step: secular equation, 2x2 + @defgroup laed6 laed6: D&C step: secular equation Newton step + @defgroup lamrg lamrg: permutation to merge 2 sorted lists + + @defgroup laed_comp2 --- eig value only or update Q --- + @defgroup laed7 laed7: D&C step: merge subproblems + @defgroup laed8 laed8: D&C step: deflation + @defgroup laed9 laed9: D&C step: secular equation + @defgroup laeda laeda: D&C step: z vector + @} + + @defgroup larr_comp_grp tridiag RRR routines + @{ + @defgroup larra larra: step in stemr + @defgroup larrb larrb: step in stemr + @defgroup larrc larrc: step in stemr + @defgroup larrd larrd: step in stemr, tridiag eig + @defgroup larre larre: step in stemr + @defgroup larrf larrf: step in stemr, find relative robust representation (RRR) + @defgroup larrj larrj: step in stemr, refine eigval estimates + @defgroup larrk larrk: step in stemr, compute one eigval + @defgroup larrr larrr: step in stemr, test to do expensive tridiag eig algorithm + @defgroup larrv larrv: eig tridiagonal, step in stemr & stegr + @defgroup lar1v lar1v: step in larrv, hence stemr & stegr + @} + @} + + @defgroup svd_top Singular Value Decomposition (SVD) + @{ + @defgroup svd_driver_grp Standard SVD driver, A = UΣV^H + @{ + @defgroup gesvd_driver --- full --- + @defgroup gesvd gesvd: SVD, QR iteration + @defgroup gesvdq gesvdq: SVD, QR with pivoting + @defgroup gesdd gesdd: SVD, divide and conquer + @defgroup gesvdx gesvdx: SVD, bisection + @defgroup gejsv gejsv: SVD, Jacobi, high-level + @defgroup gesvj gesvj: SVD, Jacobi, low-level + + @defgroup bdsvd_driver --- bidiagonal --- + @defgroup bdsqr bdsqr: bidiagonal SVD, QR iteration (dqds) + @defgroup bdsdc bdsdc: bidiagonal SVD, divide and conquer + @defgroup bdsvdx bdsvdx: bidiagonal SVD, bisection + @} + + @defgroup ggsvd_driver_grp Generalized SVD driver + @{ + @defgroup ggsvd3 ggsvd3: SVD, QR iteration + @} + + @defgroup gesvd_comp_grp SVD computational routines + @{ + @defgroup gebrd gebrd: reduction to bidiagonal + @defgroup gebd2 gebd2: reduction to bidiagonal, level 2 + @defgroup labrd labrd: step in gebrd + @defgroup gbbrd gbbrd: band to bidiagonal + @defgroup ungbr {un,or}gbr: generate Q, P from gebrd + @defgroup unmbr {un,or}mbr: multiply by Q, P from gebrd + + @defgroup gesvd_aux --- auxiliary routines --- + @defgroup gsvj0 gsvj0: step in gesvj + @defgroup gsvj1 gsvj1: step in gesvj + @defgroup las2 las2: 2x2 triangular SVD + @defgroup lasv2 lasv2: 2x2 triangular SVD + @defgroup lartgs lartgs: generate plane rotation for bidiag SVD + @} + + @defgroup ggsvd_comp_grp Generalized SVD computational routines + @{ + @defgroup ggsvp3 ggsvp3: step in ggsvd + @defgroup tgsja tgsja: generalized SVD of trapezoidal matrices, step in ggsvd3 + @defgroup lags2 lags2: 2x2 orthogonal factor, step in tgsja + @defgroup lapll lapll: linear dependence of 2 vectors + @} + + @defgroup lasq_comp_grp bidiag QR iteration routines + @{ + @defgroup lasq1 lasq1: dqds step + @defgroup lasq2 lasq2: dqds step + @defgroup lasq3 lasq3: dqds step + @defgroup lasq4 lasq4: dqds step + @defgroup lasq5 lasq5: dqds step + @defgroup lasq6 lasq6: dqds step + @} + + @defgroup lasd_comp_grp bidiag D&C routines + @{ + @defgroup lasd0 lasd0: D&C step: top level solver + @defgroup lasdt lasdt: D&C step: tree + @defgroup lasd1 lasd1: D&C step: merge subproblems + @defgroup lasd2 lasd2: D&C step: deflation + @defgroup lasd3 lasd3: D&C step: secular equation + @defgroup lasd4 lasd4: D&C step: secular equation nonlinear solver + @defgroup lasd5 lasd5: D&C step: secular equation, 2x2 + @defgroup lasdq lasdq: D&C step: leaf using bdsqr + + @defgroup lasd_comp2 --- singular values only or factored form --- + @defgroup lasda lasda: D&C step: top level solver + @defgroup lasd6 lasd6: D&C step: merge subproblems + @defgroup lasd7 lasd7: D&C step: deflation + @defgroup lasd8 lasd8: D&C step: secular equation + @} + @} + + @defgroup blas_like_top BLAS-like + @{ + @defgroup set_grp Initialize, copy, convert + @{ + @defgroup laset laset: set matrix + @defgroup larnv larnv: random vector + @defgroup laruv laruv: random uniform vector + + @defgroup lacpy lacpy: copy matrix + + @defgroup lacp2 lacp2: general matrix, convert real to complex + @defgroup _lag2_ _lag2_: general matrix, convert double <=> single + @defgroup _lat2_ _lat2_: triangular matrix, convert double <=> single + + @defgroup tfttp tfttp: triangular matrix, RFP (tf) to packed (tp) + @defgroup tfttr tfttr: triangular matrix, RFP (tf) to full (tr) + @defgroup tpttf tpttf: triangular matrix, packed (tp) to RFP (tf) + @defgroup tpttr tpttr: triangular matrix, packed (tp) to full (tr) + @defgroup trttf trttf: triangular matrix, full (tr) to RFP (tf) + @defgroup trttp trttp: triangular matrix, full (tr) to packed (tp) + @} + + @defgroup norm_grp Matrix norm + @{ + @defgroup lange lange: general matrix + @defgroup langb langb: general matrix, banded + @defgroup langt langt: general matrix, tridiagonal + + @defgroup lanhs lanhs: Hessenberg + + @defgroup lanhe lan{he,sy}: Hermitian/symmetric matrix + @defgroup lanhf lan{hf,sf}: Hermitian/symmetric matrix, RFP + @defgroup lanhp lan{hp,sp}: Hermitian/symmetric matrix, packed + @defgroup lanhb lan{hb,sb}: Hermitian/symmetric matrix, banded + @defgroup lanht lan{ht,st}: Hermitian/symmetric matrix, tridiagonal + + @defgroup lantr lantr: triangular matrix + @defgroup lantp lantp: triangular matrix, packed + @defgroup lantb lantb: triangular matrix, banded + @} + + @defgroup blas0_like_grp Scalar operations + @{ + @defgroup isnan isnan: test for NaN + @defgroup laisnan laisnan: test for NaN, unoptimized + @defgroup ladiv ladiv: complex divide + @defgroup lapy2 lapy2: robust sqrt( x^2 + y^2 ) + @defgroup lapy3 lapy3: robust sqrt( x^2 + y^2 + z^2 ) + @defgroup larmm larmm: scale factor to avoid overflow, step in latrs + @} + + @defgroup blas1_like_grp Level 1 BLAS-like vector ops + @{ + @defgroup lacgv lacgv: conjugate vector + @defgroup lasrt lasrt: sort vector + @defgroup lassq lassq: sum-of-squares, avoiding over/underflow + @defgroup rscl rscl: scale vector by reciprocal + @} + + @defgroup blas2_like_grp Level 2 BLAS-like matrix-vector ops + @{ + @defgroup ilalc ilalc: find non-zero col + @defgroup ilalr ilalr: find non-zero row + @defgroup lascl lascl: scale matrix + @defgroup la_geamv la_geamv: matrix-vector multiply |A| * |x|, general + @defgroup la_gbamv la_gbamv: matrix-vector multiply |A| * |x|, general banded + @defgroup la_heamv la_heamv: matrix-vector multiply |A| * |x|, Hermitian/symmetric + @defgroup lascl2 lascl2: diagonal scale matrix, A = D A + @defgroup larscl2 larscl2: reciprocal diagonal scale matrix, A = D^{-1} A + @defgroup la_wwaddw la_wwaddw: add to double-double or single-single vector + @} + + @defgroup blas3_like_grp Level 3 BLAS-like matrix-matrix ops + @{ + @defgroup lagtm lagtm: tridiagonal matrix-matrix multiply + @defgroup lacrm lacrm: complex * real matrix-matrix multiply + @defgroup larcm larcm: real * complex matrix-matrix multiply + @defgroup hfrk hfrk: Hermitian rank-k update, RFP format + @defgroup tfsm tfsm: triangular-matrix solve, RFP format + @} + @} + + @defgroup aux_top Auxiliary routines + @{ + @defgroup aux_grp Other auxiliary routines + @{ + @defgroup lsame lsame: string comparison + @defgroup lsamen lsamen: string comparison + @defgroup roundup_lwork roundup_lwork: fix rounding integer to float + @defgroup second second: wall clock timer + @} + + @defgroup params_grp Parameters + @{ + @defgroup lamch lamch: machine parameters + @defgroup lamc1 lamc1: ?? + @defgroup lamc2 lamc2: ?? + @defgroup lamc3 lamc3: ?? + @defgroup lamc4 lamc4: ?? + @defgroup lamc5 lamc5: ?? + @defgroup labad labad: over/underflow on obsolete pre-IEEE machines + @defgroup ilaver ilaver: LAPACK version + @defgroup ilaenv ilaenv: tuning parameters + @defgroup ilaenv2stage ilaenv2stage: tuning parameters for 2-stage eig + @defgroup iparam2stage iparam2stage: sets parameters for 2-stage eig + @defgroup ieeeck ieeeck: verify inf and NaN are safe + @defgroup la_constants la_constants: Fortran 95 module of constants + + @defgroup blast_aux --- BLAST constants --- + @defgroup iladiag iladiag: diag string to BLAST const + @defgroup ilaprec ilaprec: precision string to BLAST const + @defgroup ilatrans ilatrans: trans string to BLAST const + @defgroup ilauplo ilauplo: uplo string to BLAST const + @defgroup la_transtype la_transtype: BLAST const to string + @} + + @defgroup xerbla_grp Error reporting + @{ + @defgroup xerbla xerbla: error reporting + @defgroup xerbla_array xerbla_array: error reporting, callable from C + @} + @} +@} + +@defgroup blas_top BLAS +BLAS are defined by three papers: +Basic linear algebra subprograms for {FORTRAN} usage, Lawson et al, 1979. +An extended set of {FORTRAN} basic linear algebra subprograms, Dongarra et al, 1988. +A set of level 3 basic linear algebra subprograms, Dongarra et al, 1990. +Some BLAS-like routines (e.g., csymv, crot, csum1, icmax1) exist in +LAPACK rather than the classic BLAS. +These were extended by the Extra Precision BLAS (XBLAS, not documented here) +https://www.netlib.org/xblas/ + +@{ + @defgroup scalar_grp Scalar operations + @{ + @defgroup abs1 abs1: | real( x ) | + | imag( x ) | + @} + + @defgroup blas1_grp Level 1 BLAS: vector ops + @{ + @defgroup asum asum: sum | real( x_i ) | + | imag( x_i ) | + @defgroup sum1 sum1: sum | x_i | (in LAPACK) + @defgroup axpy axpy: y = ax + y + @defgroup copy copy: y = x + @defgroup dot dot: x^H x and x^T x + @defgroup iamax iamax: argmax_i | real( x_i ) | + | imag( x_i ) | + @defgroup imax1 imax1: argmax_i | x_i | (in LAPACK) + @defgroup nrm2 nrm2: || x ||_2 + @defgroup scal scal: x = alpha x + @defgroup swap swap: x <=> y + + @defgroup rot_comp --- Givens/Jacobi plane rotations --- + @defgroup rot rot: apply plane rotation ([cz]rot in LAPACK) + @defgroup rotg rotg: generate plane rotation (cf. lartg) + @defgroup rotm rotm: apply modified (fast) plane rotation + @defgroup rotmg rotmg: generate modified (fast) plane rotation + @} + + @defgroup blas2_grp Level 2 BLAS: matrix-vector ops + @{ + @defgroup blas2_full --- full --- + @defgroup gemv gemv: general matrix-vector multiply + @defgroup ger ger: general matrix rank-1 update + + @defgroup hemv {he,sy}mv: Hermitian/symmetric matrix-vector multiply ([cz]symv in LAPACK) + @defgroup her {he,sy}r: Hermitian/symmetric rank-1 update + @defgroup her2 {he,sy}r2: Hermitian/symmetric rank-2 update + + @defgroup trmv trmv: triangular matrix-vector multiply + @defgroup trsv trsv: triangular matrix-vector solve + + @defgroup blas2_packed --- packed --- + @defgroup hpmv {hp,sp}mv: Hermitian/symmetric matrix-vector multiply + @defgroup hpr {hp,sp}r: Hermitian/symmetric rank-1 update + @defgroup hpr2 {hp,sp}r2: Hermitian/symmetric rank-2 update + + @defgroup tpmv tpmv: triangular matrix-vector multiply + @defgroup tpsv tpsv: triangular matrix-vector solve + + @defgroup blas2_banded --- banded --- + @defgroup gbmv gbmv: general matrix-vector multiply + + @defgroup hbmv {hb,sb}mv: Hermitian/symmetric matrix-vector multiply + + @defgroup tbmv tbmv: triangular matrix-vector multiply + @defgroup tbsv tbsv: triangular matrix-vector solve + @} + + @defgroup blas3_grp Level 3 BLAS: matrix-matrix ops + @{ + @defgroup gemm gemm: general matrix-matrix multiply + + @defgroup hemm {he,sy}mm: Hermitian/symmetric matrix-matrix multiply + @defgroup herk {he,sy}rk: Hermitian/symmetric rank-k update + @defgroup her2k {he,sy}r2k: Hermitian/symmetric rank-2k update + + @defgroup trmm trmm: triangular matrix-matrix multiply + @defgroup trsm trsm: triangular matrix-matrix solve + @} +@} + **/ diff --git a/INSTALL/dlamch.f b/INSTALL/dlamch.f index 37801ec550..c3a7b61581 100644 --- a/INSTALL/dlamch.f +++ b/INSTALL/dlamch.f @@ -62,7 +62,7 @@ *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup lamch * * ===================================================================== DOUBLE PRECISION FUNCTION DLAMCH( CMACH ) @@ -144,6 +144,7 @@ DOUBLE PRECISION FUNCTION DLAMCH( CMACH ) * End of DLAMCH * END + ************************************************************************ *> \brief \b DLAMC3 *> \details @@ -164,6 +165,8 @@ DOUBLE PRECISION FUNCTION DLAMCH( CMACH ) *> B is a DOUBLE PRECISION *> The values A and B. *> \endverbatim +*> +*> \ingroup lamc3 *> DOUBLE PRECISION FUNCTION DLAMC3( A, B ) * diff --git a/INSTALL/dlamchf77.f b/INSTALL/dlamchf77.f index 1687afc015..e7958d0055 100644 --- a/INSTALL/dlamchf77.f +++ b/INSTALL/dlamchf77.f @@ -61,7 +61,7 @@ *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup lamch * * ===================================================================== DOUBLE PRECISION FUNCTION DLAMCH( CMACH ) @@ -155,7 +155,6 @@ DOUBLE PRECISION FUNCTION DLAMCH( CMACH ) END * ************************************************************************ -* *> \brief \b DLAMC1 *> \details *> \b Purpose: @@ -188,7 +187,8 @@ DOUBLE PRECISION FUNCTION DLAMCH( CMACH ) *> 'round to nearest' style. *> \endverbatim *> \author LAPACK is a software package provided by Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -*> \ingroup auxOTHERauxiliary +*> +*> \ingroup lamc1 *> *> \details \b Further \b Details *> \verbatim @@ -349,7 +349,6 @@ SUBROUTINE DLAMC1( BETA, T, RND, IEEE1 ) END * ************************************************************************ -* *> \brief \b DLAMC2 *> \details *> \b Purpose: @@ -358,7 +357,8 @@ SUBROUTINE DLAMC1( BETA, T, RND, IEEE1 ) *> list. *> \endverbatim *> \author LAPACK is a software package provided by Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -*> \ingroup auxOTHERauxiliary +*> +*> \ingroup lamc2 *> *> \param[out] BETA *> \verbatim @@ -620,7 +620,6 @@ SUBROUTINE DLAMC2( BETA, T, RND, EPS, EMIN, RMIN, EMAX, RMAX ) END * ************************************************************************ -* *> \brief \b DLAMC3 *> \details *> \b Purpose: @@ -636,7 +635,9 @@ SUBROUTINE DLAMC2( BETA, T, RND, EPS, EMIN, RMIN, EMAX, RMAX ) *> \verbatim *> The values A and B. *> \endverbatim - +*> +*> \ingroup lamc3 +*> DOUBLE PRECISION FUNCTION DLAMC3( A, B ) * * -- LAPACK auxiliary routine -- @@ -658,7 +659,6 @@ DOUBLE PRECISION FUNCTION DLAMC3( A, B ) END * ************************************************************************ -* *> \brief \b DLAMC4 *> \details *> \b Purpose: @@ -682,6 +682,8 @@ DOUBLE PRECISION FUNCTION DLAMC3( A, B ) *> \verbatim *> The base of the machine. *> \endverbatim +*> +*> \ingroup lamc4 *> SUBROUTINE DLAMC4( EMIN, START, BASE ) * @@ -744,7 +746,6 @@ SUBROUTINE DLAMC4( EMIN, START, BASE ) END * ************************************************************************ -* *> \brief \b DLAMC5 *> \details *> \b Purpose: @@ -788,6 +789,8 @@ SUBROUTINE DLAMC4( EMIN, START, BASE ) *> \verbatim *> The largest machine floating-point number. *> \endverbatim +*> +*> \ingroup lamc5 *> SUBROUTINE DLAMC5( BETA, P, EMIN, IEEE, EMAX, RMAX ) * diff --git a/INSTALL/droundup_lwork.f b/INSTALL/droundup_lwork.f index 86f84b2ad3..69e3c7f358 100644 --- a/INSTALL/droundup_lwork.f +++ b/INSTALL/droundup_lwork.f @@ -44,7 +44,7 @@ * *> \author Weslley Pereira, University of Colorado Denver, USA * -*> \ingroup auxOTHERauxiliary +*> \ingroup roundup_lwork * *> \par Further Details: * ===================== diff --git a/INSTALL/dsecnd_EXT_ETIME.f b/INSTALL/dsecnd_EXT_ETIME.f index b3dcc621de..157bb16574 100644 --- a/INSTALL/dsecnd_EXT_ETIME.f +++ b/INSTALL/dsecnd_EXT_ETIME.f @@ -28,7 +28,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== DOUBLE PRECISION FUNCTION DSECND( ) diff --git a/INSTALL/dsecnd_EXT_ETIME_.f b/INSTALL/dsecnd_EXT_ETIME_.f index 018d4d17d1..0b80ea550c 100644 --- a/INSTALL/dsecnd_EXT_ETIME_.f +++ b/INSTALL/dsecnd_EXT_ETIME_.f @@ -28,7 +28,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== DOUBLE PRECISION FUNCTION DSECND( ) diff --git a/INSTALL/dsecnd_INT_CPU_TIME.f b/INSTALL/dsecnd_INT_CPU_TIME.f index 05f82d6c73..67dd8c3f71 100644 --- a/INSTALL/dsecnd_INT_CPU_TIME.f +++ b/INSTALL/dsecnd_INT_CPU_TIME.f @@ -28,7 +28,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== DOUBLE PRECISION FUNCTION DSECND( ) diff --git a/INSTALL/dsecnd_INT_ETIME.f b/INSTALL/dsecnd_INT_ETIME.f index a1914de108..73b1cdf02f 100644 --- a/INSTALL/dsecnd_INT_ETIME.f +++ b/INSTALL/dsecnd_INT_ETIME.f @@ -28,7 +28,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== DOUBLE PRECISION FUNCTION DSECND( ) diff --git a/INSTALL/dsecnd_NONE.f b/INSTALL/dsecnd_NONE.f index 99a0d9d0d5..ba0802f646 100644 --- a/INSTALL/dsecnd_NONE.f +++ b/INSTALL/dsecnd_NONE.f @@ -30,7 +30,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== DOUBLE PRECISION FUNCTION DSECND( ) diff --git a/INSTALL/dsecndtst.f b/INSTALL/dsecndtst.f index ed108a8258..6c8f1a4041 100644 --- a/INSTALL/dsecndtst.f +++ b/INSTALL/dsecndtst.f @@ -18,7 +18,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup test_second * * ===================================================================== PROGRAM DSECNDTST * diff --git a/INSTALL/ilaver.f b/INSTALL/ilaver.f index 7d55e13e9d..4e0743d0de 100644 --- a/INSTALL/ilaver.f +++ b/INSTALL/ilaver.f @@ -44,7 +44,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup ilaver * * ===================================================================== SUBROUTINE ILAVER( VERS_MAJOR, VERS_MINOR, VERS_PATCH ) diff --git a/INSTALL/lsame.f b/INSTALL/lsame.f index 90e9a999d0..7bb7315dcb 100644 --- a/INSTALL/lsame.f +++ b/INSTALL/lsame.f @@ -28,9 +28,6 @@ * ========== * *> \param[in] CA -*> \verbatim -*> \endverbatim -*> *> \param[in] CB *> \verbatim *> CA and CB specify the single characters to be compared. @@ -44,7 +41,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup lsame * * ===================================================================== LOGICAL FUNCTION LSAME( CA, CB ) diff --git a/INSTALL/second_EXT_ETIME.f b/INSTALL/second_EXT_ETIME.f index 44b5282087..6ca014e26f 100644 --- a/INSTALL/second_EXT_ETIME.f +++ b/INSTALL/second_EXT_ETIME.f @@ -28,7 +28,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== REAL FUNCTION SECOND( ) diff --git a/INSTALL/second_EXT_ETIME_.f b/INSTALL/second_EXT_ETIME_.f index 1a4e50f416..d21a7ace89 100644 --- a/INSTALL/second_EXT_ETIME_.f +++ b/INSTALL/second_EXT_ETIME_.f @@ -28,7 +28,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== REAL FUNCTION SECOND( ) diff --git a/INSTALL/second_INT_CPU_TIME.f b/INSTALL/second_INT_CPU_TIME.f index 760aafe690..3e3bdd58a7 100644 --- a/INSTALL/second_INT_CPU_TIME.f +++ b/INSTALL/second_INT_CPU_TIME.f @@ -28,7 +28,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== REAL FUNCTION SECOND( ) diff --git a/INSTALL/second_INT_ETIME.f b/INSTALL/second_INT_ETIME.f index 995e4a7e68..7b39bf5c70 100644 --- a/INSTALL/second_INT_ETIME.f +++ b/INSTALL/second_INT_ETIME.f @@ -28,7 +28,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== REAL FUNCTION SECOND( ) diff --git a/INSTALL/second_NONE.f b/INSTALL/second_NONE.f index d711d6343a..20a788c018 100644 --- a/INSTALL/second_NONE.f +++ b/INSTALL/second_NONE.f @@ -30,7 +30,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup second * * ===================================================================== REAL FUNCTION SECOND( ) diff --git a/INSTALL/secondtst.f b/INSTALL/secondtst.f index 784c7a41de..b672a94980 100644 --- a/INSTALL/secondtst.f +++ b/INSTALL/secondtst.f @@ -14,7 +14,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup test_second * * ===================================================================== PROGRAM SECONDTST * diff --git a/INSTALL/slamch.f b/INSTALL/slamch.f index e2e2cba8e6..cfe0770a85 100644 --- a/INSTALL/slamch.f +++ b/INSTALL/slamch.f @@ -61,7 +61,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup lamch * * ===================================================================== REAL FUNCTION SLAMCH( CMACH ) @@ -143,6 +143,7 @@ REAL FUNCTION SLAMCH( CMACH ) * End of SLAMCH * END + ************************************************************************ *> \brief \b SLAMC3 *> \details @@ -153,7 +154,8 @@ REAL FUNCTION SLAMCH( CMACH ) *> might hold one of these in a register. *> \endverbatim *> \author LAPACK is a software package provided by Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -*> \ingroup auxOTHERauxiliary +*> +*> \ingroup lamc3 *> *> \param[in] A *> \verbatim diff --git a/INSTALL/slamchf77.f b/INSTALL/slamchf77.f index 5141523ba3..cabc3788df 100644 --- a/INSTALL/slamchf77.f +++ b/INSTALL/slamchf77.f @@ -60,7 +60,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup lamch * * ===================================================================== REAL FUNCTION SLAMCH( CMACH ) @@ -154,7 +154,6 @@ REAL FUNCTION SLAMCH( CMACH ) END * ************************************************************************ -* *> \brief \b SLAMC1 *> \details *> \b Purpose: @@ -187,7 +186,8 @@ REAL FUNCTION SLAMCH( CMACH ) *> 'round to nearest' style. *> \endverbatim *> \author LAPACK is a software package provided by Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -*> \ingroup auxOTHERauxiliary +*> +*> \ingroup lamc1 *> *> \details \b Further \b Details *> \verbatim @@ -348,7 +348,6 @@ SUBROUTINE SLAMC1( BETA, T, RND, IEEE1 ) END * ************************************************************************ -* *> \brief \b SLAMC2 *> \details *> \b Purpose: @@ -357,7 +356,8 @@ SUBROUTINE SLAMC1( BETA, T, RND, IEEE1 ) *> list. *> \endverbatim *> \author LAPACK is a software package provided by Univ. of Tennessee, Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd.. -*> \ingroup auxOTHERauxiliary +*> +*> \ingroup lamc2 *> *> \param[out] BETA *> \verbatim @@ -414,6 +414,7 @@ SUBROUTINE SLAMC1( BETA, T, RND, IEEE1 ) *> The computation of EPS is based on a routine PARANOIA by *> W. Kahan of the University of California at Berkeley. *> \endverbatim +*> SUBROUTINE SLAMC2( BETA, T, RND, EPS, EMIN, RMIN, EMAX, RMAX ) * * -- LAPACK auxiliary routine -- @@ -619,7 +620,6 @@ SUBROUTINE SLAMC2( BETA, T, RND, EPS, EMIN, RMIN, EMAX, RMAX ) END * ************************************************************************ -* *> \brief \b SLAMC3 *> \details *> \b Purpose: @@ -635,7 +635,9 @@ SUBROUTINE SLAMC2( BETA, T, RND, EPS, EMIN, RMIN, EMAX, RMAX ) *> \verbatim *> The values A and B. *> \endverbatim - +*> +*> \ingroup lamc3 +*> REAL FUNCTION SLAMC3( A, B ) * * -- LAPACK auxiliary routine -- @@ -657,7 +659,6 @@ REAL FUNCTION SLAMC3( A, B ) END * ************************************************************************ -* *> \brief \b SLAMC4 *> \details *> \b Purpose: @@ -681,6 +682,8 @@ REAL FUNCTION SLAMC3( A, B ) *> \verbatim *> The base of the machine. *> \endverbatim +*> +*> \ingroup lamc4 *> SUBROUTINE SLAMC4( EMIN, START, BASE ) * @@ -744,7 +747,6 @@ SUBROUTINE SLAMC4( EMIN, START, BASE ) END * ************************************************************************ -* *> \brief \b SLAMC5 *> \details *> \b Purpose: @@ -788,6 +790,8 @@ SUBROUTINE SLAMC4( EMIN, START, BASE ) *> \verbatim *> The largest machine floating-point number. *> \endverbatim +*> +*> \ingroup lamc5 *> SUBROUTINE SLAMC5( BETA, P, EMIN, IEEE, EMAX, RMAX ) * diff --git a/INSTALL/sroundup_lwork.f b/INSTALL/sroundup_lwork.f index 7fe8610f05..64e7f313c4 100644 --- a/INSTALL/sroundup_lwork.f +++ b/INSTALL/sroundup_lwork.f @@ -44,7 +44,7 @@ * *> \author Weslley Pereira, University of Colorado Denver, USA * -*> \ingroup auxOTHERauxiliary +*> \ingroup roundup_lwork * *> \par Further Details: * ===================== diff --git a/SRC/DEPRECATED/cggsvp.f b/SRC/DEPRECATED/cggsvp.f index 0c60077fff..f919a55114 100644 --- a/SRC/DEPRECATED/cggsvp.f +++ b/SRC/DEPRECATED/cggsvp.f @@ -246,7 +246,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ggsvp * *> \par Further Details: * ===================== diff --git a/SRC/DEPRECATED/clahrd.f b/SRC/DEPRECATED/clahrd.f index b209929ab6..a9445f3641 100644 --- a/SRC/DEPRECATED/clahrd.f +++ b/SRC/DEPRECATED/clahrd.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lahrd * *> \par Further Details: * ===================== diff --git a/SRC/DEPRECATED/clatzm.f b/SRC/DEPRECATED/clatzm.f index 8e333cc172..160b58a082 100644 --- a/SRC/DEPRECATED/clatzm.f +++ b/SRC/DEPRECATED/clatzm.f @@ -145,7 +145,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup latzm * * ===================================================================== SUBROUTINE CLATZM( SIDE, M, N, V, INCV, TAU, C1, C2, LDC, WORK ) diff --git a/SRC/DEPRECATED/ctzrqf.f b/SRC/DEPRECATED/ctzrqf.f index ed1f67d247..0f83dd6dc0 100644 --- a/SRC/DEPRECATED/ctzrqf.f +++ b/SRC/DEPRECATED/ctzrqf.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tzrqf * *> \par Further Details: * ===================== diff --git a/SRC/DEPRECATED/dlahrd.f b/SRC/DEPRECATED/dlahrd.f index 24ddf51cc9..59406b7de7 100644 --- a/SRC/DEPRECATED/dlahrd.f +++ b/SRC/DEPRECATED/dlahrd.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lahrd * *> \par Further Details: * ===================== diff --git a/SRC/DEPRECATED/slahrd.f b/SRC/DEPRECATED/slahrd.f index 9e001c740b..e7989b8eb8 100644 --- a/SRC/DEPRECATED/slahrd.f +++ b/SRC/DEPRECATED/slahrd.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lahrd * *> \par Further Details: * ===================== diff --git a/SRC/DEPRECATED/zggsvp.f b/SRC/DEPRECATED/zggsvp.f index 9468bea062..6c37ec1089 100644 --- a/SRC/DEPRECATED/zggsvp.f +++ b/SRC/DEPRECATED/zggsvp.f @@ -246,7 +246,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ggsvp * *> \par Further Details: * ===================== diff --git a/SRC/DEPRECATED/zlahrd.f b/SRC/DEPRECATED/zlahrd.f index 1690bd5b57..6cb3d2a3f3 100644 --- a/SRC/DEPRECATED/zlahrd.f +++ b/SRC/DEPRECATED/zlahrd.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lahrd * *> \par Further Details: * ===================== diff --git a/SRC/DEPRECATED/zlatzm.f b/SRC/DEPRECATED/zlatzm.f index 8b93c5a7b3..c0986e1b8c 100644 --- a/SRC/DEPRECATED/zlatzm.f +++ b/SRC/DEPRECATED/zlatzm.f @@ -145,7 +145,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup latzm * * ===================================================================== SUBROUTINE ZLATZM( SIDE, M, N, V, INCV, TAU, C1, C2, LDC, WORK ) diff --git a/SRC/DEPRECATED/ztzrqf.f b/SRC/DEPRECATED/ztzrqf.f index d3c356dcb9..dcd7cf45bf 100644 --- a/SRC/DEPRECATED/ztzrqf.f +++ b/SRC/DEPRECATED/ztzrqf.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tzrqf * *> \par Further Details: * ===================== diff --git a/SRC/cbbcsd.f b/SRC/cbbcsd.f index 1cd1ffbf16..e67be4ae36 100644 --- a/SRC/cbbcsd.f +++ b/SRC/cbbcsd.f @@ -322,7 +322,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup bbcsd * * ===================================================================== SUBROUTINE CBBCSD( JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, M, P, Q, diff --git a/SRC/cbdsqr.f b/SRC/cbdsqr.f index 40706644ee..4cea14c9a3 100644 --- a/SRC/cbdsqr.f +++ b/SRC/cbdsqr.f @@ -214,7 +214,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup bdsqr * * ===================================================================== SUBROUTINE CBDSQR( UPLO, N, NCVT, NRU, NCC, D, E, VT, LDVT, U, diff --git a/SRC/cgbbrd.f b/SRC/cgbbrd.f index 7bac090e96..7889c090a2 100644 --- a/SRC/cgbbrd.f +++ b/SRC/cgbbrd.f @@ -185,7 +185,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbbrd * * ===================================================================== SUBROUTINE CGBBRD( VECT, M, N, NCC, KL, KU, AB, LDAB, D, E, Q, diff --git a/SRC/cgbcon.f b/SRC/cgbcon.f index 4578424586..8b50fffb10 100644 --- a/SRC/cgbcon.f +++ b/SRC/cgbcon.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbcon * * ===================================================================== SUBROUTINE CGBCON( NORM, N, KL, KU, AB, LDAB, IPIV, ANORM, RCOND, diff --git a/SRC/cgbequ.f b/SRC/cgbequ.f index b52043dee3..ab31116f0a 100644 --- a/SRC/cgbequ.f +++ b/SRC/cgbequ.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbequ * * ===================================================================== SUBROUTINE CGBEQU( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/cgbequb.f b/SRC/cgbequb.f index 788fb378fe..6d8426b28a 100644 --- a/SRC/cgbequb.f +++ b/SRC/cgbequb.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbequb * * ===================================================================== SUBROUTINE CGBEQUB( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/cgbrfs.f b/SRC/cgbrfs.f index 72c70349fa..1a142ed898 100644 --- a/SRC/cgbrfs.f +++ b/SRC/cgbrfs.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbrfs * * ===================================================================== SUBROUTINE CGBRFS( TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, LDAFB, diff --git a/SRC/cgbrfsx.f b/SRC/cgbrfsx.f index 1587d21f6e..ba3f731eda 100644 --- a/SRC/cgbrfsx.f +++ b/SRC/cgbrfsx.f @@ -429,7 +429,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbrfsx * * ===================================================================== SUBROUTINE CGBRFSX( TRANS, EQUED, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/cgbsv.f b/SRC/cgbsv.f index 049d6eeab4..606b6fbe69 100644 --- a/SRC/cgbsv.f +++ b/SRC/cgbsv.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBsolve +*> \ingroup gbsv * *> \par Further Details: * ===================== diff --git a/SRC/cgbsvx.f b/SRC/cgbsvx.f index eaab5682c7..1f480f3162 100644 --- a/SRC/cgbsvx.f +++ b/SRC/cgbsvx.f @@ -361,7 +361,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBsolve +*> \ingroup gbsvx * * ===================================================================== SUBROUTINE CGBSVX( FACT, TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/cgbsvxx.f b/SRC/cgbsvxx.f index 9396fa0112..732dcda8b1 100644 --- a/SRC/cgbsvxx.f +++ b/SRC/cgbsvxx.f @@ -552,7 +552,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBsolve +*> \ingroup gbsvxx * * ===================================================================== SUBROUTINE CGBSVXX( FACT, TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/cgbtf2.f b/SRC/cgbtf2.f index 8c58d6e118..1f22c5c411 100644 --- a/SRC/cgbtf2.f +++ b/SRC/cgbtf2.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbtf2 * *> \par Further Details: * ===================== diff --git a/SRC/cgbtrf.f b/SRC/cgbtrf.f index 8533e0061d..061c90d4a0 100644 --- a/SRC/cgbtrf.f +++ b/SRC/cgbtrf.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbtrf * *> \par Further Details: * ===================== diff --git a/SRC/cgbtrs.f b/SRC/cgbtrs.f index 362e0a4c98..9cd2457c84 100644 --- a/SRC/cgbtrs.f +++ b/SRC/cgbtrs.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup gbtrs * * ===================================================================== SUBROUTINE CGBTRS( TRANS, N, KL, KU, NRHS, AB, LDAB, IPIV, B, LDB, diff --git a/SRC/cgebak.f b/SRC/cgebak.f index 4348d5ea47..c8ab1739ec 100644 --- a/SRC/cgebak.f +++ b/SRC/cgebak.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gebak * * ===================================================================== SUBROUTINE CGEBAK( JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, diff --git a/SRC/cgebal.f b/SRC/cgebal.f index 3f54d39375..bc35090947 100644 --- a/SRC/cgebal.f +++ b/SRC/cgebal.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gebal * *> \par Further Details: * ===================== diff --git a/SRC/cgebd2.f b/SRC/cgebd2.f index db949f90cf..5175d9e845 100644 --- a/SRC/cgebd2.f +++ b/SRC/cgebd2.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gebd2 * @precisions normal c -> s d z * *> \par Further Details: diff --git a/SRC/cgebrd.f b/SRC/cgebrd.f index 5687161a50..ed95bf35d1 100644 --- a/SRC/cgebrd.f +++ b/SRC/cgebrd.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gebrd * *> \par Further Details: * ===================== diff --git a/SRC/cgecon.f b/SRC/cgecon.f index 6f426c2ab6..af3a50c6a1 100644 --- a/SRC/cgecon.f +++ b/SRC/cgecon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gecon * * ===================================================================== SUBROUTINE CGECON( NORM, N, A, LDA, ANORM, RCOND, WORK, RWORK, diff --git a/SRC/cgeequ.f b/SRC/cgeequ.f index 40b022fab3..9b4e19d2bd 100644 --- a/SRC/cgeequ.f +++ b/SRC/cgeequ.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geequ * * ===================================================================== SUBROUTINE CGEEQU( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/cgeequb.f b/SRC/cgeequb.f index 4beffcc849..60ce07d9c7 100644 --- a/SRC/cgeequb.f +++ b/SRC/cgeequb.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geequb * * ===================================================================== SUBROUTINE CGEEQUB( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/cgees.f b/SRC/cgees.f index ad790f0798..13da80c454 100644 --- a/SRC/cgees.f +++ b/SRC/cgees.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEeigen +*> \ingroup gees * * ===================================================================== SUBROUTINE CGEES( JOBVS, SORT, SELECT, N, A, LDA, SDIM, W, VS, diff --git a/SRC/cgeesx.f b/SRC/cgeesx.f index ad5df2023d..c31bf33e4a 100644 --- a/SRC/cgeesx.f +++ b/SRC/cgeesx.f @@ -230,7 +230,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEeigen +*> \ingroup geesx * * ===================================================================== SUBROUTINE CGEESX( JOBVS, SORT, SELECT, SENSE, N, A, LDA, SDIM, W, diff --git a/SRC/cgeev.f b/SRC/cgeev.f index a624e0bfdb..4c453fe85d 100644 --- a/SRC/cgeev.f +++ b/SRC/cgeev.f @@ -172,7 +172,7 @@ * * @generated from zgeev.f, fortran z -> c, Tue Apr 19 01:47:44 2016 * -*> \ingroup complexGEeigen +*> \ingroup geev * * ===================================================================== SUBROUTINE CGEEV( JOBVL, JOBVR, N, A, LDA, W, VL, LDVL, VR, LDVR, diff --git a/SRC/cgeevx.f b/SRC/cgeevx.f index de2adcf2a5..f047b7548e 100644 --- a/SRC/cgeevx.f +++ b/SRC/cgeevx.f @@ -279,7 +279,7 @@ * * @generated from zgeevx.f, fortran z -> c, Tue Apr 19 01:47:44 2016 * -*> \ingroup complexGEeigen +*> \ingroup geevx * * ===================================================================== SUBROUTINE CGEEVX( BALANC, JOBVL, JOBVR, SENSE, N, A, LDA, W, VL, diff --git a/SRC/cgehd2.f b/SRC/cgehd2.f index d8b40b180c..1570bde231 100644 --- a/SRC/cgehd2.f +++ b/SRC/cgehd2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gehd2 * *> \par Further Details: * ===================== diff --git a/SRC/cgehrd.f b/SRC/cgehrd.f index d9c0502675..ab66dd26cf 100644 --- a/SRC/cgehrd.f +++ b/SRC/cgehrd.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gehrd * *> \par Further Details: * ===================== diff --git a/SRC/cgejsv.f b/SRC/cgejsv.f index 1fc75613ed..fd246a88c9 100644 --- a/SRC/cgejsv.f +++ b/SRC/cgejsv.f @@ -484,7 +484,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsing +*> \ingroup gejsv * *> \par Further Details: * ===================== diff --git a/SRC/cgelq.f b/SRC/cgelq.f index d66033166d..0447afca06 100644 --- a/SRC/cgelq.f +++ b/SRC/cgelq.f @@ -166,6 +166,8 @@ *> the LQ factorization. *> \endverbatim *> +*> \ingroup gelq +*> * ===================================================================== SUBROUTINE CGELQ( M, N, A, LDA, T, TSIZE, WORK, LWORK, $ INFO ) diff --git a/SRC/cgelq2.f b/SRC/cgelq2.f index 0ea4a7200f..bf8086cffe 100644 --- a/SRC/cgelq2.f +++ b/SRC/cgelq2.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gelq2 * *> \par Further Details: * ===================== diff --git a/SRC/cgelqf.f b/SRC/cgelqf.f index 37ef13a276..de54afe006 100644 --- a/SRC/cgelqf.f +++ b/SRC/cgelqf.f @@ -118,7 +118,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gelqf * *> \par Further Details: * ===================== diff --git a/SRC/cgelqt.f b/SRC/cgelqt.f index 3a66dc0cab..5f4bb59063 100644 --- a/SRC/cgelqt.f +++ b/SRC/cgelqt.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqt * *> \par Further Details: * ===================== diff --git a/SRC/cgelqt3.f b/SRC/cgelqt3.f index 1dfbd3f2b1..f5a5dc903b 100644 --- a/SRC/cgelqt3.f +++ b/SRC/cgelqt3.f @@ -85,7 +85,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqt3 * *> \par Further Details: * ===================== diff --git a/SRC/cgels.f b/SRC/cgels.f index 1844c96e70..ffbc310756 100644 --- a/SRC/cgels.f +++ b/SRC/cgels.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup gels * * ===================================================================== SUBROUTINE CGELS( TRANS, M, N, NRHS, A, LDA, B, LDB, WORK, LWORK, diff --git a/SRC/cgelsd.f b/SRC/cgelsd.f index 4dd50173a5..c02beccdf0 100644 --- a/SRC/cgelsd.f +++ b/SRC/cgelsd.f @@ -204,7 +204,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup gelsd * *> \par Contributors: * ================== diff --git a/SRC/cgelss.f b/SRC/cgelss.f index 538b901419..c5780cdd88 100644 --- a/SRC/cgelss.f +++ b/SRC/cgelss.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup gelss * * ===================================================================== SUBROUTINE CGELSS( M, N, NRHS, A, LDA, B, LDB, S, RCOND, RANK, diff --git a/SRC/cgelst.f b/SRC/cgelst.f index 3ff62dde9f..ed439ad50d 100644 --- a/SRC/cgelst.f +++ b/SRC/cgelst.f @@ -176,7 +176,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup gelst * *> \par Contributors: * ================== diff --git a/SRC/cgelsy.f b/SRC/cgelsy.f index e06051bf57..94bc7dd8a2 100644 --- a/SRC/cgelsy.f +++ b/SRC/cgelsy.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup gelsy * *> \par Contributors: * ================== diff --git a/SRC/cgemlq.f b/SRC/cgemlq.f index e0cf78bc0f..69c1b72353 100644 --- a/SRC/cgemlq.f +++ b/SRC/cgemlq.f @@ -119,7 +119,7 @@ *> The dimension of the array WORK. *> If LWORK = -1, then a workspace query is assumed. The routine *> only calculates the size of the WORK array, returns this -*> value as WORK(1), and no error message related to WORK +*> value as WORK(1), and no error message related to WORK *> is issued by XERBLA. *> \endverbatim *> @@ -143,7 +143,7 @@ *> *> \verbatim *> -*> These details are particular for this LAPACK implementation. Users should not +*> These details are particular for this LAPACK implementation. Users should not *> take them for granted. These details may change in the future, and are not likely *> true for another LAPACK implementation. These details are relevant if one wants *> to try to understand the code. They are not part of the interface. @@ -159,11 +159,13 @@ *> block sizes MB and NB returned by ILAENV, CGELQ will use either *> CLASWLQ (if the matrix is wide-and-short) or CGELQT to compute *> the LQ factorization. -*> This version of CGEMLQ will use either CLAMSWLQ or CGEMLQT to +*> This version of CGEMLQ will use either CLAMSWLQ or CGEMLQT to *> multiply matrix Q by another matrix. *> Further Details in CLAMSWLQ or CGEMLQT. *> \endverbatim *> +*> \ingroup gemlq +*> * ===================================================================== SUBROUTINE CGEMLQ( SIDE, TRANS, M, N, K, A, LDA, T, TSIZE, $ C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/cgemlqt.f b/SRC/cgemlqt.f index a4710f1158..5e43f0b600 100644 --- a/SRC/cgemlqt.f +++ b/SRC/cgemlqt.f @@ -145,7 +145,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gemlqt * * ===================================================================== SUBROUTINE CGEMLQT( SIDE, TRANS, M, N, K, MB, V, LDV, T, LDT, diff --git a/SRC/cgemqr.f b/SRC/cgemqr.f index ea9de146e5..94011d835a 100644 --- a/SRC/cgemqr.f +++ b/SRC/cgemqr.f @@ -120,7 +120,7 @@ *> The dimension of the array WORK. *> If LWORK = -1, then a workspace query is assumed. The routine *> only calculates the size of the WORK array, returns this -*> value as WORK(1), and no error message related to WORK +*> value as WORK(1), and no error message related to WORK *> is issued by XERBLA. *> \endverbatim *> @@ -144,7 +144,7 @@ *> *> \verbatim *> -*> These details are particular for this LAPACK implementation. Users should not +*> These details are particular for this LAPACK implementation. Users should not *> take them for granted. These details may change in the future, and are not likely *> true for another LAPACK implementation. These details are relevant if one wants *> to try to understand the code. They are not part of the interface. @@ -166,6 +166,8 @@ *> *> \endverbatim *> +*> \ingroup gemqr +*> * ===================================================================== SUBROUTINE CGEMQR( SIDE, TRANS, M, N, K, A, LDA, T, TSIZE, $ C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/cgemqrt.f b/SRC/cgemqrt.f index 36fa333aa5..bf7d99632a 100644 --- a/SRC/cgemqrt.f +++ b/SRC/cgemqrt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gemqrt * * ===================================================================== SUBROUTINE CGEMQRT( SIDE, TRANS, M, N, K, NB, V, LDV, T, LDT, diff --git a/SRC/cgeql2.f b/SRC/cgeql2.f index 41a5f9e049..c55c6d76ad 100644 --- a/SRC/cgeql2.f +++ b/SRC/cgeql2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geql2 * *> \par Further Details: * ===================== diff --git a/SRC/cgeqlf.f b/SRC/cgeqlf.f index d2c11c2697..87d14297b9 100644 --- a/SRC/cgeqlf.f +++ b/SRC/cgeqlf.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqlf * *> \par Further Details: * ===================== diff --git a/SRC/cgeqp3.f b/SRC/cgeqp3.f index 402cf21f2d..00e03270e2 100644 --- a/SRC/cgeqp3.f +++ b/SRC/cgeqp3.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqp3 * *> \par Further Details: * ===================== diff --git a/SRC/cgeqr.f b/SRC/cgeqr.f index d10e3da65f..51a7389213 100644 --- a/SRC/cgeqr.f +++ b/SRC/cgeqr.f @@ -168,6 +168,8 @@ *> *> \endverbatim *> +*> \ingroup geqr +*> * ===================================================================== SUBROUTINE CGEQR( M, N, A, LDA, T, TSIZE, WORK, LWORK, $ INFO ) diff --git a/SRC/cgeqr2.f b/SRC/cgeqr2.f index b0b346b2db..29dddb2085 100644 --- a/SRC/cgeqr2.f +++ b/SRC/cgeqr2.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqr2 * *> \par Further Details: * ===================== diff --git a/SRC/cgeqr2p.f b/SRC/cgeqr2p.f index 7be7e7a1c9..fb5012b49a 100644 --- a/SRC/cgeqr2p.f +++ b/SRC/cgeqr2p.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqr2p * *> \par Further Details: * ===================== diff --git a/SRC/cgeqrf.f b/SRC/cgeqrf.f index d71bd5b33b..20ff864761 100644 --- a/SRC/cgeqrf.f +++ b/SRC/cgeqrf.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqrf * *> \par Further Details: * ===================== diff --git a/SRC/cgeqrfp.f b/SRC/cgeqrfp.f index 995404f43e..68a5812014 100644 --- a/SRC/cgeqrfp.f +++ b/SRC/cgeqrfp.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqrfp * *> \par Further Details: * ===================== diff --git a/SRC/cgeqrt.f b/SRC/cgeqrt.f index c5eeddf7da..4fc22bf810 100644 --- a/SRC/cgeqrt.f +++ b/SRC/cgeqrt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqrt * *> \par Further Details: * ===================== diff --git a/SRC/cgeqrt2.f b/SRC/cgeqrt2.f index 11221636de..dc7c2045b0 100644 --- a/SRC/cgeqrt2.f +++ b/SRC/cgeqrt2.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqrt2 * *> \par Further Details: * ===================== diff --git a/SRC/cgeqrt3.f b/SRC/cgeqrt3.f index f62aee4b50..f3bb4ab67e 100644 --- a/SRC/cgeqrt3.f +++ b/SRC/cgeqrt3.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup geqrt3 * *> \par Further Details: * ===================== diff --git a/SRC/cgerfs.f b/SRC/cgerfs.f index 6026c4bee9..53b9031944 100644 --- a/SRC/cgerfs.f +++ b/SRC/cgerfs.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gerfs * * ===================================================================== SUBROUTINE CGERFS( TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/cgerfsx.f b/SRC/cgerfsx.f index d6682654fa..dfbfc96753 100644 --- a/SRC/cgerfsx.f +++ b/SRC/cgerfsx.f @@ -404,7 +404,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gerfsx * * ===================================================================== SUBROUTINE CGERFSX( TRANS, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/cgerq2.f b/SRC/cgerq2.f index a2cf5cf696..ac1217118d 100644 --- a/SRC/cgerq2.f +++ b/SRC/cgerq2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gerq2 * *> \par Further Details: * ===================== diff --git a/SRC/cgerqf.f b/SRC/cgerqf.f index d2247844ce..aeaf6df912 100644 --- a/SRC/cgerqf.f +++ b/SRC/cgerqf.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gerqf * *> \par Further Details: * ===================== diff --git a/SRC/cgesc2.f b/SRC/cgesc2.f index ade536c5d2..677a0ac408 100644 --- a/SRC/cgesc2.f +++ b/SRC/cgesc2.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEauxiliary +*> \ingroup gesc2 * *> \par Contributors: * ================== diff --git a/SRC/cgesdd.f b/SRC/cgesdd.f index 9adc254e00..42a90f0705 100644 --- a/SRC/cgesdd.f +++ b/SRC/cgesdd.f @@ -207,7 +207,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsing +*> \ingroup gesdd * *> \par Contributors: * ================== diff --git a/SRC/cgesv.f b/SRC/cgesv.f index d18ed03758..ef4ef6631f 100644 --- a/SRC/cgesv.f +++ b/SRC/cgesv.f @@ -1,3 +1,5 @@ +*> \addtogroup gesv +*> *> \brief CGESV computes the solution to system of linear equations A * X = B for GE matrices (simple driver) * * =========== DOCUMENTATION =========== @@ -115,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup gesv * * ===================================================================== SUBROUTINE CGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/cgesvd.f b/SRC/cgesvd.f index 239b134315..e63ccaa545 100644 --- a/SRC/cgesvd.f +++ b/SRC/cgesvd.f @@ -206,7 +206,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsing +*> \ingroup gesvd * * ===================================================================== SUBROUTINE CGESVD( JOBU, JOBVT, M, N, A, LDA, S, U, LDU, VT, LDVT, diff --git a/SRC/cgesvdq.f b/SRC/cgesvdq.f index 95091c2c07..e035826a62 100644 --- a/SRC/cgesvdq.f +++ b/SRC/cgesvdq.f @@ -404,7 +404,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsing +*> \ingroup gesvdq * * ===================================================================== SUBROUTINE CGESVDQ( JOBA, JOBP, JOBR, JOBU, JOBV, M, N, A, LDA, diff --git a/SRC/cgesvdx.f b/SRC/cgesvdx.f index fbdb121ca7..31e6fe64c4 100644 --- a/SRC/cgesvdx.f +++ b/SRC/cgesvdx.f @@ -261,7 +261,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsing +*> \ingroup gesvdx * * ===================================================================== SUBROUTINE CGESVDX( JOBU, JOBVT, RANGE, M, N, A, LDA, VL, VU, diff --git a/SRC/cgesvj.f b/SRC/cgesvj.f index 149cf5e484..fdec6d39ed 100644 --- a/SRC/cgesvj.f +++ b/SRC/cgesvj.f @@ -276,7 +276,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup gesvj * *> \par Further Details: * ===================== diff --git a/SRC/cgesvx.f b/SRC/cgesvx.f index 74a37e9a0e..bfdb4d8e80 100644 --- a/SRC/cgesvx.f +++ b/SRC/cgesvx.f @@ -341,7 +341,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup gesvx * * ===================================================================== SUBROUTINE CGESVX( FACT, TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/cgesvxx.f b/SRC/cgesvxx.f index e50f1b56f4..767646fcc7 100644 --- a/SRC/cgesvxx.f +++ b/SRC/cgesvxx.f @@ -532,7 +532,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup gesvxx * * ===================================================================== SUBROUTINE CGESVXX( FACT, TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/cgetc2.f b/SRC/cgetc2.f index 1fd40c7f9c..c452aa0670 100644 --- a/SRC/cgetc2.f +++ b/SRC/cgetc2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEauxiliary +*> \ingroup getc2 * *> \par Contributors: * ================== diff --git a/SRC/cgetf2.f b/SRC/cgetf2.f index aac9899702..1f4ebae595 100644 --- a/SRC/cgetf2.f +++ b/SRC/cgetf2.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup getf2 * * ===================================================================== SUBROUTINE CGETF2( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/cgetrf.f b/SRC/cgetrf.f index d08e0bb9a5..706106b095 100644 --- a/SRC/cgetrf.f +++ b/SRC/cgetrf.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup getrf * * ===================================================================== SUBROUTINE CGETRF( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/cgetrf2.f b/SRC/cgetrf2.f index 796dd50054..8622918d3a 100644 --- a/SRC/cgetrf2.f +++ b/SRC/cgetrf2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup getrf2 * * ===================================================================== RECURSIVE SUBROUTINE CGETRF2( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/cgetri.f b/SRC/cgetri.f index bd7fc286c8..5f38370bdf 100644 --- a/SRC/cgetri.f +++ b/SRC/cgetri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup getri * * ===================================================================== SUBROUTINE CGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/cgetrs.f b/SRC/cgetrs.f index 187b1a686c..07b086be50 100644 --- a/SRC/cgetrs.f +++ b/SRC/cgetrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup getrs * * ===================================================================== SUBROUTINE CGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/cgetsls.f b/SRC/cgetsls.f index 8429896e13..cca39a98d8 100644 --- a/SRC/cgetsls.f +++ b/SRC/cgetsls.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsolve +*> \ingroup getsls * * ===================================================================== SUBROUTINE CGETSLS( TRANS, M, N, NRHS, A, LDA, B, LDB, diff --git a/SRC/cgetsqrhrt.f b/SRC/cgetsqrhrt.f index 4e4dc1d4ad..2600500e0c 100644 --- a/SRC/cgetsqrhrt.f +++ b/SRC/cgetsqrhrt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup comlpexOTHERcomputational +*> \ingroup getsqrhrt * *> \par Contributors: * ================== diff --git a/SRC/cggbak.f b/SRC/cggbak.f index 1594496017..670d6146f1 100644 --- a/SRC/cggbak.f +++ b/SRC/cggbak.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup ggbak * *> \par Further Details: * ===================== diff --git a/SRC/cggbal.f b/SRC/cggbal.f index 66ba7a8818..ec1ee44bba 100644 --- a/SRC/cggbal.f +++ b/SRC/cggbal.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup ggbal * *> \par Further Details: * ===================== diff --git a/SRC/cgges.f b/SRC/cgges.f index b798ce6820..c7ba83f417 100644 --- a/SRC/cgges.f +++ b/SRC/cgges.f @@ -261,7 +261,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEeigen +*> \ingroup gges * * ===================================================================== SUBROUTINE CGGES( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B, LDB, diff --git a/SRC/cgges3.f b/SRC/cgges3.f index 7fdb9b0af8..ea4cc5196c 100644 --- a/SRC/cgges3.f +++ b/SRC/cgges3.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEeigen +*> \ingroup gges3 * * ===================================================================== SUBROUTINE CGGES3( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B, diff --git a/SRC/cggesx.f b/SRC/cggesx.f index 3f8740062f..076410a5c8 100644 --- a/SRC/cggesx.f +++ b/SRC/cggesx.f @@ -320,7 +320,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEeigen +*> \ingroup ggesx * * ===================================================================== SUBROUTINE CGGESX( JOBVSL, JOBVSR, SORT, SELCTG, SENSE, N, A, LDA, diff --git a/SRC/cggev.f b/SRC/cggev.f index 1b47e1e796..f76d012b2e 100644 --- a/SRC/cggev.f +++ b/SRC/cggev.f @@ -209,7 +209,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEeigen +*> \ingroup ggev * * ===================================================================== SUBROUTINE CGGEV( JOBVL, JOBVR, N, A, LDA, B, LDB, ALPHA, BETA, diff --git a/SRC/cggev3.f b/SRC/cggev3.f index 103c9f50ac..350543c085 100644 --- a/SRC/cggev3.f +++ b/SRC/cggev3.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEeigen +*> \ingroup ggev3 * * ===================================================================== SUBROUTINE CGGEV3( JOBVL, JOBVR, N, A, LDA, B, LDB, ALPHA, BETA, diff --git a/SRC/cggevx.f b/SRC/cggevx.f index f74b9c0be8..fb76bb93c7 100644 --- a/SRC/cggevx.f +++ b/SRC/cggevx.f @@ -335,7 +335,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEeigen +*> \ingroup ggevx * *> \par Further Details: * ===================== diff --git a/SRC/cggglm.f b/SRC/cggglm.f index fb384b6518..f93ac89727 100644 --- a/SRC/cggglm.f +++ b/SRC/cggglm.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup ggglm * * ===================================================================== SUBROUTINE CGGGLM( N, M, P, A, LDA, B, LDB, D, X, Y, WORK, LWORK, diff --git a/SRC/cgghd3.f b/SRC/cgghd3.f index 1074b4828e..47e70e3a34 100644 --- a/SRC/cgghd3.f +++ b/SRC/cgghd3.f @@ -212,7 +212,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup gghd3 * *> \par Further Details: * ===================== diff --git a/SRC/cgghrd.f b/SRC/cgghrd.f index bf96a31381..10564f6eef 100644 --- a/SRC/cgghrd.f +++ b/SRC/cgghrd.f @@ -186,7 +186,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup gghrd * *> \par Further Details: * ===================== diff --git a/SRC/cgglse.f b/SRC/cgglse.f index cca20dfed9..1b4a8770b6 100644 --- a/SRC/cgglse.f +++ b/SRC/cgglse.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup gglse * * ===================================================================== SUBROUTINE CGGLSE( M, N, P, A, LDA, B, LDB, C, D, X, WORK, LWORK, diff --git a/SRC/cggqrf.f b/SRC/cggqrf.f index 0185f4e0d9..1a7aea6f0c 100644 --- a/SRC/cggqrf.f +++ b/SRC/cggqrf.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ggqrf * *> \par Further Details: * ===================== diff --git a/SRC/cggrqf.f b/SRC/cggrqf.f index 5227100dad..d732a3eeb1 100644 --- a/SRC/cggrqf.f +++ b/SRC/cggrqf.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ggrqf * *> \par Further Details: * ===================== diff --git a/SRC/cggsvd3.f b/SRC/cggsvd3.f index f248aebd52..8297cdf629 100644 --- a/SRC/cggsvd3.f +++ b/SRC/cggsvd3.f @@ -333,7 +333,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEsing +*> \ingroup ggsvd3 * *> \par Contributors: * ================== diff --git a/SRC/cggsvp3.f b/SRC/cggsvp3.f index 008a053a20..82a8222613 100644 --- a/SRC/cggsvp3.f +++ b/SRC/cggsvp3.f @@ -256,7 +256,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ggsvp3 * *> \par Further Details: * ===================== diff --git a/SRC/cgsvj0.f b/SRC/cgsvj0.f index 7426ecdf14..823c4428fd 100644 --- a/SRC/cgsvj0.f +++ b/SRC/cgsvj0.f @@ -193,7 +193,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup gsvj0 * *> \par Further Details: * ===================== diff --git a/SRC/cgsvj1.f b/SRC/cgsvj1.f index 18dd690ccc..4a734a745a 100644 --- a/SRC/cgsvj1.f +++ b/SRC/cgsvj1.f @@ -223,7 +223,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup gsvj1 * *> \par Contributor: * ================== diff --git a/SRC/cgtcon.f b/SRC/cgtcon.f index b21a19594a..517ed48f36 100644 --- a/SRC/cgtcon.f +++ b/SRC/cgtcon.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGTcomputational +*> \ingroup gtcon * * ===================================================================== SUBROUTINE CGTCON( NORM, N, DL, D, DU, DU2, IPIV, ANORM, RCOND, diff --git a/SRC/cgtrfs.f b/SRC/cgtrfs.f index 9b76220e84..3904472a2f 100644 --- a/SRC/cgtrfs.f +++ b/SRC/cgtrfs.f @@ -201,7 +201,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGTcomputational +*> \ingroup gtrfs * * ===================================================================== SUBROUTINE CGTRFS( TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, DU2, diff --git a/SRC/cgtsv.f b/SRC/cgtsv.f index a9be1b70d5..5b4d651a83 100644 --- a/SRC/cgtsv.f +++ b/SRC/cgtsv.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGTsolve +*> \ingroup gtsv * * ===================================================================== SUBROUTINE CGTSV( N, NRHS, DL, D, DU, B, LDB, INFO ) diff --git a/SRC/cgtsvx.f b/SRC/cgtsvx.f index 266e52b99b..382948a31c 100644 --- a/SRC/cgtsvx.f +++ b/SRC/cgtsvx.f @@ -285,7 +285,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGTsolve +*> \ingroup gtsvx * * ===================================================================== SUBROUTINE CGTSVX( FACT, TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, diff --git a/SRC/cgttrf.f b/SRC/cgttrf.f index 35d0997daf..c825fa3f6a 100644 --- a/SRC/cgttrf.f +++ b/SRC/cgttrf.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGTcomputational +*> \ingroup gttrf * * ===================================================================== SUBROUTINE CGTTRF( N, DL, D, DU, DU2, IPIV, INFO ) diff --git a/SRC/cgttrs.f b/SRC/cgttrs.f index a37ad738e8..1ea51846f9 100644 --- a/SRC/cgttrs.f +++ b/SRC/cgttrs.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGTcomputational +*> \ingroup gttrs * * ===================================================================== SUBROUTINE CGTTRS( TRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB, diff --git a/SRC/cgtts2.f b/SRC/cgtts2.f index 60b5af0985..3c754891e2 100644 --- a/SRC/cgtts2.f +++ b/SRC/cgtts2.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGTcomputational +*> \ingroup gtts2 * * ===================================================================== SUBROUTINE CGTTS2( ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB ) diff --git a/SRC/chb2st_kernels.f b/SRC/chb2st_kernels.f index ea25b76e1d..f23ad2d9de 100644 --- a/SRC/chb2st_kernels.f +++ b/SRC/chb2st_kernels.f @@ -163,6 +163,8 @@ *> *> \endverbatim *> +*> \ingroup hb2st_kernels +*> * ===================================================================== SUBROUTINE CHB2ST_KERNELS( UPLO, WANTZ, TTYPE, $ ST, ED, SWEEP, N, NB, IB, diff --git a/SRC/chbev.f b/SRC/chbev.f index 6f82cc46ba..21fc8dc5dc 100644 --- a/SRC/chbev.f +++ b/SRC/chbev.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbev * * ===================================================================== SUBROUTINE CHBEV( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, WORK, diff --git a/SRC/chbev_2stage.f b/SRC/chbev_2stage.f index 123d84729a..0018854098 100644 --- a/SRC/chbev_2stage.f +++ b/SRC/chbev_2stage.f @@ -132,7 +132,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbev_2stage * *> \par Further Details: * ===================== @@ -189,7 +189,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -197,11 +197,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -351,7 +351,7 @@ SUBROUTINE CHBEV_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, LLWORK = LWORK - INDWRK + 1 * CALL CHETRD_HB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, W, - $ RWORK( INDE ), WORK( INDHOUS ), LHTRD, + $ RWORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call SSTERF. For eigenvectors, call CSTEQR. diff --git a/SRC/chbevd.f b/SRC/chbevd.f index de33c9039c..ace4e0d2d4 100644 --- a/SRC/chbevd.f +++ b/SRC/chbevd.f @@ -201,7 +201,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbevd * * ===================================================================== SUBROUTINE CHBEVD( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, WORK, diff --git a/SRC/chbevd_2stage.f b/SRC/chbevd_2stage.f index 3c9c8ecc02..5d725dfdbe 100644 --- a/SRC/chbevd_2stage.f +++ b/SRC/chbevd_2stage.f @@ -21,7 +21,7 @@ * =========== * * SUBROUTINE CHBEVD_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, -* WORK, LWORK, RWORK, LRWORK, IWORK, +* WORK, LWORK, RWORK, LRWORK, IWORK, * LIWORK, INFO ) * * IMPLICIT NONE @@ -136,7 +136,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS @@ -213,7 +213,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbevd_2stage * *> \par Further Details: * ===================== @@ -231,7 +231,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -239,17 +239,17 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * * ===================================================================== SUBROUTINE CHBEVD_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, - $ WORK, LWORK, RWORK, LRWORK, IWORK, + $ WORK, LWORK, RWORK, LRWORK, IWORK, $ LIWORK, INFO ) * IMPLICIT NONE @@ -412,7 +412,7 @@ SUBROUTINE CHBEVD_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, LLWK2 = LWORK - INDWK2 + 1 * CALL CHETRD_HB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, W, - $ RWORK( INDE ), WORK( INDHOUS ), LHTRD, + $ RWORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWK ), LLWORK, IINFO ) * * For eigenvalues only, call SSTERF. For eigenvectors, call CSTEDC. diff --git a/SRC/chbevx.f b/SRC/chbevx.f index 6b5f549a7f..c9063023ff 100644 --- a/SRC/chbevx.f +++ b/SRC/chbevx.f @@ -258,7 +258,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbevx * * ===================================================================== SUBROUTINE CHBEVX( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, Q, LDQ, VL, diff --git a/SRC/chbevx_2stage.f b/SRC/chbevx_2stage.f index 22bced45f3..d9bc014445 100644 --- a/SRC/chbevx_2stage.f +++ b/SRC/chbevx_2stage.f @@ -22,7 +22,7 @@ * * SUBROUTINE CHBEVX_2STAGE( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, * Q, LDQ, VL, VU, IL, IU, ABSTOL, M, W, -* Z, LDZ, WORK, LWORK, RWORK, IWORK, +* Z, LDZ, WORK, LWORK, RWORK, IWORK, * IFAIL, INFO ) * * IMPLICIT NONE @@ -233,7 +233,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS @@ -285,7 +285,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbevx_2stage * *> \par Further Details: * ===================== @@ -303,7 +303,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -311,18 +311,18 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * * ===================================================================== SUBROUTINE CHBEVX_2STAGE( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, $ Q, LDQ, VL, VU, IL, IU, ABSTOL, M, W, - $ Z, LDZ, WORK, LWORK, RWORK, IWORK, + $ Z, LDZ, WORK, LWORK, RWORK, IWORK, $ IFAIL, INFO ) * IMPLICIT NONE @@ -428,9 +428,9 @@ SUBROUTINE CHBEVX_2STAGE( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, ELSE IB = ILAENV2STAGE( 2, 'CHETRD_HB2ST', JOBZ, $ N, KD, -1, -1 ) - LHTRD = ILAENV2STAGE( 3, 'CHETRD_HB2ST', JOBZ, + LHTRD = ILAENV2STAGE( 3, 'CHETRD_HB2ST', JOBZ, $ N, KD, IB, -1 ) - LWTRD = ILAENV2STAGE( 4, 'CHETRD_HB2ST', JOBZ, + LWTRD = ILAENV2STAGE( 4, 'CHETRD_HB2ST', JOBZ, $ N, KD, IB, -1 ) LWMIN = LHTRD + LWTRD WORK( 1 ) = LWMIN diff --git a/SRC/chbgst.f b/SRC/chbgst.f index 53a25a27f8..f7b14cc861 100644 --- a/SRC/chbgst.f +++ b/SRC/chbgst.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hbgst * * ===================================================================== SUBROUTINE CHBGST( VECT, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, X, diff --git a/SRC/chbgv.f b/SRC/chbgv.f index 3f84ff5d96..23426df09b 100644 --- a/SRC/chbgv.f +++ b/SRC/chbgv.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbgv * * ===================================================================== SUBROUTINE CHBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z, diff --git a/SRC/chbgvd.f b/SRC/chbgvd.f index 6550063708..d316fa238e 100644 --- a/SRC/chbgvd.f +++ b/SRC/chbgvd.f @@ -232,7 +232,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbgvd * *> \par Contributors: * ================== diff --git a/SRC/chbgvx.f b/SRC/chbgvx.f index 6b37a4127a..3e11ae3fe0 100644 --- a/SRC/chbgvx.f +++ b/SRC/chbgvx.f @@ -286,7 +286,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hbgvx * *> \par Contributors: * ================== diff --git a/SRC/chbtrd.f b/SRC/chbtrd.f index d05ce42f77..9c03c779b5 100644 --- a/SRC/chbtrd.f +++ b/SRC/chbtrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hbtrd * *> \par Further Details: * ===================== diff --git a/SRC/checon.f b/SRC/checon.f index 94c81bd42b..7cc6ab0187 100644 --- a/SRC/checon.f +++ b/SRC/checon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hecon * * ===================================================================== SUBROUTINE CHECON( UPLO, N, A, LDA, IPIV, ANORM, RCOND, WORK, diff --git a/SRC/checon_3.f b/SRC/checon_3.f index 2bbf879349..2bf524c077 100644 --- a/SRC/checon_3.f +++ b/SRC/checon_3.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hecon_3 * *> \par Contributors: * ================== diff --git a/SRC/checon_rook.f b/SRC/checon_rook.f index 5c203d8d80..3fdf789f9b 100644 --- a/SRC/checon_rook.f +++ b/SRC/checon_rook.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hecon_rook * *> \par Contributors: * ================== diff --git a/SRC/cheequb.f b/SRC/cheequb.f index 3ea7a1627a..1adfd7fac4 100644 --- a/SRC/cheequb.f +++ b/SRC/cheequb.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup heequb * *> \par References: * ================ diff --git a/SRC/cheev.f b/SRC/cheev.f index fb8e451df8..5ec5ca3403 100644 --- a/SRC/cheev.f +++ b/SRC/cheev.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup heev * * ===================================================================== SUBROUTINE CHEEV( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, RWORK, diff --git a/SRC/cheev_2stage.f b/SRC/cheev_2stage.f index fb7989d9f8..3612e78a1b 100644 --- a/SRC/cheev_2stage.f +++ b/SRC/cheev_2stage.f @@ -106,12 +106,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup heev_2stage * *> \par Further Details: * ===================== @@ -167,7 +167,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -175,11 +175,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -314,7 +314,7 @@ SUBROUTINE CHEEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, LLWORK = LWORK - INDWRK + 1 * CALL CHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, W, RWORK( INDE ), - $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, + $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call SSTERF. For eigenvectors, first call diff --git a/SRC/cheevd.f b/SRC/cheevd.f index dce0b20834..2c79d3af0f 100644 --- a/SRC/cheevd.f +++ b/SRC/cheevd.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup heevd * *> \par Further Details: * ===================== diff --git a/SRC/cheevd_2stage.f b/SRC/cheevd_2stage.f index a0e8843aee..7fd6950e93 100644 --- a/SRC/cheevd_2stage.f +++ b/SRC/cheevd_2stage.f @@ -113,8 +113,8 @@ *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N+1 -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N+1 *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -196,7 +196,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup heevd_2stage * *> \par Further Details: * ===================== @@ -225,7 +225,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -233,11 +233,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -404,7 +404,7 @@ SUBROUTINE CHEEVD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, LLWRK2 = LWORK - INDWK2 + 1 * CALL CHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, W, RWORK( INDE ), - $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, + $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call SSTERF. For eigenvectors, first call diff --git a/SRC/cheevr.f b/SRC/cheevr.f index b8854b1829..74933e753b 100644 --- a/SRC/cheevr.f +++ b/SRC/cheevr.f @@ -338,7 +338,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup heevr * *> \par Contributors: * ================== diff --git a/SRC/cheevr_2stage.f b/SRC/cheevr_2stage.f index 0332a09bcd..f8b1ee1071 100644 --- a/SRC/cheevr_2stage.f +++ b/SRC/cheevr_2stage.f @@ -265,7 +265,7 @@ *> indicating the nonzero elements in Z. The i-th eigenvector *> is nonzero only in elements ISUPPZ( 2*i-1 ) through *> ISUPPZ( 2*i ). This is an output of CSTEMR (tridiagonal -*> matrix). The support of the eigenvectors of A is typically +*> matrix). The support of the eigenvectors of A is typically *> 1:N because of the unitary transformations applied by CUNMTR. *> Implemented only for RANGE = 'A' or 'I' and IU - IL = N - 1 *> \endverbatim @@ -279,12 +279,12 @@ *> \param[in] LWORK *> \verbatim *> LWORK is INTEGER -*> The dimension of the array WORK. +*> The dimension of the array WORK. *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 26*N, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -354,7 +354,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup heevr_2stage * *> \par Contributors: * ================== @@ -382,7 +382,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -390,11 +390,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -643,9 +643,9 @@ SUBROUTINE CHEEVR_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, * * Call CHETRD_2STAGE to reduce Hermitian matrix to tridiagonal form. * - CALL CHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, RWORK( INDRD ), + CALL CHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, RWORK( INDRD ), $ RWORK( INDRE ), WORK( INDTAU ), - $ WORK( INDHOUS ), LHTRD, + $ WORK( INDHOUS ), LHTRD, $ WORK( INDWK ), LLWORK, IINFO ) * * If all eigenvalues are desired diff --git a/SRC/cheevx.f b/SRC/cheevx.f index 1cec902aa3..3cdc65ae7b 100644 --- a/SRC/cheevx.f +++ b/SRC/cheevx.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup heevx * * ===================================================================== SUBROUTINE CHEEVX( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, IL, IU, diff --git a/SRC/cheevx_2stage.f b/SRC/cheevx_2stage.f index 04f6e30e8a..e0870f46ac 100644 --- a/SRC/cheevx_2stage.f +++ b/SRC/cheevx_2stage.f @@ -209,12 +209,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 8*N, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -265,7 +265,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup heevx_2stage * *> \par Further Details: * ===================== @@ -283,7 +283,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -291,11 +291,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -335,7 +335,7 @@ SUBROUTINE CHEEVX_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, CHARACTER ORDER INTEGER I, IINFO, IMAX, INDD, INDE, INDEE, INDIBL, $ INDISP, INDIWK, INDRWK, INDTAU, INDWRK, ISCALE, - $ ITMP1, J, JJ, LLWORK, + $ ITMP1, J, JJ, LLWORK, $ NSPLIT, LWMIN, LHTRD, LWTRD, KD, IB, INDHOUS REAL ABSTLL, ANRM, BIGNUM, EPS, RMAX, RMIN, SAFMIN, $ SIGMA, SMLNUM, TMP1, VLL, VUU @@ -499,7 +499,7 @@ SUBROUTINE CHEEVX_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, LLWORK = LWORK - INDWRK + 1 * CALL CHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, RWORK( INDD ), - $ RWORK( INDE ), WORK( INDTAU ), + $ RWORK( INDE ), WORK( INDTAU ), $ WORK( INDHOUS ), LHTRD, WORK( INDWRK ), $ LLWORK, IINFO ) * diff --git a/SRC/chegs2.f b/SRC/chegs2.f index 0a949b4935..18d2db6351 100644 --- a/SRC/chegs2.f +++ b/SRC/chegs2.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hegs2 * * ===================================================================== SUBROUTINE CHEGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) diff --git a/SRC/chegst.f b/SRC/chegst.f index 129619fdb3..7d13e43d9d 100644 --- a/SRC/chegst.f +++ b/SRC/chegst.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hegst * * ===================================================================== SUBROUTINE CHEGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) diff --git a/SRC/chegv.f b/SRC/chegv.f index 198e5d1025..532b923010 100644 --- a/SRC/chegv.f +++ b/SRC/chegv.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup hegv * * ===================================================================== SUBROUTINE CHEGV( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, WORK, diff --git a/SRC/chegv_2stage.f b/SRC/chegv_2stage.f index d2b8fc795a..fc885e34d0 100644 --- a/SRC/chegv_2stage.f +++ b/SRC/chegv_2stage.f @@ -144,12 +144,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup hegv_2stage * *> \par Further Details: * ===================== @@ -210,7 +210,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -218,11 +218,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -327,7 +327,7 @@ SUBROUTINE CHEGV_2STAGE( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, * Transform problem to standard eigenvalue problem and solve. * CALL CHEGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) - CALL CHEEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, + CALL CHEEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, $ WORK, LWORK, RWORK, INFO ) * IF( WANTZ ) THEN diff --git a/SRC/chegvd.f b/SRC/chegvd.f index 4edc36f2ad..dab3460455 100644 --- a/SRC/chegvd.f +++ b/SRC/chegvd.f @@ -219,7 +219,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup hegvd * *> \par Further Details: * ===================== diff --git a/SRC/chegvx.f b/SRC/chegvx.f index 8e565222d6..6acb9ae390 100644 --- a/SRC/chegvx.f +++ b/SRC/chegvx.f @@ -293,7 +293,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEeigen +*> \ingroup hegvx * *> \par Contributors: * ================== diff --git a/SRC/cherfs.f b/SRC/cherfs.f index 704431ab59..9ca42393f1 100644 --- a/SRC/cherfs.f +++ b/SRC/cherfs.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup herfs * * ===================================================================== SUBROUTINE CHERFS( UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/cherfsx.f b/SRC/cherfsx.f index 3b533c3b54..81a88ddea7 100644 --- a/SRC/cherfsx.f +++ b/SRC/cherfsx.f @@ -391,7 +391,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup herfsx * * ===================================================================== SUBROUTINE CHERFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/chesv.f b/SRC/chesv.f index 238fb0a944..11bd7cf1fa 100644 --- a/SRC/chesv.f +++ b/SRC/chesv.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEsolve +*> \ingroup hesv * * ===================================================================== SUBROUTINE CHESV( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/chesv_aa.f b/SRC/chesv_aa.f index c9b97e09cb..1caddeab7b 100644 --- a/SRC/chesv_aa.f +++ b/SRC/chesv_aa.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEsolve +*> \ingroup hesv_aa * * ===================================================================== SUBROUTINE CHESV_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/chesv_aa_2stage.f b/SRC/chesv_aa_2stage.f index 36970a329d..790addc538 100644 --- a/SRC/chesv_aa_2stage.f +++ b/SRC/chesv_aa_2stage.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hesv_aa_2stage * * ===================================================================== SUBROUTINE CHESV_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/chesv_rk.f b/SRC/chesv_rk.f index e123fa2990..9db22b857e 100644 --- a/SRC/chesv_rk.f +++ b/SRC/chesv_rk.f @@ -205,7 +205,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEsolve +*> \ingroup hesv_rk * *> \par Contributors: * ================== diff --git a/SRC/chesv_rook.f b/SRC/chesv_rook.f index 8e0b1a88f4..ac9fef0db1 100644 --- a/SRC/chesv_rook.f +++ b/SRC/chesv_rook.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEsolve +*> \ingroup hesv_rook *> *> \verbatim *> diff --git a/SRC/chesvx.f b/SRC/chesvx.f index 6da49bdcf9..478590bf96 100644 --- a/SRC/chesvx.f +++ b/SRC/chesvx.f @@ -276,7 +276,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEsolve +*> \ingroup hesvx * * ===================================================================== SUBROUTINE CHESVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, diff --git a/SRC/chesvxx.f b/SRC/chesvxx.f index 2c022874a1..011987cf0f 100644 --- a/SRC/chesvxx.f +++ b/SRC/chesvxx.f @@ -499,7 +499,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEsolve +*> \ingroup hesvxx * * ===================================================================== SUBROUTINE CHESVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/cheswapr.f b/SRC/cheswapr.f index aded514234..a6161df5e6 100644 --- a/SRC/cheswapr.f +++ b/SRC/cheswapr.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEauxiliary +*> \ingroup heswapr * * ===================================================================== SUBROUTINE CHESWAPR( UPLO, N, A, LDA, I1, I2) diff --git a/SRC/chetd2.f b/SRC/chetd2.f index ae4f72df15..aad0fb00c7 100644 --- a/SRC/chetd2.f +++ b/SRC/chetd2.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetd2 * *> \par Further Details: * ===================== diff --git a/SRC/chetf2.f b/SRC/chetf2.f index 84ba339fbb..180d5f0451 100644 --- a/SRC/chetf2.f +++ b/SRC/chetf2.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetf2 * *> \par Further Details: * ===================== diff --git a/SRC/chetf2_rk.f b/SRC/chetf2_rk.f index e687ec64a8..a3d5acb19d 100644 --- a/SRC/chetf2_rk.f +++ b/SRC/chetf2_rk.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetf2_rk * *> \par Further Details: * ===================== diff --git a/SRC/chetf2_rook.f b/SRC/chetf2_rook.f index 49fba1bda1..53ddb93f74 100644 --- a/SRC/chetf2_rook.f +++ b/SRC/chetf2_rook.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetf2_rook * *> \par Further Details: * ===================== diff --git a/SRC/chetrd.f b/SRC/chetrd.f index 52b9a895a9..f28a0804ea 100644 --- a/SRC/chetrd.f +++ b/SRC/chetrd.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrd * *> \par Further Details: * ===================== diff --git a/SRC/chetrd_2stage.f b/SRC/chetrd_2stage.f index f5ad35f277..99ff034805 100644 --- a/SRC/chetrd_2stage.f +++ b/SRC/chetrd_2stage.f @@ -4,23 +4,23 @@ * * =========== DOCUMENTATION =========== * -* Online html documentation available at -* http://www.netlib.org/lapack/explore-html/ +* Online html documentation available at +* http://www.netlib.org/lapack/explore-html/ * *> \htmlonly -*> Download CHETRD_2STAGE + dependencies -*> -*> [TGZ] -*> -*> [ZIP] -*> +*> Download CHETRD_2STAGE + dependencies +*> +*> [TGZ] +*> +*> [ZIP] +*> *> [TXT] -*> \endhtmlonly +*> \endhtmlonly * * Definition: * =========== * -* SUBROUTINE CHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, +* SUBROUTINE CHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, * HOUS2, LHOUS2, WORK, LWORK, INFO ) * * IMPLICIT NONE @@ -34,7 +34,7 @@ * COMPLEX A( LDA, * ), TAU( * ), * HOUS2( * ), WORK( * ) * .. -* +* * *> \par Purpose: * ============= @@ -52,11 +52,11 @@ *> \param[in] VECT *> \verbatim *> VECT is CHARACTER*1 -*> = 'N': No need for the Housholder representation, +*> = 'N': No need for the Housholder representation, *> in particular for the second stage (Band to *> tridiagonal) and thus LHOUS2 is of size max(1, 4*N); -*> = 'V': the Householder representation is needed to -*> either generate Q1 Q2 or to apply Q1 Q2, +*> = 'V': the Householder representation is needed to +*> either generate Q1 Q2 or to apply Q1 Q2, *> then LHOUS2 is to be queried and computed. *> (NOT AVAILABLE IN THIS RELEASE). *> \endverbatim @@ -86,7 +86,7 @@ *> triangular part of A is not referenced. *> On exit, if UPLO = 'U', the band superdiagonal *> of A are overwritten by the corresponding elements of the -*> internal band-diagonal matrix AB, and the elements above +*> internal band-diagonal matrix AB, and the elements above *> the KD superdiagonal, with the array TAU, represent the unitary *> matrix Q1 as a product of elementary reflectors; if UPLO *> = 'L', the diagonal and band subdiagonal of A are over- @@ -117,7 +117,7 @@ *> \param[out] TAU *> \verbatim *> TAU is COMPLEX array, dimension (N-KD) -*> The scalar factors of the elementary reflectors of +*> The scalar factors of the elementary reflectors of *> the first stage (see Further Details). *> \endverbatim *> @@ -157,9 +157,9 @@ *> message related to LWORK is issued by XERBLA. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) -*> + (KD+1)*N +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) +*> + (KD+1)*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ *> algorithm, usually FACTOPTNB=128 is a good choice @@ -177,12 +177,12 @@ * Authors: * ======== * -*> \author Univ. of Tennessee -*> \author Univ. of California Berkeley -*> \author Univ. of Colorado Denver -*> \author NAG Ltd. +*> \author Univ. of Tennessee +*> \author Univ. of California Berkeley +*> \author Univ. of Colorado Denver +*> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrd_2stage * *> \par Further Details: * ===================== @@ -202,7 +202,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -210,16 +210,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - SUBROUTINE CHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, + SUBROUTINE CHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, $ HOUS2, LHOUS2, WORK, LWORK, INFO ) * IMPLICIT NONE @@ -309,14 +309,14 @@ SUBROUTINE CHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, LWRK = LWORK-LDAB*N ABPOS = 1 WPOS = ABPOS + LDAB*N - CALL CHETRD_HE2HB( UPLO, N, KD, A, LDA, WORK( ABPOS ), LDAB, + CALL CHETRD_HE2HB( UPLO, N, KD, A, LDA, WORK( ABPOS ), LDAB, $ TAU, WORK( WPOS ), LWRK, INFO ) IF( INFO.NE.0 ) THEN CALL XERBLA( 'CHETRD_HE2HB', -INFO ) RETURN END IF - CALL CHETRD_HB2ST( 'Y', VECT, UPLO, N, KD, - $ WORK( ABPOS ), LDAB, D, E, + CALL CHETRD_HB2ST( 'Y', VECT, UPLO, N, KD, + $ WORK( ABPOS ), LDAB, D, E, $ HOUS2, LHOUS2, WORK( WPOS ), LWRK, INFO ) IF( INFO.NE.0 ) THEN CALL XERBLA( 'CHETRD_HB2ST', -INFO ) diff --git a/SRC/chetrd_hb2st.F b/SRC/chetrd_hb2st.F index 30b01ed83a..1dd0a81afa 100644 --- a/SRC/chetrd_hb2st.F +++ b/SRC/chetrd_hb2st.F @@ -18,7 +18,7 @@ * Definition: * =========== * -* SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, +* SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * D, E, HOUS, LHOUS, WORK, LWORK, INFO ) * * #if defined(_OPENMP) @@ -53,12 +53,12 @@ *> \param[in] STAGE1 *> \verbatim *> STAGE1 is CHARACTER*1 -*> = 'N': "No": to mention that the stage 1 of the reduction +*> = 'N': "No": to mention that the stage 1 of the reduction *> from dense to band using the chetrd_he2hb routine -*> was not called before this routine to reproduce AB. -*> In other term this routine is called as standalone. -*> = 'Y': "Yes": to mention that the stage 1 of the -*> reduction from dense to band using the chetrd_he2hb +*> was not called before this routine to reproduce AB. +*> In other term this routine is called as standalone. +*> = 'Y': "Yes": to mention that the stage 1 of the +*> reduction from dense to band using the chetrd_he2hb *> routine has been called to produce AB (e.g., AB is *> the output of chetrd_he2hb. *> \endverbatim @@ -66,10 +66,10 @@ *> \param[in] VECT *> \verbatim *> VECT is CHARACTER*1 -*> = 'N': No need for the Housholder representation, +*> = 'N': No need for the Housholder representation, *> and thus LHOUS is of size max(1, 4*N); -*> = 'V': the Householder representation is needed to -*> either generate or to apply Q later on, +*> = 'V': the Householder representation is needed to +*> either generate or to apply Q later on, *> then LHOUS is to be queried and computed. *> (NOT AVAILABLE IN THIS RELEASE). *> \endverbatim @@ -147,7 +147,7 @@ *> message related to LHOUS is issued by XERBLA. *> LHOUS = MAX(1, dimension) where *> dimension = 4*N if VECT='N' -*> not available now if VECT='H' +*> not available now if VECT='H' *> \endverbatim *> *> \param[out] WORK @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hetrd_hb2st * *> \par Further Details: * ===================== @@ -208,7 +208,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -216,16 +216,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, + SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, $ D, E, HOUS, LHOUS, WORK, LWORK, INFO ) * * @@ -259,11 +259,11 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * .. * .. Local Scalars .. LOGICAL LQUERY, WANTQ, UPPER, AFTERS1 - INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST, + INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST, $ ED, STIND, EDIND, BLKLASTIND, COLPT, THED, $ STEPERCOL, GRSIZ, THGRSIZ, THGRNB, THGRID, $ NBTILES, TTYPE, TID, NTHREADS, DEBUG, - $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS, + $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS, $ INDA, INDW, APOS, SIZEA, LDA, INDV, INDTAU, $ SICEV, SIZETAU, LDV, LHMIN, LWMIN REAL ABSTMP @@ -277,7 +277,7 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * .. * .. External Functions .. LOGICAL LSAME - INTEGER ILAENV2STAGE + INTEGER ILAENV2STAGE EXTERNAL LSAME, ILAENV2STAGE * .. * .. Executable Statements .. @@ -358,7 +358,7 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ABDPOS = KD + 1 ABOFDPOS = KD ELSE - APOS = INDA + APOS = INDA AWPOS = INDA + KD + 1 DPOS = APOS OFDPOS = DPOS + 1 @@ -366,11 +366,11 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ABOFDPOS = 2 ENDIF -* -* Case KD=0: -* The matrix is diagonal. We just copy it (convert to "real" for -* complex because D is double and the imaginary part should be 0) -* and store it in D. A sequential code here is better or +* +* Case KD=0: +* The matrix is diagonal. We just copy it (convert to "real" for +* complex because D is double and the imaginary part should be 0) +* and store it in D. A sequential code here is better or * in a parallel environment it might need two cores for D and E * IF( KD.EQ.0 ) THEN @@ -385,17 +385,17 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, WORK( 1 ) = 1 RETURN END IF -* -* Case KD=1: -* The matrix is already Tridiagonal. We have to make diagonal +* +* Case KD=1: +* The matrix is already Tridiagonal. We have to make diagonal * and offdiagonal elements real, and store them in D and E. -* For that, for real precision just copy the diag and offdiag -* to D and E while for the COMPLEX case the bulge chasing is -* performed to convert the hermetian tridiagonal to symmetric -* tridiagonal. A simpler conversion formula might be used, but then +* For that, for real precision just copy the diag and offdiag +* to D and E while for the COMPLEX case the bulge chasing is +* performed to convert the hermetian tridiagonal to symmetric +* tridiagonal. A simpler conversion formula might be used, but then * updating the Q matrix will be required and based if Q is generated -* or not this might complicate the story. -* +* or not this might complicate the story. +* IF( KD.EQ.1 ) THEN DO 50 I = 1, N D( I ) = REAL( AB( ABDPOS, I ) ) @@ -444,7 +444,7 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, RETURN END IF * -* Main code start here. +* Main code start here. * Reduce the hermitian band of A to a tridiagonal matrix. * THGRSIZ = N @@ -453,7 +453,7 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, NBTILES = CEILING( REAL(N)/REAL(KD) ) STEPERCOL = CEILING( REAL(SHIFT)/REAL(GRSIZ) ) THGRNB = CEILING( REAL(N-1)/REAL(THGRSIZ) ) -* +* CALL CLACPY( "A", KD+1, N, AB, LDAB, WORK( APOS ), LDA ) CALL CLASET( "A", KD, N, ZERO, ZERO, WORK( AWPOS ), LDA ) * @@ -462,7 +462,7 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * #if defined(_OPENMP) !$OMP PARALLEL PRIVATE( TID, THGRID, BLKLASTIND ) -!$OMP$ PRIVATE( THED, I, M, K, ST, ED, STT, SWEEPID ) +!$OMP$ PRIVATE( THED, I, M, K, ST, ED, STT, SWEEPID ) !$OMP$ PRIVATE( MYID, TTYPE, COLPT, STIND, EDIND ) !$OMP$ SHARED ( UPLO, WANTQ, INDV, INDTAU, HOUS, WORK) !$OMP$ SHARED ( N, KD, IB, NBTILES, LDA, LDV, INDA ) @@ -471,7 +471,7 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, #endif * * main bulge chasing loop -* +* DO 100 THGRID = 1, THGRNB STT = (THGRID-1)*THGRSIZ+1 THED = MIN( (STT + THGRSIZ -1), (N-1)) @@ -482,7 +482,7 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ST = STT DO 130 SWEEPID = ST, ED DO 140 K = 1, GRSIZ - MYID = (I-SWEEPID)*(STEPERCOL*GRSIZ) + MYID = (I-SWEEPID)*(STEPERCOL*GRSIZ) $ + (M-1)*GRSIZ + K IF ( MYID.EQ.1 ) THEN TTYPE = 1 @@ -508,16 +508,16 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ENDIF * * Call the kernel -* +* #if defined(_OPENMP) && _OPENMP >= 201307 - IF( TTYPE.NE.1 ) THEN + IF( TTYPE.NE.1 ) THEN !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1)) !$OMP$ DEPEND(in:WORK(MYID-1)) !$OMP$ DEPEND(out:WORK(MYID)) TID = OMP_GET_THREAD_NUM() - CALL CHB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL CHB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW + TID*KD ) ) !$OMP END TASK @@ -525,20 +525,20 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1)) !$OMP$ DEPEND(out:WORK(MYID)) TID = OMP_GET_THREAD_NUM() - CALL CHB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL CHB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW + TID*KD ) ) !$OMP END TASK ENDIF #else - CALL CHB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL CHB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW ) ) -#endif +#endif IF ( BLKLASTIND.GE.(N-1) ) THEN STT = STT + 1 EXIT @@ -553,14 +553,14 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, !$OMP END MASTER !$OMP END PARALLEL #endif -* +* * Copy the diagonal from A to D. Note that D is REAL thus only * the Real part is needed, the imaginary part should be zero. * DO 150 I = 1, N D( I ) = REAL( WORK( DPOS+(I-1)*LDA ) ) 150 CONTINUE -* +* * Copy the off diagonal from A to E. Note that E is REAL thus only * the Real part is needed, the imaginary part should be zero. * @@ -581,4 +581,4 @@ SUBROUTINE CHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * End of CHETRD_HB2ST * END - + diff --git a/SRC/chetrd_he2hb.f b/SRC/chetrd_he2hb.f index 904555c10e..28aa877f44 100644 --- a/SRC/chetrd_he2hb.f +++ b/SRC/chetrd_he2hb.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrd_he2hb * *> \par Further Details: * ===================== diff --git a/SRC/chetrf.f b/SRC/chetrf.f index 484e762562..aa24c41ad9 100644 --- a/SRC/chetrf.f +++ b/SRC/chetrf.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrf * *> \par Further Details: * ===================== diff --git a/SRC/chetrf_aa.f b/SRC/chetrf_aa.f index d9e4fbd190..b9128ef102 100644 --- a/SRC/chetrf_aa.f +++ b/SRC/chetrf_aa.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrf_aa * * ===================================================================== SUBROUTINE CHETRF_AA( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO) diff --git a/SRC/chetrf_aa_2stage.f b/SRC/chetrf_aa_2stage.f index 400efdf261..c41f65b263 100644 --- a/SRC/chetrf_aa_2stage.f +++ b/SRC/chetrf_aa_2stage.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrf_aa_2stage * * ===================================================================== SUBROUTINE CHETRF_AA_2STAGE( UPLO, N, A, LDA, TB, LTB, IPIV, diff --git a/SRC/chetrf_rk.f b/SRC/chetrf_rk.f index 3f60f43705..1caeff056f 100644 --- a/SRC/chetrf_rk.f +++ b/SRC/chetrf_rk.f @@ -229,7 +229,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrf_rk * *> \par Further Details: * ===================== diff --git a/SRC/chetrf_rook.f b/SRC/chetrf_rook.f index 805e0f4cbd..fedd59d715 100644 --- a/SRC/chetrf_rook.f +++ b/SRC/chetrf_rook.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrf_rook * *> \par Further Details: * ===================== diff --git a/SRC/chetri.f b/SRC/chetri.f index 7a38a25b8b..b67cb67353 100644 --- a/SRC/chetri.f +++ b/SRC/chetri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetri * * ===================================================================== SUBROUTINE CHETRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) diff --git a/SRC/chetri2.f b/SRC/chetri2.f index 2865a6440f..ca9191c7c2 100644 --- a/SRC/chetri2.f +++ b/SRC/chetri2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetri2 * * ===================================================================== SUBROUTINE CHETRI2( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/chetri2x.f b/SRC/chetri2x.f index 0cfaf2861c..a507d09ce7 100644 --- a/SRC/chetri2x.f +++ b/SRC/chetri2x.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetri2x * * ===================================================================== SUBROUTINE CHETRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) diff --git a/SRC/chetri_3.f b/SRC/chetri_3.f index cc2318b22f..0d9090dff5 100644 --- a/SRC/chetri_3.f +++ b/SRC/chetri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetri_3 * *> \par Contributors: * ================== diff --git a/SRC/chetri_3x.f b/SRC/chetri_3x.f index 0a6083bef4..bb7c6002f1 100644 --- a/SRC/chetri_3x.f +++ b/SRC/chetri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetri_3x * *> \par Contributors: * ================== diff --git a/SRC/chetri_rook.f b/SRC/chetri_rook.f index 8090a576c7..30621b48af 100644 --- a/SRC/chetri_rook.f +++ b/SRC/chetri_rook.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetri_rook * *> \par Contributors: * ================== diff --git a/SRC/chetrs.f b/SRC/chetrs.f index 4dc97cd309..abf7b42f0f 100644 --- a/SRC/chetrs.f +++ b/SRC/chetrs.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrs * * ===================================================================== SUBROUTINE CHETRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/chetrs2.f b/SRC/chetrs2.f index 07b6e025fe..c036e5710a 100644 --- a/SRC/chetrs2.f +++ b/SRC/chetrs2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrs2 * * ===================================================================== SUBROUTINE CHETRS2( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/chetrs_3.f b/SRC/chetrs_3.f index f9c25bd565..ae137df639 100644 --- a/SRC/chetrs_3.f +++ b/SRC/chetrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrs_3 * *> \par Contributors: * ================== diff --git a/SRC/chetrs_aa.f b/SRC/chetrs_aa.f index 2546adb2de..b9758377b0 100644 --- a/SRC/chetrs_aa.f +++ b/SRC/chetrs_aa.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrs_aa * * ===================================================================== SUBROUTINE CHETRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/chetrs_aa_2stage.f b/SRC/chetrs_aa_2stage.f index 41cd3e289d..caf72e27a8 100644 --- a/SRC/chetrs_aa_2stage.f +++ b/SRC/chetrs_aa_2stage.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrs_aa_2stage * * ===================================================================== SUBROUTINE CHETRS_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/chetrs_rook.f b/SRC/chetrs_rook.f index d80da9328e..8e4d4b1d58 100644 --- a/SRC/chetrs_rook.f +++ b/SRC/chetrs_rook.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup hetrs_rook * *> \par Contributors: * ================== diff --git a/SRC/chfrk.f b/SRC/chfrk.f index 7aa2343ed0..970b4bee96 100644 --- a/SRC/chfrk.f +++ b/SRC/chfrk.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hfrk * * ===================================================================== SUBROUTINE CHFRK( TRANSR, UPLO, TRANS, N, K, ALPHA, A, LDA, BETA, diff --git a/SRC/chgeqz.f b/SRC/chgeqz.f index 50c6827ff9..62e6da39a6 100644 --- a/SRC/chgeqz.f +++ b/SRC/chgeqz.f @@ -266,7 +266,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup hgeqz * *> \par Further Details: * ===================== diff --git a/SRC/chla_transtype.f b/SRC/chla_transtype.f index 16c37afbfe..170a4e2b10 100644 --- a/SRC/chla_transtype.f +++ b/SRC/chla_transtype.f @@ -51,7 +51,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup la_transtype * * ===================================================================== CHARACTER*1 FUNCTION CHLA_TRANSTYPE( TRANS ) diff --git a/SRC/chpcon.f b/SRC/chpcon.f index f34b57cd94..621840c7c2 100644 --- a/SRC/chpcon.f +++ b/SRC/chpcon.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hpcon * * ===================================================================== SUBROUTINE CHPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, INFO ) diff --git a/SRC/chpev.f b/SRC/chpev.f index 1be8c0c6d8..ab98def3f9 100644 --- a/SRC/chpev.f +++ b/SRC/chpev.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hpev * * ===================================================================== SUBROUTINE CHPEV( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, RWORK, diff --git a/SRC/chpevd.f b/SRC/chpevd.f index 06d01064df..7d16c61f6f 100644 --- a/SRC/chpevd.f +++ b/SRC/chpevd.f @@ -186,7 +186,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hpevd * * ===================================================================== SUBROUTINE CHPEVD( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, LWORK, diff --git a/SRC/chpevx.f b/SRC/chpevx.f index 1f602701a0..2cfec2cbc6 100644 --- a/SRC/chpevx.f +++ b/SRC/chpevx.f @@ -231,7 +231,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hpevx * * ===================================================================== SUBROUTINE CHPEVX( JOBZ, RANGE, UPLO, N, AP, VL, VU, IL, IU, diff --git a/SRC/chpgst.f b/SRC/chpgst.f index 17f10b034b..b666965868 100644 --- a/SRC/chpgst.f +++ b/SRC/chpgst.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hpgst * * ===================================================================== SUBROUTINE CHPGST( ITYPE, UPLO, N, AP, BP, INFO ) diff --git a/SRC/chpgv.f b/SRC/chpgv.f index 660724e058..68a2c0a081 100644 --- a/SRC/chpgv.f +++ b/SRC/chpgv.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hpgv * * ===================================================================== SUBROUTINE CHPGV( ITYPE, JOBZ, UPLO, N, AP, BP, W, Z, LDZ, WORK, diff --git a/SRC/chpgvd.f b/SRC/chpgvd.f index c24ca13609..2fad255602 100644 --- a/SRC/chpgvd.f +++ b/SRC/chpgvd.f @@ -212,7 +212,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hpgvd * *> \par Contributors: * ================== diff --git a/SRC/chpgvx.f b/SRC/chpgvx.f index 2646800cc8..56f1eddbf0 100644 --- a/SRC/chpgvx.f +++ b/SRC/chpgvx.f @@ -263,7 +263,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHEReigen +*> \ingroup hpgvx * *> \par Contributors: * ================== diff --git a/SRC/chprfs.f b/SRC/chprfs.f index 65e22c5b00..47413c6d21 100644 --- a/SRC/chprfs.f +++ b/SRC/chprfs.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hprfs * * ===================================================================== SUBROUTINE CHPRFS( UPLO, N, NRHS, AP, AFP, IPIV, B, LDB, X, LDX, diff --git a/SRC/chpsv.f b/SRC/chpsv.f index d41c966128..4fc4a3a0ac 100644 --- a/SRC/chpsv.f +++ b/SRC/chpsv.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup hpsv * *> \par Further Details: * ===================== diff --git a/SRC/chpsvx.f b/SRC/chpsvx.f index fa9f714f5b..b6b6d14f04 100644 --- a/SRC/chpsvx.f +++ b/SRC/chpsvx.f @@ -249,7 +249,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup hpsvx * *> \par Further Details: * ===================== diff --git a/SRC/chptrd.f b/SRC/chptrd.f index 5618e014f6..07bc2cae57 100644 --- a/SRC/chptrd.f +++ b/SRC/chptrd.f @@ -112,7 +112,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hptrd * *> \par Further Details: * ===================== diff --git a/SRC/chptrf.f b/SRC/chptrf.f index d9bfffb06e..150afed54d 100644 --- a/SRC/chptrf.f +++ b/SRC/chptrf.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hptrf * *> \par Further Details: * ===================== diff --git a/SRC/chptri.f b/SRC/chptri.f index 8147a6d183..0a29f45c7a 100644 --- a/SRC/chptri.f +++ b/SRC/chptri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hptri * * ===================================================================== SUBROUTINE CHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) diff --git a/SRC/chptrs.f b/SRC/chptrs.f index df3832d4e4..ed49ec6703 100644 --- a/SRC/chptrs.f +++ b/SRC/chptrs.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hptrs * * ===================================================================== SUBROUTINE CHPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) diff --git a/SRC/chsein.f b/SRC/chsein.f index c125211abb..34c7f65654 100644 --- a/SRC/chsein.f +++ b/SRC/chsein.f @@ -226,7 +226,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hsein * *> \par Further Details: * ===================== diff --git a/SRC/chseqr.f b/SRC/chseqr.f index 007f72f59d..9c65858d67 100644 --- a/SRC/chseqr.f +++ b/SRC/chseqr.f @@ -216,7 +216,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hseqr * *> \par Contributors: * ================== diff --git a/SRC/cla_gbamv.f b/SRC/cla_gbamv.f index e98334fa48..babed5acba 100644 --- a/SRC/cla_gbamv.f +++ b/SRC/cla_gbamv.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup la_gbamv * * ===================================================================== SUBROUTINE CLA_GBAMV( TRANS, M, N, KL, KU, ALPHA, AB, LDAB, X, diff --git a/SRC/cla_gbrcond_c.f b/SRC/cla_gbrcond_c.f index ecea389a6f..011ff50971 100644 --- a/SRC/cla_gbrcond_c.f +++ b/SRC/cla_gbrcond_c.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup la_gbrcond * * ===================================================================== REAL FUNCTION CLA_GBRCOND_C( TRANS, N, KL, KU, AB, LDAB, AFB, diff --git a/SRC/cla_gbrcond_x.f b/SRC/cla_gbrcond_x.f index ffe9edbb3e..f14c1cea85 100644 --- a/SRC/cla_gbrcond_x.f +++ b/SRC/cla_gbrcond_x.f @@ -145,7 +145,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup la_gbrcond * * ===================================================================== REAL FUNCTION CLA_GBRCOND_X( TRANS, N, KL, KU, AB, LDAB, AFB, diff --git a/SRC/cla_gbrfsx_extended.f b/SRC/cla_gbrfsx_extended.f index e8b96fd6e9..8f483ab281 100644 --- a/SRC/cla_gbrfsx_extended.f +++ b/SRC/cla_gbrfsx_extended.f @@ -397,7 +397,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup la_gbrfsx_extended * * ===================================================================== SUBROUTINE CLA_GBRFSX_EXTENDED( PREC_TYPE, TRANS_TYPE, N, KL, KU, diff --git a/SRC/cla_gbrpvgrw.f b/SRC/cla_gbrpvgrw.f index 310f39949b..e779e7ef5b 100644 --- a/SRC/cla_gbrpvgrw.f +++ b/SRC/cla_gbrpvgrw.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup la_gbrpvgrw * * ===================================================================== REAL FUNCTION CLA_GBRPVGRW( N, KL, KU, NCOLS, AB, LDAB, AFB, diff --git a/SRC/cla_geamv.f b/SRC/cla_geamv.f index 22ba240aac..9e5a132d4a 100644 --- a/SRC/cla_geamv.f +++ b/SRC/cla_geamv.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup la_geamv * * ===================================================================== SUBROUTINE CLA_GEAMV( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, diff --git a/SRC/cla_gercond_c.f b/SRC/cla_gercond_c.f index 024dcb1d9a..d5b05a2bbe 100644 --- a/SRC/cla_gercond_c.f +++ b/SRC/cla_gercond_c.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup la_gercond * * ===================================================================== REAL FUNCTION CLA_GERCOND_C( TRANS, N, A, LDA, AF, LDAF, IPIV, C, diff --git a/SRC/cla_gercond_x.f b/SRC/cla_gercond_x.f index 80b0eab01f..a9d4ad46ad 100644 --- a/SRC/cla_gercond_x.f +++ b/SRC/cla_gercond_x.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup la_gercond * * ===================================================================== REAL FUNCTION CLA_GERCOND_X( TRANS, N, A, LDA, AF, LDAF, IPIV, X, diff --git a/SRC/cla_gerfsx_extended.f b/SRC/cla_gerfsx_extended.f index e524db5ad3..fd14afa3f1 100644 --- a/SRC/cla_gerfsx_extended.f +++ b/SRC/cla_gerfsx_extended.f @@ -385,7 +385,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup la_gerfsx_extended * * ===================================================================== SUBROUTINE CLA_GERFSX_EXTENDED( PREC_TYPE, TRANS_TYPE, N, NRHS, A, diff --git a/SRC/cla_gerpvgrw.f b/SRC/cla_gerpvgrw.f index f7e514510a..26442ab4bf 100644 --- a/SRC/cla_gerpvgrw.f +++ b/SRC/cla_gerpvgrw.f @@ -91,7 +91,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup la_gerpvgrw * * ===================================================================== REAL FUNCTION CLA_GERPVGRW( N, NCOLS, A, LDA, AF, LDAF ) diff --git a/SRC/cla_heamv.f b/SRC/cla_heamv.f index 6230de4af7..5be2f9cb95 100644 --- a/SRC/cla_heamv.f +++ b/SRC/cla_heamv.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup la_heamv * *> \par Further Details: * ===================== diff --git a/SRC/cla_hercond_c.f b/SRC/cla_hercond_c.f index 64bb580971..eb0d13822b 100644 --- a/SRC/cla_hercond_c.f +++ b/SRC/cla_hercond_c.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup la_hercond * * ===================================================================== REAL FUNCTION CLA_HERCOND_C( UPLO, N, A, LDA, AF, LDAF, IPIV, C, diff --git a/SRC/cla_hercond_x.f b/SRC/cla_hercond_x.f index e79d4d449e..fb04e116dd 100644 --- a/SRC/cla_hercond_x.f +++ b/SRC/cla_hercond_x.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup la_hercond * * ===================================================================== REAL FUNCTION CLA_HERCOND_X( UPLO, N, A, LDA, AF, LDAF, IPIV, X, diff --git a/SRC/cla_herfsx_extended.f b/SRC/cla_herfsx_extended.f index 19f8456925..6a5d3a8eb0 100644 --- a/SRC/cla_herfsx_extended.f +++ b/SRC/cla_herfsx_extended.f @@ -382,7 +382,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup la_herfsx_extended * * ===================================================================== SUBROUTINE CLA_HERFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/cla_herpvgrw.f b/SRC/cla_herpvgrw.f index 21b01ac77b..de403fdca3 100644 --- a/SRC/cla_herpvgrw.f +++ b/SRC/cla_herpvgrw.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup la_herpvgrw * * ===================================================================== REAL FUNCTION CLA_HERPVGRW( UPLO, N, INFO, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/cla_lin_berr.f b/SRC/cla_lin_berr.f index a46c998ba3..38cbff6144 100644 --- a/SRC/cla_lin_berr.f +++ b/SRC/cla_lin_berr.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup la_lin_berr * * ===================================================================== SUBROUTINE CLA_LIN_BERR( N, NZ, NRHS, RES, AYB, BERR ) diff --git a/SRC/cla_porcond_c.f b/SRC/cla_porcond_c.f index d322979e50..119172f498 100644 --- a/SRC/cla_porcond_c.f +++ b/SRC/cla_porcond_c.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup la_porcond * * ===================================================================== REAL FUNCTION CLA_PORCOND_C( UPLO, N, A, LDA, AF, LDAF, C, CAPPLY, diff --git a/SRC/cla_porcond_x.f b/SRC/cla_porcond_x.f index 62d0584ef4..b996d0fdf0 100644 --- a/SRC/cla_porcond_x.f +++ b/SRC/cla_porcond_x.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup la_porcond * * ===================================================================== REAL FUNCTION CLA_PORCOND_X( UPLO, N, A, LDA, AF, LDAF, X, INFO, diff --git a/SRC/cla_porfsx_extended.f b/SRC/cla_porfsx_extended.f index 2dafecb35a..83708938ce 100644 --- a/SRC/cla_porfsx_extended.f +++ b/SRC/cla_porfsx_extended.f @@ -374,7 +374,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup la_porfsx_extended * * ===================================================================== SUBROUTINE CLA_PORFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/cla_porpvgrw.f b/SRC/cla_porpvgrw.f index 78cd19da9d..696c6ac31f 100644 --- a/SRC/cla_porpvgrw.f +++ b/SRC/cla_porpvgrw.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup la_porpvgrw * * ===================================================================== REAL FUNCTION CLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, LDAF, WORK ) diff --git a/SRC/cla_syamv.f b/SRC/cla_syamv.f index 6507495838..fbf8be9920 100644 --- a/SRC/cla_syamv.f +++ b/SRC/cla_syamv.f @@ -155,7 +155,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup la_heamv * *> \par Further Details: * ===================== diff --git a/SRC/cla_syrcond_c.f b/SRC/cla_syrcond_c.f index 74c02abd93..8521a8e76d 100644 --- a/SRC/cla_syrcond_c.f +++ b/SRC/cla_syrcond_c.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup la_hercond * * ===================================================================== REAL FUNCTION CLA_SYRCOND_C( UPLO, N, A, LDA, AF, LDAF, IPIV, C, diff --git a/SRC/cla_syrcond_x.f b/SRC/cla_syrcond_x.f index d898c16ec0..002c0aed2b 100644 --- a/SRC/cla_syrcond_x.f +++ b/SRC/cla_syrcond_x.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup la_hercond * * ===================================================================== REAL FUNCTION CLA_SYRCOND_X( UPLO, N, A, LDA, AF, LDAF, IPIV, X, diff --git a/SRC/cla_syrfsx_extended.f b/SRC/cla_syrfsx_extended.f index 95f9697311..33fa22f8a9 100644 --- a/SRC/cla_syrfsx_extended.f +++ b/SRC/cla_syrfsx_extended.f @@ -382,7 +382,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup la_herfsx_extended * * ===================================================================== SUBROUTINE CLA_SYRFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/cla_syrpvgrw.f b/SRC/cla_syrpvgrw.f index 1f53e0f9ed..937ec75e23 100644 --- a/SRC/cla_syrpvgrw.f +++ b/SRC/cla_syrpvgrw.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup la_herpvgrw * * ===================================================================== REAL FUNCTION CLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/cla_wwaddw.f b/SRC/cla_wwaddw.f index aa78f60f41..b767942431 100644 --- a/SRC/cla_wwaddw.f +++ b/SRC/cla_wwaddw.f @@ -74,7 +74,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup la_wwaddw * * ===================================================================== SUBROUTINE CLA_WWADDW( N, X, Y, W ) diff --git a/SRC/clabrd.f b/SRC/clabrd.f index 765d71e509..2bde3842a7 100644 --- a/SRC/clabrd.f +++ b/SRC/clabrd.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup labrd * *> \par Further Details: * ===================== diff --git a/SRC/clacgv.f b/SRC/clacgv.f index d85df7435a..27d8b48475 100644 --- a/SRC/clacgv.f +++ b/SRC/clacgv.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lacgv * * ===================================================================== SUBROUTINE CLACGV( N, X, INCX ) diff --git a/SRC/clacn2.f b/SRC/clacn2.f index cbbe9242bf..f253f7c187 100644 --- a/SRC/clacn2.f +++ b/SRC/clacn2.f @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lacn2 * *> \par Further Details: * ===================== diff --git a/SRC/clacon.f b/SRC/clacon.f index cb5e23db41..13c2ed1f67 100644 --- a/SRC/clacon.f +++ b/SRC/clacon.f @@ -89,7 +89,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lacon * *> \par Further Details: * ===================== diff --git a/SRC/clacp2.f b/SRC/clacp2.f index 3c0f73b7bc..92a9f26642 100644 --- a/SRC/clacp2.f +++ b/SRC/clacp2.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lacp2 * * ===================================================================== SUBROUTINE CLACP2( UPLO, M, N, A, LDA, B, LDB ) diff --git a/SRC/clacpy.f b/SRC/clacpy.f index ab4404a29a..b365d92bfe 100644 --- a/SRC/clacpy.f +++ b/SRC/clacpy.f @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lacpy * * ===================================================================== SUBROUTINE CLACPY( UPLO, M, N, A, LDA, B, LDB ) diff --git a/SRC/clacrm.f b/SRC/clacrm.f index 84620b5e1b..cca6e40aac 100644 --- a/SRC/clacrm.f +++ b/SRC/clacrm.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lacrm * * ===================================================================== SUBROUTINE CLACRM( M, N, A, LDA, B, LDB, C, LDC, RWORK ) diff --git a/SRC/clacrt.f b/SRC/clacrt.f index d297f78dfd..666009aad4 100644 --- a/SRC/clacrt.f +++ b/SRC/clacrt.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lacrt * * ===================================================================== SUBROUTINE CLACRT( N, CX, INCX, CY, INCY, C, S ) diff --git a/SRC/cladiv.f b/SRC/cladiv.f index 1dca85a353..9d80831074 100644 --- a/SRC/cladiv.f +++ b/SRC/cladiv.f @@ -57,7 +57,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup ladiv * * ===================================================================== COMPLEX FUNCTION CLADIV( X, Y ) diff --git a/SRC/claed0.f b/SRC/claed0.f index 40a301fa7c..1661b02a3d 100644 --- a/SRC/claed0.f +++ b/SRC/claed0.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup laed0 * * ===================================================================== SUBROUTINE CLAED0( QSIZ, N, D, E, Q, LDQ, QSTORE, LDQS, RWORK, diff --git a/SRC/claed7.f b/SRC/claed7.f index 72f1417d4a..5391e09fcb 100644 --- a/SRC/claed7.f +++ b/SRC/claed7.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup laed7 * * ===================================================================== SUBROUTINE CLAED7( N, CUTPNT, QSIZ, TLVLS, CURLVL, CURPBM, D, Q, diff --git a/SRC/claed8.f b/SRC/claed8.f index 1600087ab1..4600729b18 100644 --- a/SRC/claed8.f +++ b/SRC/claed8.f @@ -219,7 +219,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup laed8 * * ===================================================================== SUBROUTINE CLAED8( K, N, QSIZ, Q, LDQ, D, RHO, CUTPNT, Z, DLAMBDA, diff --git a/SRC/claein.f b/SRC/claein.f index 9df436e447..d48263b4f9 100644 --- a/SRC/claein.f +++ b/SRC/claein.f @@ -141,7 +141,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laein * * ===================================================================== SUBROUTINE CLAEIN( RIGHTV, NOINIT, N, H, LDH, W, V, B, LDB, RWORK, diff --git a/SRC/claesy.f b/SRC/claesy.f index 045c9a5d9c..c6d8a3a0cf 100644 --- a/SRC/claesy.f +++ b/SRC/claesy.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYauxiliary +*> \ingroup laesy * * ===================================================================== SUBROUTINE CLAESY( A, B, C, RT1, RT2, EVSCAL, CS1, SN1 ) diff --git a/SRC/claev2.f b/SRC/claev2.f index e16b199276..e6178e471c 100644 --- a/SRC/claev2.f +++ b/SRC/claev2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laev2 * *> \par Further Details: * ===================== diff --git a/SRC/clag2z.f b/SRC/clag2z.f index 467c08009c..5cf9dcc420 100644 --- a/SRC/clag2z.f +++ b/SRC/clag2z.f @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup _lag2_ * * ===================================================================== SUBROUTINE CLAG2Z( M, N, SA, LDSA, A, LDA, INFO ) diff --git a/SRC/clags2.f b/SRC/clags2.f index 0cd06ba63d..de912de18d 100644 --- a/SRC/clags2.f +++ b/SRC/clags2.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lags2 * * ===================================================================== SUBROUTINE CLAGS2( UPPER, A1, A2, A3, B1, B2, B3, CSU, SNU, CSV, diff --git a/SRC/clagtm.f b/SRC/clagtm.f index d34ca4a1a3..81b8f6227f 100644 --- a/SRC/clagtm.f +++ b/SRC/clagtm.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lagtm * * ===================================================================== SUBROUTINE CLAGTM( TRANS, N, NRHS, ALPHA, DL, D, DU, X, LDX, BETA, diff --git a/SRC/clahef.f b/SRC/clahef.f index 60ec116d6b..6d7ea23bf1 100644 --- a/SRC/clahef.f +++ b/SRC/clahef.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup lahef * *> \par Contributors: * ================== diff --git a/SRC/clahef_aa.f b/SRC/clahef_aa.f index ae2fc96ce8..0081b249e2 100644 --- a/SRC/clahef_aa.f +++ b/SRC/clahef_aa.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup lahef_aa * * ===================================================================== SUBROUTINE CLAHEF_AA( UPLO, J1, M, NB, A, LDA, IPIV, diff --git a/SRC/clahef_rk.f b/SRC/clahef_rk.f index ffdde7eeba..c6bd514855 100644 --- a/SRC/clahef_rk.f +++ b/SRC/clahef_rk.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup lahef_rk * *> \par Contributors: * ================== diff --git a/SRC/clahef_rook.f b/SRC/clahef_rook.f index 130dfcb00c..1c195b3fb4 100644 --- a/SRC/clahef_rook.f +++ b/SRC/clahef_rook.f @@ -162,7 +162,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEcomputational +*> \ingroup lahef_rook * *> \par Contributors: * ================== diff --git a/SRC/clahqr.f b/SRC/clahqr.f index 5fa29d685d..caca0e8ddb 100644 --- a/SRC/clahqr.f +++ b/SRC/clahqr.f @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lahqr * *> \par Contributors: * ================== diff --git a/SRC/clahr2.f b/SRC/clahr2.f index ce15093dac..4132bc0e10 100644 --- a/SRC/clahr2.f +++ b/SRC/clahr2.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lahr2 * *> \par Further Details: * ===================== diff --git a/SRC/claic1.f b/SRC/claic1.f index 773c718d1d..43f63b026f 100644 --- a/SRC/claic1.f +++ b/SRC/claic1.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laic1 * * ===================================================================== SUBROUTINE CLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C ) diff --git a/SRC/clals0.f b/SRC/clals0.f index 0b545d5d71..131d97542e 100644 --- a/SRC/clals0.f +++ b/SRC/clals0.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup lals0 * *> \par Contributors: * ================== diff --git a/SRC/clalsa.f b/SRC/clalsa.f index fceb380f5b..a331f8e7ab 100644 --- a/SRC/clalsa.f +++ b/SRC/clalsa.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup lalsa * *> \par Contributors: * ================== diff --git a/SRC/clalsd.f b/SRC/clalsd.f index bdd6b31c58..855f22b19b 100644 --- a/SRC/clalsd.f +++ b/SRC/clalsd.f @@ -165,7 +165,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup lalsd * *> \par Contributors: * ================== diff --git a/SRC/clamswlq.f b/SRC/clamswlq.f index 1606cc611c..04fbb53d07 100644 --- a/SRC/clamswlq.f +++ b/SRC/clamswlq.f @@ -189,6 +189,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup lamswlq +*> * ===================================================================== SUBROUTINE CLAMSWLQ( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/clamtsqr.f b/SRC/clamtsqr.f index 5677420ac9..2decb07714 100644 --- a/SRC/clamtsqr.f +++ b/SRC/clamtsqr.f @@ -191,6 +191,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup lamtsqr +*> * ===================================================================== SUBROUTINE CLAMTSQR( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/clangb.f b/SRC/clangb.f index 09f36bbc45..380318631e 100644 --- a/SRC/clangb.f +++ b/SRC/clangb.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBauxiliary +*> \ingroup langb * * ===================================================================== REAL FUNCTION CLANGB( NORM, N, KL, KU, AB, LDAB, diff --git a/SRC/clange.f b/SRC/clange.f index 14d487b26f..e760394291 100644 --- a/SRC/clange.f +++ b/SRC/clange.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEauxiliary +*> \ingroup lange * * ===================================================================== REAL FUNCTION CLANGE( NORM, M, N, A, LDA, WORK ) diff --git a/SRC/clangt.f b/SRC/clangt.f index a778c6702a..c4a4de4ec2 100644 --- a/SRC/clangt.f +++ b/SRC/clangt.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup langt * * ===================================================================== REAL FUNCTION CLANGT( NORM, N, DL, D, DU ) diff --git a/SRC/clanhb.f b/SRC/clanhb.f index 1eae7fbe74..c0f5edfa46 100644 --- a/SRC/clanhb.f +++ b/SRC/clanhb.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lanhb * * ===================================================================== REAL FUNCTION CLANHB( NORM, UPLO, N, K, AB, LDAB, diff --git a/SRC/clanhe.f b/SRC/clanhe.f index 8181b329ef..6342cb9b23 100644 --- a/SRC/clanhe.f +++ b/SRC/clanhe.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEauxiliary +*> \ingroup lanhe * * ===================================================================== REAL FUNCTION CLANHE( NORM, UPLO, N, A, LDA, WORK ) diff --git a/SRC/clanhf.f b/SRC/clanhf.f index 4ce70602df..08c987e7ad 100644 --- a/SRC/clanhf.f +++ b/SRC/clanhf.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup lanhf * *> \par Further Details: * ===================== diff --git a/SRC/clanhp.f b/SRC/clanhp.f index ff99a73537..94b679dbda 100644 --- a/SRC/clanhp.f +++ b/SRC/clanhp.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lanhp * * ===================================================================== REAL FUNCTION CLANHP( NORM, UPLO, N, AP, WORK ) diff --git a/SRC/clanhs.f b/SRC/clanhs.f index faf86124ad..28392bf954 100644 --- a/SRC/clanhs.f +++ b/SRC/clanhs.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lanhs * * ===================================================================== REAL FUNCTION CLANHS( NORM, N, A, LDA, WORK ) diff --git a/SRC/clanht.f b/SRC/clanht.f index 5ac3d4b1d2..c7359b9ae9 100644 --- a/SRC/clanht.f +++ b/SRC/clanht.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lanht * * ===================================================================== REAL FUNCTION CLANHT( NORM, N, D, E ) diff --git a/SRC/clansb.f b/SRC/clansb.f index b95f6335f2..e32ec96ece 100644 --- a/SRC/clansb.f +++ b/SRC/clansb.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lanhb * * ===================================================================== REAL FUNCTION CLANSB( NORM, UPLO, N, K, AB, LDAB, diff --git a/SRC/clansp.f b/SRC/clansp.f index 1065066d33..0a5527ba25 100644 --- a/SRC/clansp.f +++ b/SRC/clansp.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lanhp * * ===================================================================== REAL FUNCTION CLANSP( NORM, UPLO, N, AP, WORK ) diff --git a/SRC/clansy.f b/SRC/clansy.f index 478c14040d..4b65281117 100644 --- a/SRC/clansy.f +++ b/SRC/clansy.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYauxiliary +*> \ingroup lanhe * * ===================================================================== REAL FUNCTION CLANSY( NORM, UPLO, N, A, LDA, WORK ) diff --git a/SRC/clantb.f b/SRC/clantb.f index f7747b6edd..37252c48b7 100644 --- a/SRC/clantb.f +++ b/SRC/clantb.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lantb * * ===================================================================== REAL FUNCTION CLANTB( NORM, UPLO, DIAG, N, K, AB, diff --git a/SRC/clantp.f b/SRC/clantp.f index f7169360eb..7b68b8d83e 100644 --- a/SRC/clantp.f +++ b/SRC/clantp.f @@ -118,7 +118,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lantp * * ===================================================================== REAL FUNCTION CLANTP( NORM, UPLO, DIAG, N, AP, WORK ) diff --git a/SRC/clantr.f b/SRC/clantr.f index f1dce1402d..51e63b0d8b 100644 --- a/SRC/clantr.f +++ b/SRC/clantr.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lantr * * ===================================================================== REAL FUNCTION CLANTR( NORM, UPLO, DIAG, M, N, A, LDA, diff --git a/SRC/clapll.f b/SRC/clapll.f index 2fea2b1a31..5bb450871b 100644 --- a/SRC/clapll.f +++ b/SRC/clapll.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lapll * * ===================================================================== SUBROUTINE CLAPLL( N, X, INCX, Y, INCY, SSMIN ) diff --git a/SRC/clapmr.f b/SRC/clapmr.f index fa6193fc3a..1c9535896a 100644 --- a/SRC/clapmr.f +++ b/SRC/clapmr.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lapmr * * ===================================================================== SUBROUTINE CLAPMR( FORWRD, M, N, X, LDX, K ) diff --git a/SRC/clapmt.f b/SRC/clapmt.f index e1230aeba9..a6edcb2539 100644 --- a/SRC/clapmt.f +++ b/SRC/clapmt.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lapmt * * ===================================================================== SUBROUTINE CLAPMT( FORWRD, M, N, X, LDX, K ) diff --git a/SRC/claqgb.f b/SRC/claqgb.f index 3f1e824dbf..79c455fc00 100644 --- a/SRC/claqgb.f +++ b/SRC/claqgb.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBauxiliary +*> \ingroup laqgb * * ===================================================================== SUBROUTINE CLAQGB( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/claqge.f b/SRC/claqge.f index ae20ab7a02..c0cb8a750f 100644 --- a/SRC/claqge.f +++ b/SRC/claqge.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEauxiliary +*> \ingroup laqge * * ===================================================================== SUBROUTINE CLAQGE( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/claqhb.f b/SRC/claqhb.f index 0ee2a1e595..841617c4d4 100644 --- a/SRC/claqhb.f +++ b/SRC/claqhb.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqhb * * ===================================================================== SUBROUTINE CLAQHB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) diff --git a/SRC/claqhe.f b/SRC/claqhe.f index 619c35260f..7a243ab2b4 100644 --- a/SRC/claqhe.f +++ b/SRC/claqhe.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexHEauxiliary +*> \ingroup laqhe * * ===================================================================== SUBROUTINE CLAQHE( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) diff --git a/SRC/claqhp.f b/SRC/claqhp.f index e4088f7da6..34cc74c6c7 100644 --- a/SRC/claqhp.f +++ b/SRC/claqhp.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqhp * * ===================================================================== SUBROUTINE CLAQHP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) diff --git a/SRC/claqp2.f b/SRC/claqp2.f index 6e41afeb4a..b7e958ccd8 100644 --- a/SRC/claqp2.f +++ b/SRC/claqp2.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqp2 * *> \par Contributors: * ================== diff --git a/SRC/claqps.f b/SRC/claqps.f index e41c47c3c6..35dc450293 100644 --- a/SRC/claqps.f +++ b/SRC/claqps.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqps * *> \par Contributors: * ================== diff --git a/SRC/claqr0.f b/SRC/claqr0.f index 47494e0677..8a9afe52ec 100644 --- a/SRC/claqr0.f +++ b/SRC/claqr0.f @@ -214,7 +214,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqr0 * *> \par Contributors: * ================== diff --git a/SRC/claqr1.f b/SRC/claqr1.f index e6989798f1..f25a8ab281 100644 --- a/SRC/claqr1.f +++ b/SRC/claqr1.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqr1 * *> \par Contributors: * ================== diff --git a/SRC/claqr2.f b/SRC/claqr2.f index 628a7a5437..01dc02150d 100644 --- a/SRC/claqr2.f +++ b/SRC/claqr2.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqr2 * *> \par Contributors: * ================== diff --git a/SRC/claqr3.f b/SRC/claqr3.f index 075d4e542e..a12a87519e 100644 --- a/SRC/claqr3.f +++ b/SRC/claqr3.f @@ -251,7 +251,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqr3 * *> \par Contributors: * ================== diff --git a/SRC/claqr4.f b/SRC/claqr4.f index b2d15dd6e4..cb38af7016 100644 --- a/SRC/claqr4.f +++ b/SRC/claqr4.f @@ -222,7 +222,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqr4 * *> \par Contributors: * ================== diff --git a/SRC/claqr5.f b/SRC/claqr5.f index 7168d567c2..2283c37b00 100644 --- a/SRC/claqr5.f +++ b/SRC/claqr5.f @@ -225,7 +225,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqr5 * *> \par Contributors: * ================== diff --git a/SRC/claqsb.f b/SRC/claqsb.f index f7e3c0ef07..9d9d9b4258 100644 --- a/SRC/claqsb.f +++ b/SRC/claqsb.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqhb * * ===================================================================== SUBROUTINE CLAQSB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) diff --git a/SRC/claqsp.f b/SRC/claqsp.f index 523e4a19e0..c59606b19c 100644 --- a/SRC/claqsp.f +++ b/SRC/claqsp.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laqhp * * ===================================================================== SUBROUTINE CLAQSP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) diff --git a/SRC/claqsy.f b/SRC/claqsy.f index d9f3a5dddc..11d1444e77 100644 --- a/SRC/claqsy.f +++ b/SRC/claqsy.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYauxiliary +*> \ingroup laqhe * * ===================================================================== SUBROUTINE CLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) diff --git a/SRC/claqz0.f b/SRC/claqz0.f index c6cc5847d7..73471d5121 100644 --- a/SRC/claqz0.f +++ b/SRC/claqz0.f @@ -274,7 +274,7 @@ * *> \date May 2020 * -*> \ingroup complexGEcomputational +*> \ingroup laqz0 *> * ===================================================================== RECURSIVE SUBROUTINE CLAQZ0( WANTS, WANTQ, WANTZ, N, ILO, IHI, A, diff --git a/SRC/claqz1.f b/SRC/claqz1.f index b89fe6e196..1a8feb8d10 100644 --- a/SRC/claqz1.f +++ b/SRC/claqz1.f @@ -165,7 +165,7 @@ * *> \date May 2020 * -*> \ingroup complexGEcomputational +*> \ingroup laqz1 *> * ===================================================================== SUBROUTINE CLAQZ1( ILQ, ILZ, K, ISTARTM, ISTOPM, IHI, A, LDA, B, diff --git a/SRC/claqz2.f b/SRC/claqz2.f index 1f3973048e..e3bd6fb4f5 100644 --- a/SRC/claqz2.f +++ b/SRC/claqz2.f @@ -209,6 +209,7 @@ *> REC is INTEGER *> REC indicates the current recursion level. Should be set *> to 0 on first call. +*> \endverbatim *> *> \param[out] INFO *> \verbatim @@ -224,7 +225,7 @@ * *> \date May 2020 * -*> \ingroup complexGEcomputational +*> \ingroup laqz2 *> * ===================================================================== RECURSIVE SUBROUTINE CLAQZ2( ILSCHUR, ILQ, ILZ, N, ILO, IHI, NW, diff --git a/SRC/claqz3.f b/SRC/claqz3.f index a55ebc20b8..cd3a238060 100644 --- a/SRC/claqz3.f +++ b/SRC/claqz3.f @@ -197,7 +197,7 @@ * *> \date May 2020 * -*> \ingroup complexGEcomputational +*> \ingroup laqz3 *> * ===================================================================== SUBROUTINE CLAQZ3( ILSCHUR, ILQ, ILZ, N, ILO, IHI, NSHIFTS, diff --git a/SRC/clar1v.f b/SRC/clar1v.f index f8d6531c3e..60183d2728 100644 --- a/SRC/clar1v.f +++ b/SRC/clar1v.f @@ -212,7 +212,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lar1v * *> \par Contributors: * ================== diff --git a/SRC/clar2v.f b/SRC/clar2v.f index e293a7cab1..4f6a29cf80 100644 --- a/SRC/clar2v.f +++ b/SRC/clar2v.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lar2v * * ===================================================================== SUBROUTINE CLAR2V( N, X, Y, Z, INCX, C, S, INCC ) diff --git a/SRC/clarcm.f b/SRC/clarcm.f index 4ad9563918..0ee10399a1 100644 --- a/SRC/clarcm.f +++ b/SRC/clarcm.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larcm * * ===================================================================== SUBROUTINE CLARCM( M, N, A, LDA, B, LDB, C, LDC, RWORK ) diff --git a/SRC/clarf.f b/SRC/clarf.f index b76841f59c..04474a97a5 100644 --- a/SRC/clarf.f +++ b/SRC/clarf.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larf * * ===================================================================== SUBROUTINE CLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK ) diff --git a/SRC/clarfb.f b/SRC/clarfb.f index 3dcadb1879..ff9cce353b 100644 --- a/SRC/clarfb.f +++ b/SRC/clarfb.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larfb * *> \par Further Details: * ===================== diff --git a/SRC/clarfb_gett.f b/SRC/clarfb_gett.f index 5f042e3450..5f078ab788 100644 --- a/SRC/clarfb_gett.f +++ b/SRC/clarfb_gett.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larfb_gett * *> \par Contributors: * ================== diff --git a/SRC/clarfg.f b/SRC/clarfg.f index 36a98f5893..e335e0fd63 100644 --- a/SRC/clarfg.f +++ b/SRC/clarfg.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larfg * * ===================================================================== SUBROUTINE CLARFG( N, ALPHA, X, INCX, TAU ) diff --git a/SRC/clarfgp.f b/SRC/clarfgp.f index b584484c7f..cbc489d618 100644 --- a/SRC/clarfgp.f +++ b/SRC/clarfgp.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larfgp * * ===================================================================== SUBROUTINE CLARFGP( N, ALPHA, X, INCX, TAU ) diff --git a/SRC/clarft.f b/SRC/clarft.f index fdf80b78e9..c28b2262c8 100644 --- a/SRC/clarft.f +++ b/SRC/clarft.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larft * *> \par Further Details: * ===================== diff --git a/SRC/clarfx.f b/SRC/clarfx.f index 6a39094b8e..fdfc5a3f1f 100644 --- a/SRC/clarfx.f +++ b/SRC/clarfx.f @@ -112,7 +112,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larfx * * ===================================================================== SUBROUTINE CLARFX( SIDE, M, N, V, TAU, C, LDC, WORK ) diff --git a/SRC/clarfy.f b/SRC/clarfy.f index 77292757b4..f01ba7c0e0 100644 --- a/SRC/clarfy.f +++ b/SRC/clarfy.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larfy * * ===================================================================== SUBROUTINE CLARFY( UPLO, N, V, INCV, TAU, C, LDC, WORK ) diff --git a/SRC/clargv.f b/SRC/clargv.f index 82a77b4422..47a46f72ee 100644 --- a/SRC/clargv.f +++ b/SRC/clargv.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup largv * *> \par Further Details: * ===================== diff --git a/SRC/clarnv.f b/SRC/clarnv.f index 6d71d2b538..efef3a7b3a 100644 --- a/SRC/clarnv.f +++ b/SRC/clarnv.f @@ -81,7 +81,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larnv * *> \par Further Details: * ===================== diff --git a/SRC/clarrv.f b/SRC/clarrv.f index 42f7107573..bb33150d3f 100644 --- a/SRC/clarrv.f +++ b/SRC/clarrv.f @@ -266,7 +266,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup larrv * *> \par Contributors: * ================== diff --git a/SRC/clarscl2.f b/SRC/clarscl2.f index f4e68523b2..3253b435ac 100644 --- a/SRC/clarscl2.f +++ b/SRC/clarscl2.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup larscl2 * * ===================================================================== SUBROUTINE CLARSCL2 ( M, N, D, X, LDX ) diff --git a/SRC/clartg.f90 b/SRC/clartg.f90 index 6231f85203..ffcf2b3e25 100644 --- a/SRC/clartg.f90 +++ b/SRC/clartg.f90 @@ -96,7 +96,7 @@ ! !> \date December 2021 ! -!> \ingroup OTHERauxiliary +!> \ingroup lartg ! !> \par Further Details: ! ===================== @@ -195,7 +195,7 @@ subroutine CLARTG( f, g, c, s, r ) f2 = ABSSQ( f ) g2 = ABSSQ( g ) h2 = f2 + g2 - ! safmin <= f2 <= h2 <= safmax + ! safmin <= f2 <= h2 <= safmax if( f2 >= h2 * safmin ) then ! safmin <= f2/h2 <= 1, and h2/f2 is finite c = sqrt( f2 / h2 ) @@ -251,7 +251,7 @@ subroutine CLARTG( f, g, c, s, r ) f2 = ABSSQ( fs ) h2 = f2 + g2 end if - ! safmin <= f2 <= h2 <= safmax + ! safmin <= f2 <= h2 <= safmax if( f2 >= h2 * safmin ) then ! safmin <= f2/h2 <= 1, and h2/f2 is finite c = sqrt( f2 / h2 ) diff --git a/SRC/clartv.f b/SRC/clartv.f index 08999bf36b..987d809879 100644 --- a/SRC/clartv.f +++ b/SRC/clartv.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lartv * * ===================================================================== SUBROUTINE CLARTV( N, X, INCX, Y, INCY, C, S, INCC ) diff --git a/SRC/clarz.f b/SRC/clarz.f index 0a40b40f50..65245cc8fb 100644 --- a/SRC/clarz.f +++ b/SRC/clarz.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup larz * *> \par Contributors: * ================== diff --git a/SRC/clarzb.f b/SRC/clarzb.f index 97d7b0e40c..83707b7636 100644 --- a/SRC/clarzb.f +++ b/SRC/clarzb.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup larzb * *> \par Contributors: * ================== diff --git a/SRC/clarzt.f b/SRC/clarzt.f index b21bc6f1ad..9ecf3d853a 100644 --- a/SRC/clarzt.f +++ b/SRC/clarzt.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup larzt * *> \par Contributors: * ================== diff --git a/SRC/clascl.f b/SRC/clascl.f index f9aace0bc4..e1c33d439e 100644 --- a/SRC/clascl.f +++ b/SRC/clascl.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lascl * * ===================================================================== SUBROUTINE CLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO ) diff --git a/SRC/clascl2.f b/SRC/clascl2.f index 882273b5e2..afcbef6b3d 100644 --- a/SRC/clascl2.f +++ b/SRC/clascl2.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup lascl2 * * ===================================================================== SUBROUTINE CLASCL2 ( M, N, D, X, LDX ) diff --git a/SRC/claset.f b/SRC/claset.f index d1a6779d34..4d7ac6d19a 100644 --- a/SRC/claset.f +++ b/SRC/claset.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laset * * ===================================================================== SUBROUTINE CLASET( UPLO, M, N, ALPHA, BETA, A, LDA ) diff --git a/SRC/clasr.f b/SRC/clasr.f index 71fc7521f7..fafb961901 100644 --- a/SRC/clasr.f +++ b/SRC/clasr.f @@ -193,7 +193,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lasr * * ===================================================================== SUBROUTINE CLASR( SIDE, PIVOT, DIRECT, M, N, C, S, A, LDA ) diff --git a/SRC/claswlq.f b/SRC/claswlq.f index 1a09b8305e..9e530fd11d 100644 --- a/SRC/claswlq.f +++ b/SRC/claswlq.f @@ -159,6 +159,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup laswlq +*> * ===================================================================== SUBROUTINE CLASWLQ( M, N, MB, NB, A, LDA, T, LDT, WORK, LWORK, $ INFO) diff --git a/SRC/claswp.f b/SRC/claswp.f index 60af6f664d..1fdc07186c 100644 --- a/SRC/claswp.f +++ b/SRC/claswp.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup laswp * *> \par Further Details: * ===================== diff --git a/SRC/clasyf.f b/SRC/clasyf.f index e6666cfed6..b9dc4d5635 100644 --- a/SRC/clasyf.f +++ b/SRC/clasyf.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup lahef * *> \par Contributors: * ================== diff --git a/SRC/clasyf_aa.f b/SRC/clasyf_aa.f index d79b06874e..47a0371819 100644 --- a/SRC/clasyf_aa.f +++ b/SRC/clasyf_aa.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup lahef_aa * * ===================================================================== SUBROUTINE CLASYF_AA( UPLO, J1, M, NB, A, LDA, IPIV, diff --git a/SRC/clasyf_rk.f b/SRC/clasyf_rk.f index 080a65a121..eb4bd1292b 100644 --- a/SRC/clasyf_rk.f +++ b/SRC/clasyf_rk.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup lahef_rk * *> \par Contributors: * ================== diff --git a/SRC/clasyf_rook.f b/SRC/clasyf_rook.f index 40e2cbe944..a5d31dd78a 100644 --- a/SRC/clasyf_rook.f +++ b/SRC/clasyf_rook.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup lahef_rook * *> \par Contributors: * ================== diff --git a/SRC/clatbs.f b/SRC/clatbs.f index 97abcadce1..1f217bc178 100644 --- a/SRC/clatbs.f +++ b/SRC/clatbs.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup latbs * *> \par Further Details: * ===================== diff --git a/SRC/clatdf.f b/SRC/clatdf.f index 1e7d71669a..d3ac536d95 100644 --- a/SRC/clatdf.f +++ b/SRC/clatdf.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup latdf * *> \par Further Details: * ===================== diff --git a/SRC/clatps.f b/SRC/clatps.f index 50af9f585c..9c49b5112f 100644 --- a/SRC/clatps.f +++ b/SRC/clatps.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup latps * *> \par Further Details: * ===================== diff --git a/SRC/clatrd.f b/SRC/clatrd.f index 6e9da3b27f..9f89f140ee 100644 --- a/SRC/clatrd.f +++ b/SRC/clatrd.f @@ -140,7 +140,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup latrd * *> \par Further Details: * ===================== diff --git a/SRC/clatrs.f b/SRC/clatrs.f index 91334b7066..cee1cb7586 100644 --- a/SRC/clatrs.f +++ b/SRC/clatrs.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup latrs * *> \par Further Details: * ===================== diff --git a/SRC/clatrs3.f b/SRC/clatrs3.f index 0502f6898b..d97e416adb 100644 --- a/SRC/clatrs3.f +++ b/SRC/clatrs3.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latrs3 *> \par Further Details: * ===================== * \verbatim diff --git a/SRC/clatrz.f b/SRC/clatrz.f index 677892011d..5354007641 100644 --- a/SRC/clatrz.f +++ b/SRC/clatrz.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup latrz * *> \par Contributors: * ================== diff --git a/SRC/clatsqr.f b/SRC/clatsqr.f index 377190081e..e8eb00d63d 100644 --- a/SRC/clatsqr.f +++ b/SRC/clatsqr.f @@ -161,6 +161,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup latsqr +*> * ===================================================================== SUBROUTINE CLATSQR( M, N, MB, NB, A, LDA, T, LDT, WORK, $ LWORK, INFO) diff --git a/SRC/claunhr_col_getrfnp.f b/SRC/claunhr_col_getrfnp.f index 96381ee26d..f571956dfc 100644 --- a/SRC/claunhr_col_getrfnp.f +++ b/SRC/claunhr_col_getrfnp.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup launhr_col_getrfnp * *> \par Contributors: * ================== diff --git a/SRC/claunhr_col_getrfnp2.f b/SRC/claunhr_col_getrfnp2.f index d3103fde90..eb5ffb71ac 100644 --- a/SRC/claunhr_col_getrfnp2.f +++ b/SRC/claunhr_col_getrfnp2.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup launhr_col_getrfnp2 * *> \par Contributors: * ================== diff --git a/SRC/clauu2.f b/SRC/clauu2.f index 240ec20c08..738ecaf717 100644 --- a/SRC/clauu2.f +++ b/SRC/clauu2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lauu2 * * ===================================================================== SUBROUTINE CLAUU2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/clauum.f b/SRC/clauum.f index 8b3cbc51dd..472cc7a72f 100644 --- a/SRC/clauum.f +++ b/SRC/clauum.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup lauum * * ===================================================================== SUBROUTINE CLAUUM( UPLO, N, A, LDA, INFO ) diff --git a/SRC/cpbcon.f b/SRC/cpbcon.f index df1a3bd1f7..66cbdd0694 100644 --- a/SRC/cpbcon.f +++ b/SRC/cpbcon.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pbcon * * ===================================================================== SUBROUTINE CPBCON( UPLO, N, KD, AB, LDAB, ANORM, RCOND, WORK, diff --git a/SRC/cpbequ.f b/SRC/cpbequ.f index fd91ea121b..7e93209e64 100644 --- a/SRC/cpbequ.f +++ b/SRC/cpbequ.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pbequ * * ===================================================================== SUBROUTINE CPBEQU( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, INFO ) diff --git a/SRC/cpbrfs.f b/SRC/cpbrfs.f index eb35e8fc0a..77786f204d 100644 --- a/SRC/cpbrfs.f +++ b/SRC/cpbrfs.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pbrfs * * ===================================================================== SUBROUTINE CPBRFS( UPLO, N, KD, NRHS, AB, LDAB, AFB, LDAFB, B, diff --git a/SRC/cpbstf.f b/SRC/cpbstf.f index 0452a91835..6b20f08fc8 100644 --- a/SRC/cpbstf.f +++ b/SRC/cpbstf.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pbstf * *> \par Further Details: * ===================== diff --git a/SRC/cpbsv.f b/SRC/cpbsv.f index 889bbde08c..b4a74d2dbb 100644 --- a/SRC/cpbsv.f +++ b/SRC/cpbsv.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup pbsv * *> \par Further Details: * ===================== diff --git a/SRC/cpbsvx.f b/SRC/cpbsvx.f index 975c877688..55e894f6e3 100644 --- a/SRC/cpbsvx.f +++ b/SRC/cpbsvx.f @@ -301,7 +301,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup pbsvx * *> \par Further Details: * ===================== diff --git a/SRC/cpbtf2.f b/SRC/cpbtf2.f index f5bc9b3a68..815d6fa952 100644 --- a/SRC/cpbtf2.f +++ b/SRC/cpbtf2.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pbtf2 * *> \par Further Details: * ===================== diff --git a/SRC/cpbtrf.f b/SRC/cpbtrf.f index af60780c8d..b75c480341 100644 --- a/SRC/cpbtrf.f +++ b/SRC/cpbtrf.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pbtrf * *> \par Further Details: * ===================== diff --git a/SRC/cpbtrs.f b/SRC/cpbtrs.f index 62874f688a..fc462d5f2d 100644 --- a/SRC/cpbtrs.f +++ b/SRC/cpbtrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pbtrs * * ===================================================================== SUBROUTINE CPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) diff --git a/SRC/cpftrf.f b/SRC/cpftrf.f index 12799c6f71..2de002d671 100644 --- a/SRC/cpftrf.f +++ b/SRC/cpftrf.f @@ -204,7 +204,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pftrf * * ===================================================================== SUBROUTINE CPFTRF( TRANSR, UPLO, N, A, INFO ) diff --git a/SRC/cpftri.f b/SRC/cpftri.f index 1f783a6fd1..b581a31ab2 100644 --- a/SRC/cpftri.f +++ b/SRC/cpftri.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pftri * *> \par Further Details: * ===================== diff --git a/SRC/cpftrs.f b/SRC/cpftrs.f index cd9a2434ca..91aaf26274 100644 --- a/SRC/cpftrs.f +++ b/SRC/cpftrs.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pftrs * *> \par Further Details: * ===================== diff --git a/SRC/cpocon.f b/SRC/cpocon.f index 790d61d749..f392fc5bfa 100644 --- a/SRC/cpocon.f +++ b/SRC/cpocon.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup pocon * * ===================================================================== SUBROUTINE CPOCON( UPLO, N, A, LDA, ANORM, RCOND, WORK, RWORK, diff --git a/SRC/cpoequ.f b/SRC/cpoequ.f index adc484d96f..7ca95f2d2b 100644 --- a/SRC/cpoequ.f +++ b/SRC/cpoequ.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup poequ * * ===================================================================== SUBROUTINE CPOEQU( N, A, LDA, S, SCOND, AMAX, INFO ) diff --git a/SRC/cpoequb.f b/SRC/cpoequb.f index 22f5387b50..198671200b 100644 --- a/SRC/cpoequb.f +++ b/SRC/cpoequb.f @@ -112,7 +112,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup poequb * * ===================================================================== SUBROUTINE CPOEQUB( N, A, LDA, S, SCOND, AMAX, INFO ) diff --git a/SRC/cporfs.f b/SRC/cporfs.f index 8e12d79738..2485250ee8 100644 --- a/SRC/cporfs.f +++ b/SRC/cporfs.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup porfs * * ===================================================================== SUBROUTINE CPORFS( UPLO, N, NRHS, A, LDA, AF, LDAF, B, LDB, X, diff --git a/SRC/cporfsx.f b/SRC/cporfsx.f index c41ba270eb..f285cb0f80 100644 --- a/SRC/cporfsx.f +++ b/SRC/cporfsx.f @@ -383,7 +383,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup porfsx * * ===================================================================== SUBROUTINE CPORFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, S, B, diff --git a/SRC/cposv.f b/SRC/cposv.f index ea6fc37db3..bf43c7f2e9 100644 --- a/SRC/cposv.f +++ b/SRC/cposv.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOsolve +*> \ingroup posv * * ===================================================================== SUBROUTINE CPOSV( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) diff --git a/SRC/cposvx.f b/SRC/cposvx.f index 322a26447a..654dd730b9 100644 --- a/SRC/cposvx.f +++ b/SRC/cposvx.f @@ -297,7 +297,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOsolve +*> \ingroup posvx * * ===================================================================== SUBROUTINE CPOSVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, EQUED, diff --git a/SRC/cposvxx.f b/SRC/cposvxx.f index c40a2d8561..d3d78f3697 100644 --- a/SRC/cposvxx.f +++ b/SRC/cposvxx.f @@ -486,7 +486,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOsolve +*> \ingroup posvxx * * ===================================================================== SUBROUTINE CPOSVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, EQUED, diff --git a/SRC/cpotf2.f b/SRC/cpotf2.f index d849889493..96bb82249a 100644 --- a/SRC/cpotf2.f +++ b/SRC/cpotf2.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup potf2 * * ===================================================================== SUBROUTINE CPOTF2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/cpotrf.f b/SRC/cpotrf.f index e2b120a496..83307b029d 100644 --- a/SRC/cpotrf.f +++ b/SRC/cpotrf.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup potrf * * ===================================================================== SUBROUTINE CPOTRF( UPLO, N, A, LDA, INFO ) diff --git a/SRC/cpotrf2.f b/SRC/cpotrf2.f index ea2e4ca988..fa016f13c1 100644 --- a/SRC/cpotrf2.f +++ b/SRC/cpotrf2.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup potrf2 * * ===================================================================== RECURSIVE SUBROUTINE CPOTRF2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/cpotri.f b/SRC/cpotri.f index bf05c91be2..70128bda0b 100644 --- a/SRC/cpotri.f +++ b/SRC/cpotri.f @@ -88,7 +88,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup potri * * ===================================================================== SUBROUTINE CPOTRI( UPLO, N, A, LDA, INFO ) diff --git a/SRC/cpotrs.f b/SRC/cpotrs.f index bb08ca6878..046e336f85 100644 --- a/SRC/cpotrs.f +++ b/SRC/cpotrs.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPOcomputational +*> \ingroup potrs * * ===================================================================== SUBROUTINE CPOTRS( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) diff --git a/SRC/cppcon.f b/SRC/cppcon.f index 84e3b79779..0dedb7bd1e 100644 --- a/SRC/cppcon.f +++ b/SRC/cppcon.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ppcon * * ===================================================================== SUBROUTINE CPPCON( UPLO, N, AP, ANORM, RCOND, WORK, RWORK, INFO ) diff --git a/SRC/cppequ.f b/SRC/cppequ.f index 223167338c..40673b9b01 100644 --- a/SRC/cppequ.f +++ b/SRC/cppequ.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ppequ * * ===================================================================== SUBROUTINE CPPEQU( UPLO, N, AP, S, SCOND, AMAX, INFO ) diff --git a/SRC/cpprfs.f b/SRC/cpprfs.f index 6c26b0c130..a163d996e2 100644 --- a/SRC/cpprfs.f +++ b/SRC/cpprfs.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pprfs * * ===================================================================== SUBROUTINE CPPRFS( UPLO, N, NRHS, AP, AFP, B, LDB, X, LDX, FERR, diff --git a/SRC/cppsv.f b/SRC/cppsv.f index a8fd660c45..2b6dfddc22 100644 --- a/SRC/cppsv.f +++ b/SRC/cppsv.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup ppsv * *> \par Further Details: * ===================== diff --git a/SRC/cppsvx.f b/SRC/cppsvx.f index 2ef02100fa..e3bc98b21c 100644 --- a/SRC/cppsvx.f +++ b/SRC/cppsvx.f @@ -283,7 +283,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup ppsvx * *> \par Further Details: * ===================== diff --git a/SRC/cpptrf.f b/SRC/cpptrf.f index e36f834cb5..5e6f94fe76 100644 --- a/SRC/cpptrf.f +++ b/SRC/cpptrf.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pptrf * *> \par Further Details: * ===================== diff --git a/SRC/cpptri.f b/SRC/cpptri.f index 3f24d20bd2..174a0f8ed2 100644 --- a/SRC/cpptri.f +++ b/SRC/cpptri.f @@ -86,7 +86,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pptri * * ===================================================================== SUBROUTINE CPPTRI( UPLO, N, AP, INFO ) diff --git a/SRC/cpptrs.f b/SRC/cpptrs.f index 08bba1acc0..8ad9f6af36 100644 --- a/SRC/cpptrs.f +++ b/SRC/cpptrs.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pptrs * * ===================================================================== SUBROUTINE CPPTRS( UPLO, N, NRHS, AP, B, LDB, INFO ) diff --git a/SRC/cpstf2.f b/SRC/cpstf2.f index 001042e1ef..48eeed5a0f 100644 --- a/SRC/cpstf2.f +++ b/SRC/cpstf2.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pstf2 * * ===================================================================== SUBROUTINE CPSTF2( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) diff --git a/SRC/cpstrf.f b/SRC/cpstrf.f index 119b954f39..564a273d1d 100644 --- a/SRC/cpstrf.f +++ b/SRC/cpstrf.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup pstrf * * ===================================================================== SUBROUTINE CPSTRF( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) diff --git a/SRC/cptcon.f b/SRC/cptcon.f index 67d247dffc..671814fd4d 100644 --- a/SRC/cptcon.f +++ b/SRC/cptcon.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPTcomputational +*> \ingroup ptcon * *> \par Further Details: * ===================== diff --git a/SRC/cpteqr.f b/SRC/cpteqr.f index fc9c44908f..2dc9547074 100644 --- a/SRC/cpteqr.f +++ b/SRC/cpteqr.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPTcomputational +*> \ingroup pteqr * * ===================================================================== SUBROUTINE CPTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/cptrfs.f b/SRC/cptrfs.f index 1ef289dcce..dca1ae634e 100644 --- a/SRC/cptrfs.f +++ b/SRC/cptrfs.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPTcomputational +*> \ingroup ptrfs * * ===================================================================== SUBROUTINE CPTRFS( UPLO, N, NRHS, D, E, DF, EF, B, LDB, X, LDX, diff --git a/SRC/cptsv.f b/SRC/cptsv.f index 4c16f6a0ac..020db58cce 100644 --- a/SRC/cptsv.f +++ b/SRC/cptsv.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPTsolve +*> \ingroup ptsv * * ===================================================================== SUBROUTINE CPTSV( N, NRHS, D, E, B, LDB, INFO ) diff --git a/SRC/cptsvx.f b/SRC/cptsvx.f index 6f7d8cf5b5..3db09a3199 100644 --- a/SRC/cptsvx.f +++ b/SRC/cptsvx.f @@ -226,7 +226,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPTsolve +*> \ingroup ptsvx * * ===================================================================== SUBROUTINE CPTSVX( FACT, N, NRHS, D, E, DF, EF, B, LDB, X, LDX, diff --git a/SRC/cpttrf.f b/SRC/cpttrf.f index 111343b784..20a321f0a0 100644 --- a/SRC/cpttrf.f +++ b/SRC/cpttrf.f @@ -85,7 +85,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPTcomputational +*> \ingroup pttrf * * ===================================================================== SUBROUTINE CPTTRF( N, D, E, INFO ) diff --git a/SRC/cpttrs.f b/SRC/cpttrs.f index 636a8de929..d857a4b456 100644 --- a/SRC/cpttrs.f +++ b/SRC/cpttrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPTcomputational +*> \ingroup pttrs * * ===================================================================== SUBROUTINE CPTTRS( UPLO, N, NRHS, D, E, B, LDB, INFO ) diff --git a/SRC/cptts2.f b/SRC/cptts2.f index 15ea7ede86..107d1c82dc 100644 --- a/SRC/cptts2.f +++ b/SRC/cptts2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexPTcomputational +*> \ingroup ptts2 * * ===================================================================== SUBROUTINE CPTTS2( IUPLO, N, NRHS, D, E, B, LDB ) diff --git a/SRC/crot.f b/SRC/crot.f index 6dc771506f..9c74e76c84 100644 --- a/SRC/crot.f +++ b/SRC/crot.f @@ -35,7 +35,7 @@ *> *> \verbatim *> -*> CROT applies a plane rotation, where the cos (C) is real and the +*> CROT applies a plane rotation, where the cos (C) is real and the *> sin (S) is complex, and the vectors CX and CY are complex. *> \endverbatim * @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup rot * * ===================================================================== SUBROUTINE CROT( N, CX, INCX, CY, INCY, C, S ) diff --git a/SRC/cspcon.f b/SRC/cspcon.f index 75b33da6a4..d002530010 100644 --- a/SRC/cspcon.f +++ b/SRC/cspcon.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hpcon * * ===================================================================== SUBROUTINE CSPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, INFO ) diff --git a/SRC/cspmv.f b/SRC/cspmv.f index 6b8c9c8c91..3d2661974a 100644 --- a/SRC/cspmv.f +++ b/SRC/cspmv.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup hpmv * * ===================================================================== SUBROUTINE CSPMV( UPLO, N, ALPHA, AP, X, INCX, BETA, Y, INCY ) diff --git a/SRC/cspr.f b/SRC/cspr.f index bc23b7c489..d4fd3fc839 100644 --- a/SRC/cspr.f +++ b/SRC/cspr.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup hpr * * ===================================================================== SUBROUTINE CSPR( UPLO, N, ALPHA, X, INCX, AP ) diff --git a/SRC/csprfs.f b/SRC/csprfs.f index e52aaa5f3a..862c8a347a 100644 --- a/SRC/csprfs.f +++ b/SRC/csprfs.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hprfs * * ===================================================================== SUBROUTINE CSPRFS( UPLO, N, NRHS, AP, AFP, IPIV, B, LDB, X, LDX, diff --git a/SRC/cspsv.f b/SRC/cspsv.f index bfb5aa21c6..ac6f9fa895 100644 --- a/SRC/cspsv.f +++ b/SRC/cspsv.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup hpsv * *> \par Further Details: * ===================== diff --git a/SRC/cspsvx.f b/SRC/cspsvx.f index 5de199340a..86e3bc62b3 100644 --- a/SRC/cspsvx.f +++ b/SRC/cspsvx.f @@ -249,7 +249,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERsolve +*> \ingroup hpsvx * *> \par Further Details: * ===================== diff --git a/SRC/csptrf.f b/SRC/csptrf.f index 702ed0c518..f559b8a7df 100644 --- a/SRC/csptrf.f +++ b/SRC/csptrf.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hptrf * *> \par Further Details: * ===================== diff --git a/SRC/csptri.f b/SRC/csptri.f index 8ae1d1daa2..487daca3d3 100644 --- a/SRC/csptri.f +++ b/SRC/csptri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hptri * * ===================================================================== SUBROUTINE CSPTRI( UPLO, N, AP, IPIV, WORK, INFO ) diff --git a/SRC/csptrs.f b/SRC/csptrs.f index 6434c473ad..592cb3be92 100644 --- a/SRC/csptrs.f +++ b/SRC/csptrs.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup hptrs * * ===================================================================== SUBROUTINE CSPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) diff --git a/SRC/csrscl.f b/SRC/csrscl.f index 157447777f..c26278a84a 100644 --- a/SRC/csrscl.f +++ b/SRC/csrscl.f @@ -77,7 +77,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup rscl * * ===================================================================== SUBROUTINE CSRSCL( N, SA, SX, INCX ) diff --git a/SRC/cstedc.f b/SRC/cstedc.f index 77a4ec3be4..0644e0799a 100644 --- a/SRC/cstedc.f +++ b/SRC/cstedc.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup stedc * *> \par Contributors: * ================== diff --git a/SRC/cstegr.f b/SRC/cstegr.f index a162d50768..718161efe7 100644 --- a/SRC/cstegr.f +++ b/SRC/cstegr.f @@ -249,7 +249,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup stegr * *> \par Contributors: * ================== diff --git a/SRC/cstein.f b/SRC/cstein.f index 5609efb014..8e272eaf17 100644 --- a/SRC/cstein.f +++ b/SRC/cstein.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup stein * * ===================================================================== SUBROUTINE CSTEIN( N, D, E, M, W, IBLOCK, ISPLIT, Z, LDZ, WORK, diff --git a/SRC/cstemr.f b/SRC/cstemr.f index d49684db35..ced5c78b07 100644 --- a/SRC/cstemr.f +++ b/SRC/cstemr.f @@ -320,7 +320,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup stemr * *> \par Contributors: * ================== diff --git a/SRC/csteqr.f b/SRC/csteqr.f index 4044e77eda..7d5b4fbd42 100644 --- a/SRC/csteqr.f +++ b/SRC/csteqr.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup steqr * * ===================================================================== SUBROUTINE CSTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/csycon.f b/SRC/csycon.f index f4fb33a377..69a0a2b7d5 100644 --- a/SRC/csycon.f +++ b/SRC/csycon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hecon * * ===================================================================== SUBROUTINE CSYCON( UPLO, N, A, LDA, IPIV, ANORM, RCOND, WORK, diff --git a/SRC/csycon_3.f b/SRC/csycon_3.f index 7fe915e576..75005d008d 100644 --- a/SRC/csycon_3.f +++ b/SRC/csycon_3.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hecon_3 * *> \par Contributors: * ================== diff --git a/SRC/csycon_rook.f b/SRC/csycon_rook.f index f01659c779..7996a513d2 100644 --- a/SRC/csycon_rook.f +++ b/SRC/csycon_rook.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hecon_rook * *> \par Contributors: * ================== diff --git a/SRC/csyconv.f b/SRC/csyconv.f index 79a1b0c114..974d12d84a 100644 --- a/SRC/csyconv.f +++ b/SRC/csyconv.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup syconv * * ===================================================================== SUBROUTINE CSYCONV( UPLO, WAY, N, A, LDA, IPIV, E, INFO ) diff --git a/SRC/csyconvf.f b/SRC/csyconvf.f index febbc411cd..c977cfa8fb 100644 --- a/SRC/csyconvf.f +++ b/SRC/csyconvf.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup syconvf * *> \par Contributors: * ================== diff --git a/SRC/csyconvf_rook.f b/SRC/csyconvf_rook.f index 0da34e0fa8..6ee7981707 100644 --- a/SRC/csyconvf_rook.f +++ b/SRC/csyconvf_rook.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup syconvf_rook * *> \par Contributors: * ================== diff --git a/SRC/csyequb.f b/SRC/csyequb.f index 185501d04f..8c8c76eb21 100644 --- a/SRC/csyequb.f +++ b/SRC/csyequb.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup heequb * *> \par References: * ================ diff --git a/SRC/csymv.f b/SRC/csymv.f index e54ea2289f..a7ff3a1f0e 100644 --- a/SRC/csymv.f +++ b/SRC/csymv.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYauxiliary +*> \ingroup hemv * * ===================================================================== SUBROUTINE CSYMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY ) diff --git a/SRC/csyr.f b/SRC/csyr.f index a96f0053ce..de72dd53c2 100644 --- a/SRC/csyr.f +++ b/SRC/csyr.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYauxiliary +*> \ingroup her * * ===================================================================== SUBROUTINE CSYR( UPLO, N, ALPHA, X, INCX, A, LDA ) diff --git a/SRC/csyrfs.f b/SRC/csyrfs.f index 382b1ae297..b800fcfc45 100644 --- a/SRC/csyrfs.f +++ b/SRC/csyrfs.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup herfs * * ===================================================================== SUBROUTINE CSYRFS( UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/csyrfsx.f b/SRC/csyrfsx.f index 040d0253c9..c0d3f4e1e0 100644 --- a/SRC/csyrfsx.f +++ b/SRC/csyrfsx.f @@ -392,7 +392,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup herfsx * * ===================================================================== SUBROUTINE CSYRFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/csysv.f b/SRC/csysv.f index 4ddabf62fe..60eee9287d 100644 --- a/SRC/csysv.f +++ b/SRC/csysv.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYsolve +*> \ingroup hesv * * ===================================================================== SUBROUTINE CSYSV( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/csysv_aa.f b/SRC/csysv_aa.f index 8548c27893..c17036db89 100644 --- a/SRC/csysv_aa.f +++ b/SRC/csysv_aa.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYsolve +*> \ingroup hesv_aa * * ===================================================================== SUBROUTINE CSYSV_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/csysv_aa_2stage.f b/SRC/csysv_aa_2stage.f index 22227505cc..a7d931fcc9 100644 --- a/SRC/csysv_aa_2stage.f +++ b/SRC/csysv_aa_2stage.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hesv_aa_2stage * * ===================================================================== SUBROUTINE CSYSV_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/csysv_rk.f b/SRC/csysv_rk.f index ef5334dcdf..0e95e0bd0e 100644 --- a/SRC/csysv_rk.f +++ b/SRC/csysv_rk.f @@ -205,7 +205,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYsolve +*> \ingroup hesv_rk * *> \par Contributors: * ================== diff --git a/SRC/csysv_rook.f b/SRC/csysv_rook.f index aad594e21f..77a31db820 100644 --- a/SRC/csysv_rook.f +++ b/SRC/csysv_rook.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYsolve +*> \ingroup hesv_rook * *> \par Contributors: * ================== diff --git a/SRC/csysvx.f b/SRC/csysvx.f index 2afa082a9f..1b99afe857 100644 --- a/SRC/csysvx.f +++ b/SRC/csysvx.f @@ -276,7 +276,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYsolve +*> \ingroup hesvx * * ===================================================================== SUBROUTINE CSYSVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, diff --git a/SRC/csysvxx.f b/SRC/csysvxx.f index 19d07411ca..72e11479b9 100644 --- a/SRC/csysvxx.f +++ b/SRC/csysvxx.f @@ -499,7 +499,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYsolve +*> \ingroup hesvxx * * ===================================================================== SUBROUTINE CSYSVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/csyswapr.f b/SRC/csyswapr.f index 04004f3c11..d8c547bead 100644 --- a/SRC/csyswapr.f +++ b/SRC/csyswapr.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYauxiliary +*> \ingroup heswapr * * ===================================================================== SUBROUTINE CSYSWAPR( UPLO, N, A, LDA, I1, I2) diff --git a/SRC/csytf2.f b/SRC/csytf2.f index 0bee443189..b7f219b44d 100644 --- a/SRC/csytf2.f +++ b/SRC/csytf2.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetf2 * *> \par Further Details: * ===================== diff --git a/SRC/csytf2_rk.f b/SRC/csytf2_rk.f index 12d6d5d8f9..36b3fb8439 100644 --- a/SRC/csytf2_rk.f +++ b/SRC/csytf2_rk.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetf2_rk * *> \par Further Details: * ===================== diff --git a/SRC/csytf2_rook.f b/SRC/csytf2_rook.f index 5ae4c98036..b96523df31 100644 --- a/SRC/csytf2_rook.f +++ b/SRC/csytf2_rook.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetf2_rook * *> \par Further Details: * ===================== diff --git a/SRC/csytrf.f b/SRC/csytrf.f index ebf228f188..12974d90ea 100644 --- a/SRC/csytrf.f +++ b/SRC/csytrf.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrf * *> \par Further Details: * ===================== diff --git a/SRC/csytrf_aa.f b/SRC/csytrf_aa.f index c5467bf015..ca6989301e 100644 --- a/SRC/csytrf_aa.f +++ b/SRC/csytrf_aa.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrf_aa * * ===================================================================== SUBROUTINE CSYTRF_AA( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO) diff --git a/SRC/csytrf_aa_2stage.f b/SRC/csytrf_aa_2stage.f index b21df8cd31..3b7ad4813c 100644 --- a/SRC/csytrf_aa_2stage.f +++ b/SRC/csytrf_aa_2stage.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrf_aa_2stage * * ===================================================================== SUBROUTINE CSYTRF_AA_2STAGE( UPLO, N, A, LDA, TB, LTB, IPIV, diff --git a/SRC/csytrf_rk.f b/SRC/csytrf_rk.f index 9c2b7182f2..26f0c0b4ee 100644 --- a/SRC/csytrf_rk.f +++ b/SRC/csytrf_rk.f @@ -229,7 +229,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrf_rk * *> \par Further Details: * ===================== diff --git a/SRC/csytrf_rook.f b/SRC/csytrf_rook.f index ce7c1e5866..7e917ae182 100644 --- a/SRC/csytrf_rook.f +++ b/SRC/csytrf_rook.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrf_rook * *> \par Further Details: * ===================== diff --git a/SRC/csytri.f b/SRC/csytri.f index 3f3665338a..4739a3c119 100644 --- a/SRC/csytri.f +++ b/SRC/csytri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetri * * ===================================================================== SUBROUTINE CSYTRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) diff --git a/SRC/csytri2.f b/SRC/csytri2.f index 33c71060ea..3f11fdb62e 100644 --- a/SRC/csytri2.f +++ b/SRC/csytri2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetri2 * * ===================================================================== SUBROUTINE CSYTRI2( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/csytri2x.f b/SRC/csytri2x.f index 306e666e0e..0692c75f06 100644 --- a/SRC/csytri2x.f +++ b/SRC/csytri2x.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetri2x * * ===================================================================== SUBROUTINE CSYTRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) diff --git a/SRC/csytri_3.f b/SRC/csytri_3.f index 279f62853e..0268812ee1 100644 --- a/SRC/csytri_3.f +++ b/SRC/csytri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetri_3 * *> \par Contributors: * ================== diff --git a/SRC/csytri_3x.f b/SRC/csytri_3x.f index 138fe67c83..1a57f3f0de 100644 --- a/SRC/csytri_3x.f +++ b/SRC/csytri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetri_3x * *> \par Contributors: * ================== diff --git a/SRC/csytri_rook.f b/SRC/csytri_rook.f index 9fba543801..1301a269ec 100644 --- a/SRC/csytri_rook.f +++ b/SRC/csytri_rook.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetri_rook * *> \par Contributors: * ================== diff --git a/SRC/csytrs.f b/SRC/csytrs.f index c872fda946..6552e7a501 100644 --- a/SRC/csytrs.f +++ b/SRC/csytrs.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrs * * ===================================================================== SUBROUTINE CSYTRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/csytrs2.f b/SRC/csytrs2.f index a3e7f4144c..69b8f41d5f 100644 --- a/SRC/csytrs2.f +++ b/SRC/csytrs2.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrs2 * * ===================================================================== SUBROUTINE CSYTRS2( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/csytrs_3.f b/SRC/csytrs_3.f index 48b12d1cd0..1111863e6a 100644 --- a/SRC/csytrs_3.f +++ b/SRC/csytrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrs_3 * *> \par Contributors: * ================== diff --git a/SRC/csytrs_aa.f b/SRC/csytrs_aa.f index 1f6ea40af5..6ac9292028 100644 --- a/SRC/csytrs_aa.f +++ b/SRC/csytrs_aa.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrs_aa * * ===================================================================== SUBROUTINE CSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/csytrs_aa_2stage.f b/SRC/csytrs_aa_2stage.f index add9f42756..0ffeffdc2c 100644 --- a/SRC/csytrs_aa_2stage.f +++ b/SRC/csytrs_aa_2stage.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrs_aa_2stage * * ===================================================================== SUBROUTINE CSYTRS_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/csytrs_rook.f b/SRC/csytrs_rook.f index edc2248f26..280ec031a2 100644 --- a/SRC/csytrs_rook.f +++ b/SRC/csytrs_rook.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup hetrs_rook * *> \par Contributors: * ================== diff --git a/SRC/ctbcon.f b/SRC/ctbcon.f index 4943011eb2..796bc0571f 100644 --- a/SRC/ctbcon.f +++ b/SRC/ctbcon.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tbcon * * ===================================================================== SUBROUTINE CTBCON( NORM, UPLO, DIAG, N, KD, AB, LDAB, RCOND, WORK, diff --git a/SRC/ctbrfs.f b/SRC/ctbrfs.f index cfa2107e97..d60c07d8bc 100644 --- a/SRC/ctbrfs.f +++ b/SRC/ctbrfs.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tbrfs * * ===================================================================== SUBROUTINE CTBRFS( UPLO, TRANS, DIAG, N, KD, NRHS, AB, LDAB, B, diff --git a/SRC/ctbtrs.f b/SRC/ctbtrs.f index 1e0499765a..576353ce49 100644 --- a/SRC/ctbtrs.f +++ b/SRC/ctbtrs.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tbtrs * * ===================================================================== SUBROUTINE CTBTRS( UPLO, TRANS, DIAG, N, KD, NRHS, AB, LDAB, B, diff --git a/SRC/ctfsm.f b/SRC/ctfsm.f index 7ea2c1006d..a1e2431090 100644 --- a/SRC/ctfsm.f +++ b/SRC/ctfsm.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tfsm * *> \par Further Details: * ===================== diff --git a/SRC/ctftri.f b/SRC/ctftri.f index faf647b986..c27c4b3f42 100644 --- a/SRC/ctftri.f +++ b/SRC/ctftri.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tftri * *> \par Further Details: * ===================== diff --git a/SRC/ctfttp.f b/SRC/ctfttp.f index 4da1aa1842..4254cc7cf0 100644 --- a/SRC/ctfttp.f +++ b/SRC/ctfttp.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tfttp * *> \par Further Details: * ===================== diff --git a/SRC/ctfttr.f b/SRC/ctfttr.f index 2b1ab39345..13bfd770b8 100644 --- a/SRC/ctfttr.f +++ b/SRC/ctfttr.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tfttr * *> \par Further Details: * ===================== diff --git a/SRC/ctgevc.f b/SRC/ctgevc.f index 22144f259d..e885a29d85 100644 --- a/SRC/ctgevc.f +++ b/SRC/ctgevc.f @@ -211,7 +211,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup tgevc * * ===================================================================== SUBROUTINE CTGEVC( SIDE, HOWMNY, SELECT, N, S, LDS, P, LDP, VL, diff --git a/SRC/ctgex2.f b/SRC/ctgex2.f index c519a597d3..f7d4e28f15 100644 --- a/SRC/ctgex2.f +++ b/SRC/ctgex2.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEauxiliary +*> \ingroup tgex2 * *> \par Further Details: * ===================== diff --git a/SRC/ctgexc.f b/SRC/ctgexc.f index f50f8be3f6..109044d36f 100644 --- a/SRC/ctgexc.f +++ b/SRC/ctgexc.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGEcomputational +*> \ingroup tgexc * *> \par Contributors: * ================== diff --git a/SRC/ctgsen.f b/SRC/ctgsen.f index ffd6380996..f6ec135f36 100644 --- a/SRC/ctgsen.f +++ b/SRC/ctgsen.f @@ -290,7 +290,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tgsen * *> \par Further Details: * ===================== diff --git a/SRC/ctgsja.f b/SRC/ctgsja.f index 22725e86ce..ded801a813 100644 --- a/SRC/ctgsja.f +++ b/SRC/ctgsja.f @@ -351,7 +351,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tgsja * *> \par Further Details: * ===================== diff --git a/SRC/ctgsna.f b/SRC/ctgsna.f index c1ca0aee54..7418045ca5 100644 --- a/SRC/ctgsna.f +++ b/SRC/ctgsna.f @@ -213,7 +213,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tgsna * *> \par Further Details: * ===================== diff --git a/SRC/ctgsy2.f b/SRC/ctgsy2.f index 2840af74cb..ed67bf2f9b 100644 --- a/SRC/ctgsy2.f +++ b/SRC/ctgsy2.f @@ -244,7 +244,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYauxiliary +*> \ingroup tgsy2 * *> \par Contributors: * ================== diff --git a/SRC/ctgsyl.f b/SRC/ctgsyl.f index ae14371254..678cdf302e 100644 --- a/SRC/ctgsyl.f +++ b/SRC/ctgsyl.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup tgsyl * *> \par Contributors: * ================== diff --git a/SRC/ctpcon.f b/SRC/ctpcon.f index 44ae10d7e9..6d2b541ee4 100644 --- a/SRC/ctpcon.f +++ b/SRC/ctpcon.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tpcon * * ===================================================================== SUBROUTINE CTPCON( NORM, UPLO, DIAG, N, AP, RCOND, WORK, RWORK, diff --git a/SRC/ctplqt.f b/SRC/ctplqt.f index 01263a4e1b..a9f188526a 100644 --- a/SRC/ctplqt.f +++ b/SRC/ctplqt.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tplqt * *> \par Further Details: * ===================== diff --git a/SRC/ctplqt2.f b/SRC/ctplqt2.f index bb455fefeb..e299fa53ea 100644 --- a/SRC/ctplqt2.f +++ b/SRC/ctplqt2.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tplqt2 * *> \par Further Details: * ===================== diff --git a/SRC/ctpmlqt.f b/SRC/ctpmlqt.f index 606c1f5db2..e1e9edea2f 100644 --- a/SRC/ctpmlqt.f +++ b/SRC/ctpmlqt.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpmlqt * *> \par Further Details: * ===================== diff --git a/SRC/ctpmqrt.f b/SRC/ctpmqrt.f index 75ee6c0ae5..de73fd46e0 100644 --- a/SRC/ctpmqrt.f +++ b/SRC/ctpmqrt.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tpmqrt * *> \par Further Details: * ===================== diff --git a/SRC/ctpqrt.f b/SRC/ctpqrt.f index 9abd06e8bf..f20168eebd 100644 --- a/SRC/ctpqrt.f +++ b/SRC/ctpqrt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tpqrt * *> \par Further Details: * ===================== diff --git a/SRC/ctpqrt2.f b/SRC/ctpqrt2.f index 3cd75da356..581f2584f9 100644 --- a/SRC/ctpqrt2.f +++ b/SRC/ctpqrt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tpqrt2 * *> \par Further Details: * ===================== diff --git a/SRC/ctprfb.f b/SRC/ctprfb.f index 6cd5f05bd7..bb7798a30b 100644 --- a/SRC/ctprfb.f +++ b/SRC/ctprfb.f @@ -194,7 +194,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup tprfb * *> \par Further Details: * ===================== diff --git a/SRC/ctprfs.f b/SRC/ctprfs.f index 97fabc66ac..b7bb1ea9fb 100644 --- a/SRC/ctprfs.f +++ b/SRC/ctprfs.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tprfs * * ===================================================================== SUBROUTINE CTPRFS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, X, LDX, diff --git a/SRC/ctptri.f b/SRC/ctptri.f index e3f0d7d1b0..928104684c 100644 --- a/SRC/ctptri.f +++ b/SRC/ctptri.f @@ -91,7 +91,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tptri * *> \par Further Details: * ===================== diff --git a/SRC/ctptrs.f b/SRC/ctptrs.f index a3f7687bd2..515a205775 100644 --- a/SRC/ctptrs.f +++ b/SRC/ctptrs.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tptrs * * ===================================================================== SUBROUTINE CTPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO ) diff --git a/SRC/ctpttf.f b/SRC/ctpttf.f index af7e8961bc..a1431a6093 100644 --- a/SRC/ctpttf.f +++ b/SRC/ctpttf.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tpttf * *> \par Further Details: * ===================== diff --git a/SRC/ctpttr.f b/SRC/ctpttr.f index 0b9c498a04..628f7f246f 100644 --- a/SRC/ctpttr.f +++ b/SRC/ctpttr.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tpttr * * ===================================================================== SUBROUTINE CTPTTR( UPLO, N, AP, A, LDA, INFO ) diff --git a/SRC/ctrcon.f b/SRC/ctrcon.f index a14748f41c..1aa19c2a2d 100644 --- a/SRC/ctrcon.f +++ b/SRC/ctrcon.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trcon * * ===================================================================== SUBROUTINE CTRCON( NORM, UPLO, DIAG, N, A, LDA, RCOND, WORK, diff --git a/SRC/ctrevc.f b/SRC/ctrevc.f index 1cb3f67e73..7ea2d00d4a 100644 --- a/SRC/ctrevc.f +++ b/SRC/ctrevc.f @@ -196,7 +196,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trevc * *> \par Further Details: * ===================== diff --git a/SRC/ctrevc3.f b/SRC/ctrevc3.f index 43366d35b0..3820631316 100644 --- a/SRC/ctrevc3.f +++ b/SRC/ctrevc3.f @@ -222,7 +222,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trevc3 * *> \par Further Details: * ===================== diff --git a/SRC/ctrexc.f b/SRC/ctrexc.f index 2bc0348fb0..f71cd5070b 100644 --- a/SRC/ctrexc.f +++ b/SRC/ctrexc.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trexc * * ===================================================================== SUBROUTINE CTREXC( COMPQ, N, T, LDT, Q, LDQ, IFST, ILST, INFO ) diff --git a/SRC/ctrrfs.f b/SRC/ctrrfs.f index 40c3cdde0b..2ff09a6f15 100644 --- a/SRC/ctrrfs.f +++ b/SRC/ctrrfs.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trrfs * * ===================================================================== SUBROUTINE CTRRFS( UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, X, diff --git a/SRC/ctrsen.f b/SRC/ctrsen.f index d93b97be6c..02d27cfcc8 100644 --- a/SRC/ctrsen.f +++ b/SRC/ctrsen.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trsen * *> \par Further Details: * ===================== diff --git a/SRC/ctrsna.f b/SRC/ctrsna.f index 4d64aa27c8..270bec6d70 100644 --- a/SRC/ctrsna.f +++ b/SRC/ctrsna.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trsna * *> \par Further Details: * ===================== diff --git a/SRC/ctrsyl.f b/SRC/ctrsyl.f index 646bfe1eea..be52552b5f 100644 --- a/SRC/ctrsyl.f +++ b/SRC/ctrsyl.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexSYcomputational +*> \ingroup trsyl * * ===================================================================== SUBROUTINE CTRSYL( TRANA, TRANB, ISGN, M, N, A, LDA, B, LDB, C, diff --git a/SRC/ctrsyl3.f b/SRC/ctrsyl3.f index 586dc0207f..5e42fc39ef 100644 --- a/SRC/ctrsyl3.f +++ b/SRC/ctrsyl3.f @@ -135,7 +135,7 @@ *> A and B are unchanged). *> \endverbatim * -*> \ingroup complexSYcomputational +*> \ingroup trsyl3 * * ===================================================================== * References: diff --git a/SRC/ctrti2.f b/SRC/ctrti2.f index 47a9ab45f5..54681a3407 100644 --- a/SRC/ctrti2.f +++ b/SRC/ctrti2.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trti2 * * ===================================================================== SUBROUTINE CTRTI2( UPLO, DIAG, N, A, LDA, INFO ) diff --git a/SRC/ctrtri.f b/SRC/ctrtri.f index d7f41ba3e8..f72c4e5792 100644 --- a/SRC/ctrtri.f +++ b/SRC/ctrtri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trtri * * ===================================================================== SUBROUTINE CTRTRI( UPLO, DIAG, N, A, LDA, INFO ) diff --git a/SRC/ctrtrs.f b/SRC/ctrtrs.f index 47e4245f74..75975d3a66 100644 --- a/SRC/ctrtrs.f +++ b/SRC/ctrtrs.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trtrs * * ===================================================================== SUBROUTINE CTRTRS( UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, diff --git a/SRC/ctrttf.f b/SRC/ctrttf.f index bbfa0a922b..655b689687 100644 --- a/SRC/ctrttf.f +++ b/SRC/ctrttf.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trttf * *> \par Further Details: * ===================== diff --git a/SRC/ctrttp.f b/SRC/ctrttp.f index 92bdb23f9a..e38f01e3d5 100644 --- a/SRC/ctrttp.f +++ b/SRC/ctrttp.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup trttp * * ===================================================================== SUBROUTINE CTRTTP( UPLO, N, A, LDA, AP, INFO ) diff --git a/SRC/ctzrzf.f b/SRC/ctzrzf.f index b21f092cea..6359030081 100644 --- a/SRC/ctzrzf.f +++ b/SRC/ctzrzf.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup tzrzf * *> \par Contributors: * ================== diff --git a/SRC/cunbdb.f b/SRC/cunbdb.f index a41895dc8c..0361ab9903 100644 --- a/SRC/cunbdb.f +++ b/SRC/cunbdb.f @@ -255,7 +255,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unbdb * *> \par Further Details: * ===================== diff --git a/SRC/cunbdb1.f b/SRC/cunbdb1.f index 80faa88087..72c4fb10aa 100644 --- a/SRC/cunbdb1.f +++ b/SRC/cunbdb1.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unbdb1 * *> \par Further Details: * ===================== diff --git a/SRC/cunbdb2.f b/SRC/cunbdb2.f index 94b9fdbf95..ed02633443 100644 --- a/SRC/cunbdb2.f +++ b/SRC/cunbdb2.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unbdb2 * *> \par Further Details: * ===================== diff --git a/SRC/cunbdb3.f b/SRC/cunbdb3.f index f942bc698c..f2aed2c594 100644 --- a/SRC/cunbdb3.f +++ b/SRC/cunbdb3.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unbdb3 * *> \par Further Details: * ===================== diff --git a/SRC/cunbdb4.f b/SRC/cunbdb4.f index a551c184e6..6a28a3da30 100644 --- a/SRC/cunbdb4.f +++ b/SRC/cunbdb4.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unbdb4 * *> \par Further Details: * ===================== diff --git a/SRC/cunbdb5.f b/SRC/cunbdb5.f index d2ff4e7000..bbe2c4846e 100644 --- a/SRC/cunbdb5.f +++ b/SRC/cunbdb5.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unbdb5 * * ===================================================================== SUBROUTINE CUNBDB5( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, diff --git a/SRC/cunbdb6.f b/SRC/cunbdb6.f index b93a389d6b..e281bbd71c 100644 --- a/SRC/cunbdb6.f +++ b/SRC/cunbdb6.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unbdb6 * * ===================================================================== SUBROUTINE CUNBDB6( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, diff --git a/SRC/cuncsd.f b/SRC/cuncsd.f index 3653a396a5..6594d73f34 100644 --- a/SRC/cuncsd.f +++ b/SRC/cuncsd.f @@ -308,7 +308,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup uncsd * * ===================================================================== RECURSIVE SUBROUTINE CUNCSD( JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, diff --git a/SRC/cuncsd2by1.f b/SRC/cuncsd2by1.f index f0c44f6707..8724f9e25f 100644 --- a/SRC/cuncsd2by1.f +++ b/SRC/cuncsd2by1.f @@ -247,7 +247,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup uncsd2by1 * * ===================================================================== SUBROUTINE CUNCSD2BY1( JOBU1, JOBU2, JOBV1T, M, P, Q, X11, LDX11, diff --git a/SRC/cung2l.f b/SRC/cung2l.f index a05843a5d3..7b9fb5c228 100644 --- a/SRC/cung2l.f +++ b/SRC/cung2l.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ung2l * * ===================================================================== SUBROUTINE CUNG2L( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/cung2r.f b/SRC/cung2r.f index a984818c1e..d854ed437f 100644 --- a/SRC/cung2r.f +++ b/SRC/cung2r.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ung2r * * ===================================================================== SUBROUTINE CUNG2R( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/cungbr.f b/SRC/cungbr.f index a31a53d790..728da250b4 100644 --- a/SRC/cungbr.f +++ b/SRC/cungbr.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexGBcomputational +*> \ingroup ungbr * * ===================================================================== SUBROUTINE CUNGBR( VECT, M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/cunghr.f b/SRC/cunghr.f index 4f8a0a2639..5d3401a3a2 100644 --- a/SRC/cunghr.f +++ b/SRC/cunghr.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unghr * * ===================================================================== SUBROUTINE CUNGHR( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/cungl2.f b/SRC/cungl2.f index 81a3b89cd8..4e5042b636 100644 --- a/SRC/cungl2.f +++ b/SRC/cungl2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ungl2 * * ===================================================================== SUBROUTINE CUNGL2( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/cunglq.f b/SRC/cunglq.f index e250e036cf..fbd8396a1b 100644 --- a/SRC/cunglq.f +++ b/SRC/cunglq.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unglq * * ===================================================================== SUBROUTINE CUNGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/cungql.f b/SRC/cungql.f index d3b812a62d..81c7740238 100644 --- a/SRC/cungql.f +++ b/SRC/cungql.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ungql * * ===================================================================== SUBROUTINE CUNGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/cungqr.f b/SRC/cungqr.f index 5010ae0df1..91a7aaa3a4 100644 --- a/SRC/cungqr.f +++ b/SRC/cungqr.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ungqr * * ===================================================================== SUBROUTINE CUNGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/cungr2.f b/SRC/cungr2.f index 1f2f2b4610..1e99911121 100644 --- a/SRC/cungr2.f +++ b/SRC/cungr2.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ungr2 * * ===================================================================== SUBROUTINE CUNGR2( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/cungrq.f b/SRC/cungrq.f index 1593ff938b..29f02d4ba8 100644 --- a/SRC/cungrq.f +++ b/SRC/cungrq.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ungrq * * ===================================================================== SUBROUTINE CUNGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/cungtr.f b/SRC/cungtr.f index 26ff0428ef..36edd8e9a7 100644 --- a/SRC/cungtr.f +++ b/SRC/cungtr.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ungtr * * ===================================================================== SUBROUTINE CUNGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/cungtsqr.f b/SRC/cungtsqr.f index 1734be2aae..22f21d5e6d 100644 --- a/SRC/cungtsqr.f +++ b/SRC/cungtsqr.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ungtsqr * *> \par Contributors: * ================== diff --git a/SRC/cungtsqr_row.f b/SRC/cungtsqr_row.f index e1597c58be..4515440a16 100644 --- a/SRC/cungtsqr_row.f +++ b/SRC/cungtsqr_row.f @@ -169,7 +169,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup ungtsqr_row * *> \par Contributors: * ================== diff --git a/SRC/cunhr_col.f b/SRC/cunhr_col.f index eeec34170c..9d5f560439 100644 --- a/SRC/cunhr_col.f +++ b/SRC/cunhr_col.f @@ -241,7 +241,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unhr_col * *> \par Contributors: * ================== diff --git a/SRC/cunm22.f b/SRC/cunm22.f index f11a2180c5..ca82117098 100644 --- a/SRC/cunm22.f +++ b/SRC/cunm22.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unm22 * * ===================================================================== SUBROUTINE CUNM22( SIDE, TRANS, M, N, N1, N2, Q, LDQ, C, LDC, diff --git a/SRC/cunm2l.f b/SRC/cunm2l.f index 416c0a0c36..238b73525e 100644 --- a/SRC/cunm2l.f +++ b/SRC/cunm2l.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unm2l * * ===================================================================== SUBROUTINE CUNM2L( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/cunm2r.f b/SRC/cunm2r.f index a79e9a78d0..684ae9c3c0 100644 --- a/SRC/cunm2r.f +++ b/SRC/cunm2r.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unm2r * * ===================================================================== SUBROUTINE CUNM2R( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/cunmbr.f b/SRC/cunmbr.f index cef6025b02..775694f2ae 100644 --- a/SRC/cunmbr.f +++ b/SRC/cunmbr.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmbr * * ===================================================================== SUBROUTINE CUNMBR( VECT, SIDE, TRANS, M, N, K, A, LDA, TAU, C, diff --git a/SRC/cunmhr.f b/SRC/cunmhr.f index af3140d5f3..d0e6af74d8 100644 --- a/SRC/cunmhr.f +++ b/SRC/cunmhr.f @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmhr * * ===================================================================== SUBROUTINE CUNMHR( SIDE, TRANS, M, N, ILO, IHI, A, LDA, TAU, C, diff --git a/SRC/cunml2.f b/SRC/cunml2.f index 6af8cc0358..a00ce5ff0c 100644 --- a/SRC/cunml2.f +++ b/SRC/cunml2.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unml2 * * ===================================================================== SUBROUTINE CUNML2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/cunmlq.f b/SRC/cunmlq.f index 25a4107708..1ce16ab3d5 100644 --- a/SRC/cunmlq.f +++ b/SRC/cunmlq.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmlq * * ===================================================================== SUBROUTINE CUNMLQ( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/cunmql.f b/SRC/cunmql.f index 3c71660663..85525a971e 100644 --- a/SRC/cunmql.f +++ b/SRC/cunmql.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmql * * ===================================================================== SUBROUTINE CUNMQL( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/cunmqr.f b/SRC/cunmqr.f index 7e59d71297..b801cb50db 100644 --- a/SRC/cunmqr.f +++ b/SRC/cunmqr.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmqr * * ===================================================================== SUBROUTINE CUNMQR( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/cunmr2.f b/SRC/cunmr2.f index ebd4cfbb64..de83b7c58b 100644 --- a/SRC/cunmr2.f +++ b/SRC/cunmr2.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmr2 * * ===================================================================== SUBROUTINE CUNMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/cunmr3.f b/SRC/cunmr3.f index dcd893fa32..15fd6df89d 100644 --- a/SRC/cunmr3.f +++ b/SRC/cunmr3.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmr3 * *> \par Contributors: * ================== diff --git a/SRC/cunmrq.f b/SRC/cunmrq.f index 5a233f6040..68c2404a45 100644 --- a/SRC/cunmrq.f +++ b/SRC/cunmrq.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmrq * * ===================================================================== SUBROUTINE CUNMRQ( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/cunmrz.f b/SRC/cunmrz.f index 8e06f2329a..3e4734bedb 100644 --- a/SRC/cunmrz.f +++ b/SRC/cunmrz.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmrz * *> \par Contributors: * ================== diff --git a/SRC/cunmtr.f b/SRC/cunmtr.f index 097dba91e7..84dfa29e7a 100644 --- a/SRC/cunmtr.f +++ b/SRC/cunmtr.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unmtr * * ===================================================================== SUBROUTINE CUNMTR( SIDE, UPLO, TRANS, M, N, A, LDA, TAU, C, LDC, diff --git a/SRC/cupgtr.f b/SRC/cupgtr.f index c491a1f4db..4370cdeacf 100644 --- a/SRC/cupgtr.f +++ b/SRC/cupgtr.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup upgtr * * ===================================================================== SUBROUTINE CUPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO ) diff --git a/SRC/cupmtr.f b/SRC/cupmtr.f index 2629e91792..8e0dff80cd 100644 --- a/SRC/cupmtr.f +++ b/SRC/cupmtr.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup upmtr * * ===================================================================== SUBROUTINE CUPMTR( SIDE, UPLO, TRANS, M, N, AP, TAU, C, LDC, WORK, diff --git a/SRC/dbbcsd.f b/SRC/dbbcsd.f index 4fcf9ab5de..49a73a13e8 100644 --- a/SRC/dbbcsd.f +++ b/SRC/dbbcsd.f @@ -322,7 +322,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup bbcsd * * ===================================================================== SUBROUTINE DBBCSD( JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, M, P, Q, diff --git a/SRC/dbdsdc.f b/SRC/dbdsdc.f index 4b6c3e6943..0003f31fb4 100644 --- a/SRC/dbdsdc.f +++ b/SRC/dbdsdc.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup bdsdc * *> \par Contributors: * ================== diff --git a/SRC/dbdsqr.f b/SRC/dbdsqr.f index bc697a0074..395f7bd88d 100644 --- a/SRC/dbdsqr.f +++ b/SRC/dbdsqr.f @@ -233,7 +233,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup bdsqr * * ===================================================================== SUBROUTINE DBDSQR( UPLO, N, NCVT, NRU, NCC, D, E, VT, LDVT, U, diff --git a/SRC/dbdsvdx.f b/SRC/dbdsvdx.f index 4668a88f21..a212efe66a 100644 --- a/SRC/dbdsvdx.f +++ b/SRC/dbdsvdx.f @@ -218,7 +218,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup bdsvdx * * ===================================================================== SUBROUTINE DBDSVDX( UPLO, JOBZ, RANGE, N, D, E, VL, VU, IL, IU, diff --git a/SRC/ddisna.f b/SRC/ddisna.f index 1e5e9778e4..0e026f55d1 100644 --- a/SRC/ddisna.f +++ b/SRC/ddisna.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup disna * * ===================================================================== SUBROUTINE DDISNA( JOB, M, N, D, SEP, INFO ) diff --git a/SRC/dgbbrd.f b/SRC/dgbbrd.f index 03aaa0a009..7cfc750246 100644 --- a/SRC/dgbbrd.f +++ b/SRC/dgbbrd.f @@ -179,7 +179,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbbrd * * ===================================================================== SUBROUTINE DGBBRD( VECT, M, N, NCC, KL, KU, AB, LDAB, D, E, Q, diff --git a/SRC/dgbcon.f b/SRC/dgbcon.f index 1ffb3c0f8b..135eadd95e 100644 --- a/SRC/dgbcon.f +++ b/SRC/dgbcon.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbcon * * ===================================================================== SUBROUTINE DGBCON( NORM, N, KL, KU, AB, LDAB, IPIV, ANORM, RCOND, diff --git a/SRC/dgbequ.f b/SRC/dgbequ.f index ab8b20b2e2..3a0f275fa0 100644 --- a/SRC/dgbequ.f +++ b/SRC/dgbequ.f @@ -145,7 +145,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbequ * * ===================================================================== SUBROUTINE DGBEQU( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/dgbequb.f b/SRC/dgbequb.f index 93179f733d..da1c1d80fa 100644 --- a/SRC/dgbequb.f +++ b/SRC/dgbequb.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbequb * * ===================================================================== SUBROUTINE DGBEQUB( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/dgbrfs.f b/SRC/dgbrfs.f index 9520f23f66..edc2df6318 100644 --- a/SRC/dgbrfs.f +++ b/SRC/dgbrfs.f @@ -196,7 +196,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbrfs * * ===================================================================== SUBROUTINE DGBRFS( TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, LDAFB, diff --git a/SRC/dgbrfsx.f b/SRC/dgbrfsx.f index 8ab1a580fe..87ac7c30c0 100644 --- a/SRC/dgbrfsx.f +++ b/SRC/dgbrfsx.f @@ -429,7 +429,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbrfsx * * ===================================================================== SUBROUTINE DGBRFSX( TRANS, EQUED, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/dgbsv.f b/SRC/dgbsv.f index 1d4e6cb938..4e833e928e 100644 --- a/SRC/dgbsv.f +++ b/SRC/dgbsv.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBsolve +*> \ingroup gbsv * *> \par Further Details: * ===================== diff --git a/SRC/dgbsvx.f b/SRC/dgbsvx.f index 0ee5eecb31..3383af61b5 100644 --- a/SRC/dgbsvx.f +++ b/SRC/dgbsvx.f @@ -360,7 +360,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBsolve +*> \ingroup gbsvx * * ===================================================================== SUBROUTINE DGBSVX( FACT, TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/dgbsvxx.f b/SRC/dgbsvxx.f index 0ea26a3ec1..49bd6cae10 100644 --- a/SRC/dgbsvxx.f +++ b/SRC/dgbsvxx.f @@ -549,7 +549,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBsolve +*> \ingroup gbsvxx * * ===================================================================== SUBROUTINE DGBSVXX( FACT, TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/dgbtf2.f b/SRC/dgbtf2.f index a643682582..4d149642a2 100644 --- a/SRC/dgbtf2.f +++ b/SRC/dgbtf2.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbtf2 * *> \par Further Details: * ===================== diff --git a/SRC/dgbtrf.f b/SRC/dgbtrf.f index af305e26b4..c8b3bdff16 100644 --- a/SRC/dgbtrf.f +++ b/SRC/dgbtrf.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbtrf * *> \par Further Details: * ===================== diff --git a/SRC/dgbtrs.f b/SRC/dgbtrs.f index f22d802de7..c1992dda45 100644 --- a/SRC/dgbtrs.f +++ b/SRC/dgbtrs.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup gbtrs * * ===================================================================== SUBROUTINE DGBTRS( TRANS, N, KL, KU, NRHS, AB, LDAB, IPIV, B, LDB, diff --git a/SRC/dgebak.f b/SRC/dgebak.f index 9c086794a4..ef03298c1f 100644 --- a/SRC/dgebak.f +++ b/SRC/dgebak.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gebak * * ===================================================================== SUBROUTINE DGEBAK( JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, diff --git a/SRC/dgebal.f b/SRC/dgebal.f index f7b38b3781..d2c9922fab 100644 --- a/SRC/dgebal.f +++ b/SRC/dgebal.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gebal * *> \par Further Details: * ===================== diff --git a/SRC/dgebd2.f b/SRC/dgebd2.f index daaa187aff..f0014578fb 100644 --- a/SRC/dgebd2.f +++ b/SRC/dgebd2.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gebd2 * *> \par Further Details: * ===================== diff --git a/SRC/dgebrd.f b/SRC/dgebrd.f index 0f0d1651a7..f350e2191d 100644 --- a/SRC/dgebrd.f +++ b/SRC/dgebrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gebrd * *> \par Further Details: * ===================== diff --git a/SRC/dgecon.f b/SRC/dgecon.f index 1ad302ae3f..5e6dacebf1 100644 --- a/SRC/dgecon.f +++ b/SRC/dgecon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gecon * * ===================================================================== SUBROUTINE DGECON( NORM, N, A, LDA, ANORM, RCOND, WORK, IWORK, diff --git a/SRC/dgeequ.f b/SRC/dgeequ.f index 3dc323014d..8306ae9d1a 100644 --- a/SRC/dgeequ.f +++ b/SRC/dgeequ.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geequ * * ===================================================================== SUBROUTINE DGEEQU( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/dgeequb.f b/SRC/dgeequb.f index 728c6213e4..b0f40687a0 100644 --- a/SRC/dgeequb.f +++ b/SRC/dgeequb.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geequb * * ===================================================================== SUBROUTINE DGEEQUB( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/dgees.f b/SRC/dgees.f index e0f9d3c76b..34ffc8e2a5 100644 --- a/SRC/dgees.f +++ b/SRC/dgees.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEeigen +*> \ingroup gees * * ===================================================================== SUBROUTINE DGEES( JOBVS, SORT, SELECT, N, A, LDA, SDIM, WR, WI, diff --git a/SRC/dgeesx.f b/SRC/dgeesx.f index da8136d99b..83a6ea8c00 100644 --- a/SRC/dgeesx.f +++ b/SRC/dgeesx.f @@ -272,7 +272,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEeigen +*> \ingroup geesx * * ===================================================================== SUBROUTINE DGEESX( JOBVS, SORT, SELECT, SENSE, N, A, LDA, SDIM, diff --git a/SRC/dgeev.f b/SRC/dgeev.f index de25557f91..64cd31c792 100644 --- a/SRC/dgeev.f +++ b/SRC/dgeev.f @@ -184,7 +184,7 @@ * * @precisions fortran d -> s * -*> \ingroup doubleGEeigen +*> \ingroup geev * * ===================================================================== SUBROUTINE DGEEV( JOBVL, JOBVR, N, A, LDA, WR, WI, VL, LDVL, VR, diff --git a/SRC/dgeevx.f b/SRC/dgeevx.f index 2ec0f09ce1..8d5c691992 100644 --- a/SRC/dgeevx.f +++ b/SRC/dgeevx.f @@ -297,7 +297,7 @@ * * @precisions fortran d -> s * -*> \ingroup doubleGEeigen +*> \ingroup geevx * * ===================================================================== SUBROUTINE DGEEVX( BALANC, JOBVL, JOBVR, SENSE, N, A, LDA, WR, WI, diff --git a/SRC/dgehd2.f b/SRC/dgehd2.f index c71e38433f..62417aa8c1 100644 --- a/SRC/dgehd2.f +++ b/SRC/dgehd2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gehd2 * *> \par Further Details: * ===================== diff --git a/SRC/dgehrd.f b/SRC/dgehrd.f index a40c61cb6d..67825c93bd 100644 --- a/SRC/dgehrd.f +++ b/SRC/dgehrd.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gehrd * *> \par Further Details: * ===================== diff --git a/SRC/dgejsv.f b/SRC/dgejsv.f index 1db85e9c26..42afb084fd 100644 --- a/SRC/dgejsv.f +++ b/SRC/dgejsv.f @@ -391,7 +391,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsing +*> \ingroup gejsv * *> \par Further Details: * ===================== diff --git a/SRC/dgelq.f b/SRC/dgelq.f index 013b6c3564..3dd72d8bc6 100644 --- a/SRC/dgelq.f +++ b/SRC/dgelq.f @@ -166,6 +166,8 @@ *> the LQ factorization. *> \endverbatim *> +*> \ingroup gelq +*> * ===================================================================== SUBROUTINE DGELQ( M, N, A, LDA, T, TSIZE, WORK, LWORK, $ INFO ) diff --git a/SRC/dgelq2.f b/SRC/dgelq2.f index 9915c57d47..a07ae4df7f 100644 --- a/SRC/dgelq2.f +++ b/SRC/dgelq2.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelq2 * *> \par Further Details: * ===================== diff --git a/SRC/dgelqf.f b/SRC/dgelqf.f index ed3372f965..331d7a42e0 100644 --- a/SRC/dgelqf.f +++ b/SRC/dgelqf.f @@ -118,7 +118,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqf * *> \par Further Details: * ===================== diff --git a/SRC/dgelqt.f b/SRC/dgelqt.f index 263d4dfa23..fa33f0d885 100644 --- a/SRC/dgelqt.f +++ b/SRC/dgelqt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqt * *> \par Further Details: * ===================== diff --git a/SRC/dgelqt3.f b/SRC/dgelqt3.f index 5bcc06a80f..05c4baae3c 100644 --- a/SRC/dgelqt3.f +++ b/SRC/dgelqt3.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqt3 * *> \par Further Details: * ===================== diff --git a/SRC/dgels.f b/SRC/dgels.f index 68a44b6dca..17878825af 100644 --- a/SRC/dgels.f +++ b/SRC/dgels.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gels * * ===================================================================== SUBROUTINE DGELS( TRANS, M, N, NRHS, A, LDA, B, LDB, WORK, LWORK, diff --git a/SRC/dgelsd.f b/SRC/dgelsd.f index 9e46abc92a..036cf379c8 100644 --- a/SRC/dgelsd.f +++ b/SRC/dgelsd.f @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gelsd * *> \par Contributors: * ================== diff --git a/SRC/dgelss.f b/SRC/dgelss.f index 0a0c9ba7b8..6e16048de5 100644 --- a/SRC/dgelss.f +++ b/SRC/dgelss.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gelss * * ===================================================================== SUBROUTINE DGELSS( M, N, NRHS, A, LDA, B, LDB, S, RCOND, RANK, diff --git a/SRC/dgelst.f b/SRC/dgelst.f index e40411b24d..eefac16cdd 100644 --- a/SRC/dgelst.f +++ b/SRC/dgelst.f @@ -176,7 +176,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gelst * *> \par Contributors: * ================== diff --git a/SRC/dgelsy.f b/SRC/dgelsy.f index 66160ff91e..f2a10c0926 100644 --- a/SRC/dgelsy.f +++ b/SRC/dgelsy.f @@ -191,7 +191,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gelsy * *> \par Contributors: * ================== diff --git a/SRC/dgemlq.f b/SRC/dgemlq.f index 3ba2091054..841f7612ce 100644 --- a/SRC/dgemlq.f +++ b/SRC/dgemlq.f @@ -120,7 +120,7 @@ *> The dimension of the array WORK. *> If LWORK = -1, then a workspace query is assumed. The routine *> only calculates the size of the WORK array, returns this -*> value as WORK(1), and no error message related to WORK +*> value as WORK(1), and no error message related to WORK *> is issued by XERBLA. *> \endverbatim *> @@ -144,7 +144,7 @@ *> *> \verbatim *> -*> These details are particular for this LAPACK implementation. Users should not +*> These details are particular for this LAPACK implementation. Users should not *> take them for granted. These details may change in the future, and are not likely *> true for another LAPACK implementation. These details are relevant if one wants *> to try to understand the code. They are not part of the interface. @@ -160,11 +160,13 @@ *> block sizes MB and NB returned by ILAENV, DGELQ will use either *> DLASWLQ (if the matrix is wide-and-short) or DGELQT to compute *> the LQ factorization. -*> This version of DGEMLQ will use either DLAMSWLQ or DGEMLQT to +*> This version of DGEMLQ will use either DLAMSWLQ or DGEMLQT to *> multiply matrix Q by another matrix. *> Further Details in DLAMSWLQ or DGEMLQT. *> \endverbatim *> +*> \ingroup gemlq +*> * ===================================================================== SUBROUTINE DGEMLQ( SIDE, TRANS, M, N, K, A, LDA, T, TSIZE, $ C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/dgemlqt.f b/SRC/dgemlqt.f index 081f600fce..e341343959 100644 --- a/SRC/dgemlqt.f +++ b/SRC/dgemlqt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gemlqt * * ===================================================================== SUBROUTINE DGEMLQT( SIDE, TRANS, M, N, K, MB, V, LDV, T, LDT, diff --git a/SRC/dgemqr.f b/SRC/dgemqr.f index 022cf21e43..236cbae129 100644 --- a/SRC/dgemqr.f +++ b/SRC/dgemqr.f @@ -120,7 +120,7 @@ *> The dimension of the array WORK. *> If LWORK = -1, then a workspace query is assumed. The routine *> only calculates the size of the WORK array, returns this -*> value as WORK(1), and no error message related to WORK +*> value as WORK(1), and no error message related to WORK *> is issued by XERBLA. *> \endverbatim *> @@ -144,7 +144,7 @@ *> *> \verbatim *> -*> These details are particular for this LAPACK implementation. Users should not +*> These details are particular for this LAPACK implementation. Users should not *> take them for granted. These details may change in the future, and are not likely *> true for another LAPACK implementation. These details are relevant if one wants *> to try to understand the code. They are not part of the interface. @@ -160,12 +160,14 @@ *> block sizes MB and NB returned by ILAENV, DGEQR will use either *> DLATSQR (if the matrix is tall-and-skinny) or DGEQRT to compute *> the QR factorization. -*> This version of DGEMQR will use either DLAMTSQR or DGEMQRT to +*> This version of DGEMQR will use either DLAMTSQR or DGEMQRT to *> multiply matrix Q by another matrix. *> Further Details in DLATMSQR or DGEMQRT. *> *> \endverbatim *> +*> \ingroup gemqr +*> * ===================================================================== SUBROUTINE DGEMQR( SIDE, TRANS, M, N, K, A, LDA, T, TSIZE, $ C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/dgemqrt.f b/SRC/dgemqrt.f index 9191f7546a..bf7a0e001b 100644 --- a/SRC/dgemqrt.f +++ b/SRC/dgemqrt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gemqrt * * ===================================================================== SUBROUTINE DGEMQRT( SIDE, TRANS, M, N, K, NB, V, LDV, T, LDT, diff --git a/SRC/dgeql2.f b/SRC/dgeql2.f index 2d3ce1419f..d087ac29f4 100644 --- a/SRC/dgeql2.f +++ b/SRC/dgeql2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geql2 * *> \par Further Details: * ===================== diff --git a/SRC/dgeqlf.f b/SRC/dgeqlf.f index b8ac0b1a0e..b97eaab51a 100644 --- a/SRC/dgeqlf.f +++ b/SRC/dgeqlf.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqlf * *> \par Further Details: * ===================== diff --git a/SRC/dgeqp3.f b/SRC/dgeqp3.f index e79ecf371b..9da7b2c428 100644 --- a/SRC/dgeqp3.f +++ b/SRC/dgeqp3.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqp3 * *> \par Further Details: * ===================== diff --git a/SRC/dgeqr.f b/SRC/dgeqr.f index eac8930ce0..c7d1af0f0a 100644 --- a/SRC/dgeqr.f +++ b/SRC/dgeqr.f @@ -168,6 +168,8 @@ *> *> \endverbatim *> +*> \ingroup geqr +*> * ===================================================================== SUBROUTINE DGEQR( M, N, A, LDA, T, TSIZE, WORK, LWORK, $ INFO ) diff --git a/SRC/dgeqr2.f b/SRC/dgeqr2.f index 5791b3a915..bd4facfce7 100644 --- a/SRC/dgeqr2.f +++ b/SRC/dgeqr2.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqr2 * *> \par Further Details: * ===================== diff --git a/SRC/dgeqr2p.f b/SRC/dgeqr2p.f index c7b62d87d7..b2f3188f3f 100644 --- a/SRC/dgeqr2p.f +++ b/SRC/dgeqr2p.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqr2p * *> \par Further Details: * ===================== diff --git a/SRC/dgeqrf.f b/SRC/dgeqrf.f index 705e939286..c005d47af5 100644 --- a/SRC/dgeqrf.f +++ b/SRC/dgeqrf.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqrf * *> \par Further Details: * ===================== diff --git a/SRC/dgeqrfp.f b/SRC/dgeqrfp.f index 46d2ee4794..dd7c7b5f8b 100644 --- a/SRC/dgeqrfp.f +++ b/SRC/dgeqrfp.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqrfp * *> \par Further Details: * ===================== diff --git a/SRC/dgeqrt.f b/SRC/dgeqrt.f index 06dfb0576b..1128760aff 100644 --- a/SRC/dgeqrt.f +++ b/SRC/dgeqrt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqrt * *> \par Further Details: * ===================== diff --git a/SRC/dgeqrt2.f b/SRC/dgeqrt2.f index 00f800d435..b200b5d1c9 100644 --- a/SRC/dgeqrt2.f +++ b/SRC/dgeqrt2.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqrt2 * *> \par Further Details: * ===================== diff --git a/SRC/dgeqrt3.f b/SRC/dgeqrt3.f index 1fbd868d7e..d289aeff8f 100644 --- a/SRC/dgeqrt3.f +++ b/SRC/dgeqrt3.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup geqrt3 * *> \par Further Details: * ===================== diff --git a/SRC/dgerfs.f b/SRC/dgerfs.f index ea10d77f9d..9e27498881 100644 --- a/SRC/dgerfs.f +++ b/SRC/dgerfs.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gerfs * * ===================================================================== SUBROUTINE DGERFS( TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/dgerfsx.f b/SRC/dgerfsx.f index c4a898f629..727c81a915 100644 --- a/SRC/dgerfsx.f +++ b/SRC/dgerfsx.f @@ -404,7 +404,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gerfsx * * ===================================================================== SUBROUTINE DGERFSX( TRANS, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/dgerq2.f b/SRC/dgerq2.f index 97d33761da..a4ef46d854 100644 --- a/SRC/dgerq2.f +++ b/SRC/dgerq2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gerq2 * *> \par Further Details: * ===================== diff --git a/SRC/dgerqf.f b/SRC/dgerqf.f index cca9d6367b..6a4ae33c23 100644 --- a/SRC/dgerqf.f +++ b/SRC/dgerqf.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gerqf * *> \par Further Details: * ===================== diff --git a/SRC/dgesc2.f b/SRC/dgesc2.f index d27a5f4a0d..11f83ae9e6 100644 --- a/SRC/dgesc2.f +++ b/SRC/dgesc2.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEauxiliary +*> \ingroup gesc2 * *> \par Contributors: * ================== diff --git a/SRC/dgesdd.f b/SRC/dgesdd.f index d49524bd2c..940f2a2913 100644 --- a/SRC/dgesdd.f +++ b/SRC/dgesdd.f @@ -199,7 +199,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsing +*> \ingroup gesdd * *> \par Contributors: * ================== diff --git a/SRC/dgesv.f b/SRC/dgesv.f index 3609c52f47..9bd574e5cc 100644 --- a/SRC/dgesv.f +++ b/SRC/dgesv.f @@ -1,3 +1,5 @@ +*> \addtogroup gesv +*> *> \brief DGESV computes the solution to system of linear equations A * X = B for GE matrices * * =========== DOCUMENTATION =========== @@ -115,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gesv * * ===================================================================== SUBROUTINE DGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/dgesvd.f b/SRC/dgesvd.f index 7cc8b35129..e91ebce9a4 100644 --- a/SRC/dgesvd.f +++ b/SRC/dgesvd.f @@ -203,7 +203,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsing +*> \ingroup gesvd * * ===================================================================== SUBROUTINE DGESVD( JOBU, JOBVT, M, N, A, LDA, S, U, LDU, diff --git a/SRC/dgesvdq.f b/SRC/dgesvdq.f index a514def8b7..9b08d64990 100644 --- a/SRC/dgesvdq.f +++ b/SRC/dgesvdq.f @@ -406,7 +406,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsing +*> \ingroup gesvdq * * ===================================================================== SUBROUTINE DGESVDQ( JOBA, JOBP, JOBR, JOBU, JOBV, M, N, A, LDA, diff --git a/SRC/dgesvdx.f b/SRC/dgesvdx.f index db444b78de..76d02c8b50 100644 --- a/SRC/dgesvdx.f +++ b/SRC/dgesvdx.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsing +*> \ingroup gesvdx * * ===================================================================== SUBROUTINE DGESVDX( JOBU, JOBVT, RANGE, M, N, A, LDA, VL, VU, diff --git a/SRC/dgesvj.f b/SRC/dgesvj.f index 5fdb21e45c..91b21b3896 100644 --- a/SRC/dgesvj.f +++ b/SRC/dgesvj.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gesvj * *> \par Further Details: * ===================== diff --git a/SRC/dgesvx.f b/SRC/dgesvx.f index f787488dca..6f1cbc309b 100644 --- a/SRC/dgesvx.f +++ b/SRC/dgesvx.f @@ -340,7 +340,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gesvx * * ===================================================================== SUBROUTINE DGESVX( FACT, TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/dgesvxx.f b/SRC/dgesvxx.f index e1f86354bf..f810e22b87 100644 --- a/SRC/dgesvxx.f +++ b/SRC/dgesvxx.f @@ -529,7 +529,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gesvxx * * ===================================================================== SUBROUTINE DGESVXX( FACT, TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/dgetc2.f b/SRC/dgetc2.f index e8ced23e71..8ee83328c4 100644 --- a/SRC/dgetc2.f +++ b/SRC/dgetc2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEauxiliary +*> \ingroup getc2 * *> \par Contributors: * ================== diff --git a/SRC/dgetf2.f b/SRC/dgetf2.f index fc1587842e..60dc33d16f 100644 --- a/SRC/dgetf2.f +++ b/SRC/dgetf2.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup getf2 * * ===================================================================== SUBROUTINE DGETF2( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/dgetrf.f b/SRC/dgetrf.f index 73d0f3601a..42b3a4f6fe 100644 --- a/SRC/dgetrf.f +++ b/SRC/dgetrf.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup getrf * * ===================================================================== SUBROUTINE DGETRF( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/dgetrf2.f b/SRC/dgetrf2.f index 40af0793dd..64b92030d2 100644 --- a/SRC/dgetrf2.f +++ b/SRC/dgetrf2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup getrf2 * * ===================================================================== RECURSIVE SUBROUTINE DGETRF2( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/dgetri.f b/SRC/dgetri.f index 92ef90c186..a41531556b 100644 --- a/SRC/dgetri.f +++ b/SRC/dgetri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup getri * * ===================================================================== SUBROUTINE DGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/dgetrs.f b/SRC/dgetrs.f index d3464f685a..36c0f27063 100644 --- a/SRC/dgetrs.f +++ b/SRC/dgetrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup getrs * * ===================================================================== SUBROUTINE DGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/dgetsls.f b/SRC/dgetsls.f index 68409604b8..8d027f2c7d 100644 --- a/SRC/dgetsls.f +++ b/SRC/dgetsls.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup getsls * * ===================================================================== SUBROUTINE DGETSLS( TRANS, M, N, NRHS, A, LDA, B, LDB, diff --git a/SRC/dgetsqrhrt.f b/SRC/dgetsqrhrt.f index 668deeba81..394fd0024f 100644 --- a/SRC/dgetsqrhrt.f +++ b/SRC/dgetsqrhrt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup getsqrhrt * *> \par Contributors: * ================== diff --git a/SRC/dggbak.f b/SRC/dggbak.f index 76820e39d2..e881159612 100644 --- a/SRC/dggbak.f +++ b/SRC/dggbak.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup ggbak * *> \par Further Details: * ===================== diff --git a/SRC/dggbal.f b/SRC/dggbal.f index c588eceb46..308fc5bbd8 100644 --- a/SRC/dggbal.f +++ b/SRC/dggbal.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup ggbal * *> \par Further Details: * ===================== diff --git a/SRC/dgges.f b/SRC/dgges.f index f99a44e729..7282c80d6a 100644 --- a/SRC/dgges.f +++ b/SRC/dgges.f @@ -275,7 +275,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEeigen +*> \ingroup gges * * ===================================================================== SUBROUTINE DGGES( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B, LDB, diff --git a/SRC/dgges3.f b/SRC/dgges3.f index 15305a8af5..7306a4a3c7 100644 --- a/SRC/dgges3.f +++ b/SRC/dgges3.f @@ -273,7 +273,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEeigen +*> \ingroup gges3 * * ===================================================================== SUBROUTINE DGGES3( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B, diff --git a/SRC/dggesx.f b/SRC/dggesx.f index 133ed46986..7eb59d5ab9 100644 --- a/SRC/dggesx.f +++ b/SRC/dggesx.f @@ -337,7 +337,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEeigen +*> \ingroup ggesx * *> \par Further Details: * ===================== diff --git a/SRC/dggev.f b/SRC/dggev.f index 3e08de19cb..3e42099101 100644 --- a/SRC/dggev.f +++ b/SRC/dggev.f @@ -218,7 +218,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEeigen +*> \ingroup ggev * * ===================================================================== SUBROUTINE DGGEV( JOBVL, JOBVR, N, A, LDA, B, LDB, ALPHAR, ALPHAI, diff --git a/SRC/dggev3.f b/SRC/dggev3.f index c9d7e8e4fd..19b0237f99 100644 --- a/SRC/dggev3.f +++ b/SRC/dggev3.f @@ -217,7 +217,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEeigen +*> \ingroup ggev3 * * ===================================================================== SUBROUTINE DGGEV3( JOBVL, JOBVR, N, A, LDA, B, LDB, ALPHAR, diff --git a/SRC/dggevx.f b/SRC/dggevx.f index 0dfac7a726..74e01d59de 100644 --- a/SRC/dggevx.f +++ b/SRC/dggevx.f @@ -352,7 +352,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEeigen +*> \ingroup ggevx * *> \par Further Details: * ===================== diff --git a/SRC/dggglm.f b/SRC/dggglm.f index ae0f0e908c..c39dfe24dc 100644 --- a/SRC/dggglm.f +++ b/SRC/dggglm.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup ggglm * * ===================================================================== SUBROUTINE DGGGLM( N, M, P, A, LDA, B, LDB, D, X, Y, WORK, LWORK, diff --git a/SRC/dgghd3.f b/SRC/dgghd3.f index 43d7a77df5..7ac514fa6c 100644 --- a/SRC/dgghd3.f +++ b/SRC/dgghd3.f @@ -211,7 +211,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup gghd3 * *> \par Further Details: * ===================== diff --git a/SRC/dgghrd.f b/SRC/dgghrd.f index 2f71a84103..8cf4c10ed5 100644 --- a/SRC/dgghrd.f +++ b/SRC/dgghrd.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup gghrd * *> \par Further Details: * ===================== diff --git a/SRC/dgglse.f b/SRC/dgglse.f index 28aeaf6e76..3bcb5f96e0 100644 --- a/SRC/dgglse.f +++ b/SRC/dgglse.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERsolve +*> \ingroup gglse * * ===================================================================== SUBROUTINE DGGLSE( M, N, P, A, LDA, B, LDB, C, D, X, WORK, LWORK, diff --git a/SRC/dggqrf.f b/SRC/dggqrf.f index 39d27a5c93..f2ecea9e29 100644 --- a/SRC/dggqrf.f +++ b/SRC/dggqrf.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ggqrf * *> \par Further Details: * ===================== diff --git a/SRC/dggrqf.f b/SRC/dggrqf.f index ddf4104c59..16db9fe3ec 100644 --- a/SRC/dggrqf.f +++ b/SRC/dggrqf.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ggrqf * *> \par Further Details: * ===================== diff --git a/SRC/dggsvd3.f b/SRC/dggsvd3.f index 503f0d8cc7..7efc4d3fde 100644 --- a/SRC/dggsvd3.f +++ b/SRC/dggsvd3.f @@ -328,7 +328,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsing +*> \ingroup ggsvd3 * *> \par Contributors: * ================== diff --git a/SRC/dggsvp3.f b/SRC/dggsvp3.f index 4e1db3117b..cd0f15502f 100644 --- a/SRC/dggsvp3.f +++ b/SRC/dggsvp3.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ggsvp3 * *> \par Further Details: * ===================== diff --git a/SRC/dgsvj0.f b/SRC/dgsvj0.f index 1008aa8c6e..91c4cbcc18 100644 --- a/SRC/dgsvj0.f +++ b/SRC/dgsvj0.f @@ -193,7 +193,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup gsvj0 * *> \par Further Details: * ===================== diff --git a/SRC/dgsvj1.f b/SRC/dgsvj1.f index f1a099b2a2..9fedc4eff1 100644 --- a/SRC/dgsvj1.f +++ b/SRC/dgsvj1.f @@ -223,7 +223,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup gsvj1 * *> \par Contributors: * ================== diff --git a/SRC/dgtcon.f b/SRC/dgtcon.f index e007ac146c..af9b90068e 100644 --- a/SRC/dgtcon.f +++ b/SRC/dgtcon.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGTcomputational +*> \ingroup gtcon * * ===================================================================== SUBROUTINE DGTCON( NORM, N, DL, D, DU, DU2, IPIV, ANORM, RCOND, diff --git a/SRC/dgtrfs.f b/SRC/dgtrfs.f index e2bb3d2adc..ae272ec407 100644 --- a/SRC/dgtrfs.f +++ b/SRC/dgtrfs.f @@ -200,7 +200,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGTcomputational +*> \ingroup gtrfs * * ===================================================================== SUBROUTINE DGTRFS( TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, DU2, diff --git a/SRC/dgtsv.f b/SRC/dgtsv.f index 0f02201d58..16168b8625 100644 --- a/SRC/dgtsv.f +++ b/SRC/dgtsv.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGTsolve +*> \ingroup gtsv * * ===================================================================== SUBROUTINE DGTSV( N, NRHS, DL, D, DU, B, LDB, INFO ) diff --git a/SRC/dgtsvx.f b/SRC/dgtsvx.f index ec8df80bb6..be3a33fdfe 100644 --- a/SRC/dgtsvx.f +++ b/SRC/dgtsvx.f @@ -284,7 +284,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGTsolve +*> \ingroup gtsvx * * ===================================================================== SUBROUTINE DGTSVX( FACT, TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, diff --git a/SRC/dgttrf.f b/SRC/dgttrf.f index 061c211504..996a691d80 100644 --- a/SRC/dgttrf.f +++ b/SRC/dgttrf.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGTcomputational +*> \ingroup gttrf * * ===================================================================== SUBROUTINE DGTTRF( N, DL, D, DU, DU2, IPIV, INFO ) diff --git a/SRC/dgttrs.f b/SRC/dgttrs.f index cb9a897c3b..f99eede8fe 100644 --- a/SRC/dgttrs.f +++ b/SRC/dgttrs.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGTcomputational +*> \ingroup gttrs * * ===================================================================== SUBROUTINE DGTTRS( TRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB, diff --git a/SRC/dgtts2.f b/SRC/dgtts2.f index ffa69eac93..3be6bb0c4c 100644 --- a/SRC/dgtts2.f +++ b/SRC/dgtts2.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGTcomputational +*> \ingroup gtts2 * * ===================================================================== SUBROUTINE DGTTS2( ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB ) diff --git a/SRC/dhgeqz.f b/SRC/dhgeqz.f index d6233596c8..f812ba3b67 100644 --- a/SRC/dhgeqz.f +++ b/SRC/dhgeqz.f @@ -282,7 +282,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup hgeqz * *> \par Further Details: * ===================== diff --git a/SRC/dhsein.f b/SRC/dhsein.f index 326e8e3962..82d4660bf9 100644 --- a/SRC/dhsein.f +++ b/SRC/dhsein.f @@ -244,7 +244,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hsein * *> \par Further Details: * ===================== diff --git a/SRC/dhseqr.f b/SRC/dhseqr.f index 2d59c6cc7e..19df29913c 100644 --- a/SRC/dhseqr.f +++ b/SRC/dhseqr.f @@ -233,7 +233,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hseqr * *> \par Contributors: * ================== diff --git a/SRC/disnan.f b/SRC/disnan.f index e621b2589c..fd59cfd5c1 100644 --- a/SRC/disnan.f +++ b/SRC/disnan.f @@ -52,7 +52,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup isnan * * ===================================================================== LOGICAL FUNCTION DISNAN( DIN ) diff --git a/SRC/dla_gbamv.f b/SRC/dla_gbamv.f index a998c0cf11..7d0560e71b 100644 --- a/SRC/dla_gbamv.f +++ b/SRC/dla_gbamv.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup la_gbamv * * ===================================================================== SUBROUTINE DLA_GBAMV( TRANS, M, N, KL, KU, ALPHA, AB, LDAB, X, diff --git a/SRC/dla_gbrcond.f b/SRC/dla_gbrcond.f index c5e944b8de..bddd55f13a 100644 --- a/SRC/dla_gbrcond.f +++ b/SRC/dla_gbrcond.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup la_gbrcond * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_GBRCOND( TRANS, N, KL, KU, AB, LDAB, diff --git a/SRC/dla_gbrfsx_extended.f b/SRC/dla_gbrfsx_extended.f index b331178a90..e344785d28 100644 --- a/SRC/dla_gbrfsx_extended.f +++ b/SRC/dla_gbrfsx_extended.f @@ -398,7 +398,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup la_gbrfsx_extended * * ===================================================================== SUBROUTINE DLA_GBRFSX_EXTENDED( PREC_TYPE, TRANS_TYPE, N, KL, KU, diff --git a/SRC/dla_gbrpvgrw.f b/SRC/dla_gbrpvgrw.f index 92d4da3b51..8bc8dc2702 100644 --- a/SRC/dla_gbrpvgrw.f +++ b/SRC/dla_gbrpvgrw.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup la_gbrpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_GBRPVGRW( N, KL, KU, NCOLS, AB, diff --git a/SRC/dla_geamv.f b/SRC/dla_geamv.f index 8e962b459f..72b22a2170 100644 --- a/SRC/dla_geamv.f +++ b/SRC/dla_geamv.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup la_geamv * * ===================================================================== SUBROUTINE DLA_GEAMV ( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, diff --git a/SRC/dla_gercond.f b/SRC/dla_gercond.f index 07597c0f7e..1c61604ed6 100644 --- a/SRC/dla_gercond.f +++ b/SRC/dla_gercond.f @@ -143,7 +143,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup la_gercond * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_GERCOND( TRANS, N, A, LDA, AF, diff --git a/SRC/dla_gerfsx_extended.f b/SRC/dla_gerfsx_extended.f index bf8260d045..c31afd446d 100644 --- a/SRC/dla_gerfsx_extended.f +++ b/SRC/dla_gerfsx_extended.f @@ -384,7 +384,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup la_gerfsx_extended * * ===================================================================== SUBROUTINE DLA_GERFSX_EXTENDED( PREC_TYPE, TRANS_TYPE, N, NRHS, A, diff --git a/SRC/dla_gerpvgrw.f b/SRC/dla_gerpvgrw.f index d4d668245c..d0f7868766 100644 --- a/SRC/dla_gerpvgrw.f +++ b/SRC/dla_gerpvgrw.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup la_gerpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_GERPVGRW( N, NCOLS, A, LDA, AF, diff --git a/SRC/dla_lin_berr.f b/SRC/dla_lin_berr.f index c3fab85636..3b3891c7c4 100644 --- a/SRC/dla_lin_berr.f +++ b/SRC/dla_lin_berr.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup la_lin_berr * * ===================================================================== SUBROUTINE DLA_LIN_BERR ( N, NZ, NRHS, RES, AYB, BERR ) diff --git a/SRC/dla_porcond.f b/SRC/dla_porcond.f index fd04138da4..62b8dbc909 100644 --- a/SRC/dla_porcond.f +++ b/SRC/dla_porcond.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup la_porcond * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_PORCOND( UPLO, N, A, LDA, AF, LDAF, diff --git a/SRC/dla_porfsx_extended.f b/SRC/dla_porfsx_extended.f index 94d1087cde..f074e738a3 100644 --- a/SRC/dla_porfsx_extended.f +++ b/SRC/dla_porfsx_extended.f @@ -374,7 +374,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup la_porfsx_extended * * ===================================================================== SUBROUTINE DLA_PORFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/dla_porpvgrw.f b/SRC/dla_porpvgrw.f index 00fdd7ae14..e2d8b06fcc 100644 --- a/SRC/dla_porpvgrw.f +++ b/SRC/dla_porpvgrw.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup la_porpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, diff --git a/SRC/dla_syamv.f b/SRC/dla_syamv.f index 3911e2ab2f..8172276064 100644 --- a/SRC/dla_syamv.f +++ b/SRC/dla_syamv.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup la_heamv * *> \par Further Details: * ===================== diff --git a/SRC/dla_syrcond.f b/SRC/dla_syrcond.f index 80c099773e..51da19d897 100644 --- a/SRC/dla_syrcond.f +++ b/SRC/dla_syrcond.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup la_hercond * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_SYRCOND( UPLO, N, A, LDA, AF, LDAF, diff --git a/SRC/dla_syrfsx_extended.f b/SRC/dla_syrfsx_extended.f index 2e06a622b1..59f112da0b 100644 --- a/SRC/dla_syrfsx_extended.f +++ b/SRC/dla_syrfsx_extended.f @@ -383,7 +383,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup la_herfsx_extended * * ===================================================================== SUBROUTINE DLA_SYRFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/dla_syrpvgrw.f b/SRC/dla_syrpvgrw.f index b74133e6c8..f6a235e531 100644 --- a/SRC/dla_syrpvgrw.f +++ b/SRC/dla_syrpvgrw.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup la_herpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION DLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, diff --git a/SRC/dla_wwaddw.f b/SRC/dla_wwaddw.f index 9b07a30724..2acadad65f 100644 --- a/SRC/dla_wwaddw.f +++ b/SRC/dla_wwaddw.f @@ -74,7 +74,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup la_wwaddw * * ===================================================================== SUBROUTINE DLA_WWADDW( N, X, Y, W ) diff --git a/SRC/dlabad.f b/SRC/dlabad.f index f236a763bf..da90494cc6 100644 --- a/SRC/dlabad.f +++ b/SRC/dlabad.f @@ -61,7 +61,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup labad * * ===================================================================== SUBROUTINE DLABAD( SMALL, LARGE ) diff --git a/SRC/dlabrd.f b/SRC/dlabrd.f index 86dfc10c7c..746c10327f 100644 --- a/SRC/dlabrd.f +++ b/SRC/dlabrd.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup labrd * *> \par Further Details: * ===================== diff --git a/SRC/dlacn2.f b/SRC/dlacn2.f index ee2e7ca266..d6af03d8c9 100644 --- a/SRC/dlacn2.f +++ b/SRC/dlacn2.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lacn2 * *> \par Further Details: * ===================== diff --git a/SRC/dlacon.f b/SRC/dlacon.f index c4f8a4512a..cfef6ba707 100644 --- a/SRC/dlacon.f +++ b/SRC/dlacon.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lacon * *> \par Contributors: * ================== diff --git a/SRC/dlacpy.f b/SRC/dlacpy.f index 917aa1e2a2..c6abfc62a5 100644 --- a/SRC/dlacpy.f +++ b/SRC/dlacpy.f @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lacpy * * ===================================================================== SUBROUTINE DLACPY( UPLO, M, N, A, LDA, B, LDB ) diff --git a/SRC/dladiv.f b/SRC/dladiv.f index 4265618fed..a0fbe1a618 100644 --- a/SRC/dladiv.f +++ b/SRC/dladiv.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup ladiv * * ===================================================================== SUBROUTINE DLADIV( A, B, C, D, P, Q ) @@ -170,7 +170,7 @@ SUBROUTINE DLADIV( A, B, C, D, P, Q ) * END -*> \ingroup doubleOTHERauxiliary +*> \ingroup ladiv SUBROUTINE DLADIV1( A, B, C, D, P, Q ) @@ -210,7 +210,7 @@ SUBROUTINE DLADIV1( A, B, C, D, P, Q ) * END -*> \ingroup doubleOTHERauxiliary +*> \ingroup ladiv DOUBLE PRECISION FUNCTION DLADIV2( A, B, C, D, R, T ) * diff --git a/SRC/dlae2.f b/SRC/dlae2.f index a0e3971b41..ab93c46d60 100644 --- a/SRC/dlae2.f +++ b/SRC/dlae2.f @@ -78,7 +78,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lae2 * *> \par Further Details: * ===================== diff --git a/SRC/dlaebz.f b/SRC/dlaebz.f index 980536ce67..9f86752d35 100644 --- a/SRC/dlaebz.f +++ b/SRC/dlaebz.f @@ -273,7 +273,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laebz * *> \par Further Details: * ===================== diff --git a/SRC/dlaed0.f b/SRC/dlaed0.f index fe3b6249e9..61fe7a3507 100644 --- a/SRC/dlaed0.f +++ b/SRC/dlaed0.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed0 * *> \par Contributors: * ================== diff --git a/SRC/dlaed1.f b/SRC/dlaed1.f index 3718139c14..4aaaded5eb 100644 --- a/SRC/dlaed1.f +++ b/SRC/dlaed1.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed1 * *> \par Contributors: * ================== diff --git a/SRC/dlaed2.f b/SRC/dlaed2.f index 1a53650e8d..45a77b3a23 100644 --- a/SRC/dlaed2.f +++ b/SRC/dlaed2.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed2 * *> \par Contributors: * ================== diff --git a/SRC/dlaed3.f b/SRC/dlaed3.f index f9982c89e9..f69169f4ab 100644 --- a/SRC/dlaed3.f +++ b/SRC/dlaed3.f @@ -162,7 +162,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed3 * *> \par Contributors: * ================== diff --git a/SRC/dlaed4.f b/SRC/dlaed4.f index b51e23d850..a351d7eb79 100644 --- a/SRC/dlaed4.f +++ b/SRC/dlaed4.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed4 * *> \par Contributors: * ================== diff --git a/SRC/dlaed5.f b/SRC/dlaed5.f index d9e977e6b7..29e4f707cd 100644 --- a/SRC/dlaed5.f +++ b/SRC/dlaed5.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed5 * *> \par Contributors: * ================== diff --git a/SRC/dlaed6.f b/SRC/dlaed6.f index a0c0364e56..345931d5b6 100644 --- a/SRC/dlaed6.f +++ b/SRC/dlaed6.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed6 * *> \par Further Details: * ===================== diff --git a/SRC/dlaed7.f b/SRC/dlaed7.f index d968c56752..c9fd657f7e 100644 --- a/SRC/dlaed7.f +++ b/SRC/dlaed7.f @@ -244,7 +244,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed7 * *> \par Contributors: * ================== diff --git a/SRC/dlaed8.f b/SRC/dlaed8.f index 5d1d9144d1..230951de25 100644 --- a/SRC/dlaed8.f +++ b/SRC/dlaed8.f @@ -228,7 +228,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed8 * *> \par Contributors: * ================== diff --git a/SRC/dlaed9.f b/SRC/dlaed9.f index 0d209c2c2d..90bdf23219 100644 --- a/SRC/dlaed9.f +++ b/SRC/dlaed9.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed9 * *> \par Contributors: * ================== diff --git a/SRC/dlaeda.f b/SRC/dlaeda.f index 8864fd7f2a..d45ebfecdb 100644 --- a/SRC/dlaeda.f +++ b/SRC/dlaeda.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laeda * *> \par Contributors: * ================== diff --git a/SRC/dlaein.f b/SRC/dlaein.f index 8e4c7fea1b..eac15a1b56 100644 --- a/SRC/dlaein.f +++ b/SRC/dlaein.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laein * * ===================================================================== SUBROUTINE DLAEIN( RIGHTV, NOINIT, N, H, LDH, WR, WI, VR, VI, B, diff --git a/SRC/dlaev2.f b/SRC/dlaev2.f index 9e29991a6d..f646f43299 100644 --- a/SRC/dlaev2.f +++ b/SRC/dlaev2.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laev2 * *> \par Further Details: * ===================== diff --git a/SRC/dlaexc.f b/SRC/dlaexc.f index b2a27b7776..79aeeb3a35 100644 --- a/SRC/dlaexc.f +++ b/SRC/dlaexc.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laexc * * ===================================================================== SUBROUTINE DLAEXC( WANTQ, N, T, LDT, Q, LDQ, J1, N1, N2, WORK, diff --git a/SRC/dlag2.f b/SRC/dlag2.f index 81c81a0aad..a360cba629 100644 --- a/SRC/dlag2.f +++ b/SRC/dlag2.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lag2 * * ===================================================================== SUBROUTINE DLAG2( A, LDA, B, LDB, SAFMIN, SCALE1, SCALE2, WR1, diff --git a/SRC/dlag2s.f b/SRC/dlag2s.f index 9e6dead49e..aea21fd46d 100644 --- a/SRC/dlag2s.f +++ b/SRC/dlag2s.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup _lag2_ * * ===================================================================== SUBROUTINE DLAG2S( M, N, A, LDA, SA, LDSA, INFO ) diff --git a/SRC/dlags2.f b/SRC/dlags2.f index 88caf25a82..c404cbdd99 100644 --- a/SRC/dlags2.f +++ b/SRC/dlags2.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lags2 * * ===================================================================== SUBROUTINE DLAGS2( UPPER, A1, A2, A3, B1, B2, B3, CSU, SNU, CSV, diff --git a/SRC/dlagtf.f b/SRC/dlagtf.f index 214bbb7a62..1270fbef21 100644 --- a/SRC/dlagtf.f +++ b/SRC/dlagtf.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lagtf * * ===================================================================== SUBROUTINE DLAGTF( N, A, LAMBDA, B, C, TOL, D, IN, INFO ) diff --git a/SRC/dlagtm.f b/SRC/dlagtm.f index fd443df2b5..782dc3ccff 100644 --- a/SRC/dlagtm.f +++ b/SRC/dlagtm.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lagtm * * ===================================================================== SUBROUTINE DLAGTM( TRANS, N, NRHS, ALPHA, DL, D, DU, X, LDX, BETA, diff --git a/SRC/dlagts.f b/SRC/dlagts.f index 092d1764ed..d22e1c04fe 100644 --- a/SRC/dlagts.f +++ b/SRC/dlagts.f @@ -1,4 +1,6 @@ -*> \brief \b DLAGTS solves the system of equations (T-λI)x = y or (T-λI)Tx = y,where T is a general tridiagonal matrix and λ a scalar, using the LU factorization computed by slagtf. +*> \brief \b DLAGTS solves the system of equations (T-λI)x = y +*> or (T-λI)^Tx = y, where T is a general tridiagonal matrix +*> and λ a scalar, using the LU factorization computed by slagtf. * * =========== DOCUMENTATION =========== * @@ -154,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lagts * * ===================================================================== SUBROUTINE DLAGTS( JOB, N, A, B, C, D, IN, Y, TOL, INFO ) diff --git a/SRC/dlagv2.f b/SRC/dlagv2.f index 885fe8a7d8..97bcd27ac1 100644 --- a/SRC/dlagv2.f +++ b/SRC/dlagv2.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lagv2 * *> \par Contributors: * ================== diff --git a/SRC/dlahqr.f b/SRC/dlahqr.f index e3eb293cc3..1aee37e6be 100644 --- a/SRC/dlahqr.f +++ b/SRC/dlahqr.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lahqr * *> \par Further Details: * ===================== diff --git a/SRC/dlahr2.f b/SRC/dlahr2.f index d517d5a93a..74dd70483a 100644 --- a/SRC/dlahr2.f +++ b/SRC/dlahr2.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lahr2 * *> \par Further Details: * ===================== diff --git a/SRC/dlaic1.f b/SRC/dlaic1.f index ac22d23693..8adbcaf496 100644 --- a/SRC/dlaic1.f +++ b/SRC/dlaic1.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laic1 * * ===================================================================== SUBROUTINE DLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C ) diff --git a/SRC/dlaisnan.f b/SRC/dlaisnan.f index 2caf5fb1d0..d879d9e409 100644 --- a/SRC/dlaisnan.f +++ b/SRC/dlaisnan.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laisnan * * ===================================================================== LOGICAL FUNCTION DLAISNAN( DIN1, DIN2 ) diff --git a/SRC/dlaln2.f b/SRC/dlaln2.f index b21819b056..aa0f91ca77 100644 --- a/SRC/dlaln2.f +++ b/SRC/dlaln2.f @@ -210,7 +210,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laln2 * * ===================================================================== SUBROUTINE DLALN2( LTRANS, NA, NW, SMIN, CA, A, LDA, D1, D2, B, diff --git a/SRC/dlals0.f b/SRC/dlals0.f index 928405e22c..44a8106e08 100644 --- a/SRC/dlals0.f +++ b/SRC/dlals0.f @@ -252,7 +252,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup lals0 * *> \par Contributors: * ================== diff --git a/SRC/dlalsa.f b/SRC/dlalsa.f index d89f5d2f9e..c8dc2fa4ae 100644 --- a/SRC/dlalsa.f +++ b/SRC/dlalsa.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup lalsa * *> \par Contributors: * ================== diff --git a/SRC/dlalsd.f b/SRC/dlalsd.f index 706ac4c90e..c52ae28bd5 100644 --- a/SRC/dlalsd.f +++ b/SRC/dlalsd.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup lalsd * *> \par Contributors: * ================== diff --git a/SRC/dlamrg.f b/SRC/dlamrg.f index 80bd354b97..8ecfcc6535 100644 --- a/SRC/dlamrg.f +++ b/SRC/dlamrg.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lamrg * * ===================================================================== SUBROUTINE DLAMRG( N1, N2, A, DTRD1, DTRD2, INDEX ) diff --git a/SRC/dlamswlq.f b/SRC/dlamswlq.f index 70e78f4b19..67664a85ae 100644 --- a/SRC/dlamswlq.f +++ b/SRC/dlamswlq.f @@ -189,6 +189,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup lamswlq +*> * ===================================================================== SUBROUTINE DLAMSWLQ( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/dlamtsqr.f b/SRC/dlamtsqr.f index 962a314763..9570ec6421 100644 --- a/SRC/dlamtsqr.f +++ b/SRC/dlamtsqr.f @@ -191,6 +191,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup lamtsqr +*> * ===================================================================== SUBROUTINE DLAMTSQR( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/dlaneg.f b/SRC/dlaneg.f index 2502852eba..437fe0f980 100644 --- a/SRC/dlaneg.f +++ b/SRC/dlaneg.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laneg * *> \par Contributors: * ================== diff --git a/SRC/dlangb.f b/SRC/dlangb.f index 96c9570852..ae4f558bbb 100644 --- a/SRC/dlangb.f +++ b/SRC/dlangb.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBauxiliary +*> \ingroup langb * * ===================================================================== DOUBLE PRECISION FUNCTION DLANGB( NORM, N, KL, KU, AB, LDAB, diff --git a/SRC/dlange.f b/SRC/dlange.f index 9d214cb542..79c8ad23b2 100644 --- a/SRC/dlange.f +++ b/SRC/dlange.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEauxiliary +*> \ingroup lange * * ===================================================================== DOUBLE PRECISION FUNCTION DLANGE( NORM, M, N, A, LDA, WORK ) diff --git a/SRC/dlangt.f b/SRC/dlangt.f index 61626b0aae..e8dc74ea84 100644 --- a/SRC/dlangt.f +++ b/SRC/dlangt.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup langt * * ===================================================================== DOUBLE PRECISION FUNCTION DLANGT( NORM, N, DL, D, DU ) diff --git a/SRC/dlanhs.f b/SRC/dlanhs.f index 29560e4a66..9a58d1741c 100644 --- a/SRC/dlanhs.f +++ b/SRC/dlanhs.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lanhs * * ===================================================================== DOUBLE PRECISION FUNCTION DLANHS( NORM, N, A, LDA, WORK ) diff --git a/SRC/dlansb.f b/SRC/dlansb.f index 4df8db250f..a7dd29e63a 100644 --- a/SRC/dlansb.f +++ b/SRC/dlansb.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lanhb * * ===================================================================== DOUBLE PRECISION FUNCTION DLANSB( NORM, UPLO, N, K, AB, LDAB, diff --git a/SRC/dlansf.f b/SRC/dlansf.f index 30e4248292..afdfd47896 100644 --- a/SRC/dlansf.f +++ b/SRC/dlansf.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup lanhf * *> \par Further Details: * ===================== diff --git a/SRC/dlansp.f b/SRC/dlansp.f index 50f974e1e0..71f80d1644 100644 --- a/SRC/dlansp.f +++ b/SRC/dlansp.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lanhp * * ===================================================================== DOUBLE PRECISION FUNCTION DLANSP( NORM, UPLO, N, AP, WORK ) diff --git a/SRC/dlanst.f b/SRC/dlanst.f index c5bc7ea038..1db8332dab 100644 --- a/SRC/dlanst.f +++ b/SRC/dlanst.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lanht * * ===================================================================== DOUBLE PRECISION FUNCTION DLANST( NORM, N, D, E ) diff --git a/SRC/dlansy.f b/SRC/dlansy.f index 949c5535a2..659c40a3fb 100644 --- a/SRC/dlansy.f +++ b/SRC/dlansy.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYauxiliary +*> \ingroup lanhe * * ===================================================================== DOUBLE PRECISION FUNCTION DLANSY( NORM, UPLO, N, A, LDA, WORK ) diff --git a/SRC/dlantb.f b/SRC/dlantb.f index c2bcfa6122..c8a3b10596 100644 --- a/SRC/dlantb.f +++ b/SRC/dlantb.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lantb * * ===================================================================== DOUBLE PRECISION FUNCTION DLANTB( NORM, UPLO, DIAG, N, K, AB, diff --git a/SRC/dlantp.f b/SRC/dlantp.f index 12f8b8e756..b5cba422b3 100644 --- a/SRC/dlantp.f +++ b/SRC/dlantp.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lantp * * ===================================================================== DOUBLE PRECISION FUNCTION DLANTP( NORM, UPLO, DIAG, N, AP, WORK ) diff --git a/SRC/dlantr.f b/SRC/dlantr.f index 9b68f19755..da858fc5d6 100644 --- a/SRC/dlantr.f +++ b/SRC/dlantr.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lantr * * ===================================================================== DOUBLE PRECISION FUNCTION DLANTR( NORM, UPLO, DIAG, M, N, A, LDA, diff --git a/SRC/dlanv2.f b/SRC/dlanv2.f index 204cddd02f..c55b0ce510 100644 --- a/SRC/dlanv2.f +++ b/SRC/dlanv2.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lanv2 * *> \par Further Details: * ===================== diff --git a/SRC/dlaorhr_col_getrfnp.f b/SRC/dlaorhr_col_getrfnp.f index 706bfa9b13..c4a76d35e1 100644 --- a/SRC/dlaorhr_col_getrfnp.f +++ b/SRC/dlaorhr_col_getrfnp.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup launhr_col_getrfnp * *> \par Contributors: * ================== diff --git a/SRC/dlaorhr_col_getrfnp2.f b/SRC/dlaorhr_col_getrfnp2.f index c424ca660d..a9b8443346 100644 --- a/SRC/dlaorhr_col_getrfnp2.f +++ b/SRC/dlaorhr_col_getrfnp2.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup launhr_col_getrfnp2 * *> \par Contributors: * ================== diff --git a/SRC/dlapll.f b/SRC/dlapll.f index 1cc15fb994..417d621684 100644 --- a/SRC/dlapll.f +++ b/SRC/dlapll.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lapll * * ===================================================================== SUBROUTINE DLAPLL( N, X, INCX, Y, INCY, SSMIN ) diff --git a/SRC/dlapmr.f b/SRC/dlapmr.f index 36eea184e8..a00db4a753 100644 --- a/SRC/dlapmr.f +++ b/SRC/dlapmr.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lapmr * * ===================================================================== SUBROUTINE DLAPMR( FORWRD, M, N, X, LDX, K ) diff --git a/SRC/dlapmt.f b/SRC/dlapmt.f index 19530885cf..1ace07e47d 100644 --- a/SRC/dlapmt.f +++ b/SRC/dlapmt.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lapmt * * ===================================================================== SUBROUTINE DLAPMT( FORWRD, M, N, X, LDX, K ) diff --git a/SRC/dlapy2.f b/SRC/dlapy2.f index 1f63193bb7..627cacc92d 100644 --- a/SRC/dlapy2.f +++ b/SRC/dlapy2.f @@ -56,7 +56,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lapy2 * * ===================================================================== DOUBLE PRECISION FUNCTION DLAPY2( X, Y ) diff --git a/SRC/dlapy3.f b/SRC/dlapy3.f index 230a65cdb2..b5974fb1c5 100644 --- a/SRC/dlapy3.f +++ b/SRC/dlapy3.f @@ -61,7 +61,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lapy3 * * ===================================================================== DOUBLE PRECISION FUNCTION DLAPY3( X, Y, Z ) diff --git a/SRC/dlaqgb.f b/SRC/dlaqgb.f index a13124f1e9..aa07ab35ac 100644 --- a/SRC/dlaqgb.f +++ b/SRC/dlaqgb.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBauxiliary +*> \ingroup laqgb * * ===================================================================== SUBROUTINE DLAQGB( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/dlaqge.f b/SRC/dlaqge.f index e9324cec8e..e9cad69a9e 100644 --- a/SRC/dlaqge.f +++ b/SRC/dlaqge.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEauxiliary +*> \ingroup laqge * * ===================================================================== SUBROUTINE DLAQGE( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/dlaqp2.f b/SRC/dlaqp2.f index b99de6d7d5..2945c296d5 100644 --- a/SRC/dlaqp2.f +++ b/SRC/dlaqp2.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqp2 * *> \par Contributors: * ================== diff --git a/SRC/dlaqps.f b/SRC/dlaqps.f index dda8278bb8..b4411203de 100644 --- a/SRC/dlaqps.f +++ b/SRC/dlaqps.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqps * *> \par Contributors: * ================== diff --git a/SRC/dlaqr0.f b/SRC/dlaqr0.f index 3e73b8de20..3c8753ca41 100644 --- a/SRC/dlaqr0.f +++ b/SRC/dlaqr0.f @@ -248,7 +248,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqr0 * * ===================================================================== SUBROUTINE DLAQR0( WANTT, WANTZ, N, ILO, IHI, H, LDH, WR, WI, diff --git a/SRC/dlaqr1.f b/SRC/dlaqr1.f index f411ac9556..157a73d6ed 100644 --- a/SRC/dlaqr1.f +++ b/SRC/dlaqr1.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqr1 * *> \par Contributors: * ================== diff --git a/SRC/dlaqr2.f b/SRC/dlaqr2.f index ee50484231..b79c995cba 100644 --- a/SRC/dlaqr2.f +++ b/SRC/dlaqr2.f @@ -263,7 +263,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqr2 * *> \par Contributors: * ================== diff --git a/SRC/dlaqr3.f b/SRC/dlaqr3.f index ace0a19422..34057d96d1 100644 --- a/SRC/dlaqr3.f +++ b/SRC/dlaqr3.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqr3 * *> \par Contributors: * ================== diff --git a/SRC/dlaqr4.f b/SRC/dlaqr4.f index 0668a54b24..8926fb14c6 100644 --- a/SRC/dlaqr4.f +++ b/SRC/dlaqr4.f @@ -237,7 +237,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqr4 * *> \par Contributors: * ================== diff --git a/SRC/dlaqr5.f b/SRC/dlaqr5.f index 446186553d..c889488e05 100644 --- a/SRC/dlaqr5.f +++ b/SRC/dlaqr5.f @@ -233,7 +233,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqr5 * *> \par Contributors: * ================== diff --git a/SRC/dlaqsb.f b/SRC/dlaqsb.f index 3ea4aa8be7..ff31fa204f 100644 --- a/SRC/dlaqsb.f +++ b/SRC/dlaqsb.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqhb * * ===================================================================== SUBROUTINE DLAQSB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) diff --git a/SRC/dlaqsp.f b/SRC/dlaqsp.f index dcd122e49d..8c48e85b42 100644 --- a/SRC/dlaqsp.f +++ b/SRC/dlaqsp.f @@ -118,7 +118,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqhp * * ===================================================================== SUBROUTINE DLAQSP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) diff --git a/SRC/dlaqsy.f b/SRC/dlaqsy.f index cc708180ac..77eedaefe8 100644 --- a/SRC/dlaqsy.f +++ b/SRC/dlaqsy.f @@ -126,7 +126,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYauxiliary +*> \ingroup laqhe * * ===================================================================== SUBROUTINE DLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) diff --git a/SRC/dlaqtr.f b/SRC/dlaqtr.f index cc901d65f8..ea3bf2880a 100644 --- a/SRC/dlaqtr.f +++ b/SRC/dlaqtr.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laqtr * * ===================================================================== SUBROUTINE DLAQTR( LTRAN, LREAL, N, T, LDT, B, W, SCALE, X, WORK, diff --git a/SRC/dlaqz0.f b/SRC/dlaqz0.f index 84cb96bcb2..145d11ac3a 100644 --- a/SRC/dlaqz0.f +++ b/SRC/dlaqz0.f @@ -296,7 +296,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz0 *> * ===================================================================== RECURSIVE SUBROUTINE DLAQZ0( WANTS, WANTQ, WANTZ, N, ILO, IHI, A, diff --git a/SRC/dlaqz1.f b/SRC/dlaqz1.f index b7a53ea376..9c5f402648 100644 --- a/SRC/dlaqz1.f +++ b/SRC/dlaqz1.f @@ -119,7 +119,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz1 *> * ===================================================================== SUBROUTINE DLAQZ1( A, LDA, B, LDB, SR1, SR2, SI, BETA1, BETA2, diff --git a/SRC/dlaqz2.f b/SRC/dlaqz2.f index 806e0c2530..825205b4b9 100644 --- a/SRC/dlaqz2.f +++ b/SRC/dlaqz2.f @@ -166,7 +166,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz2 *> * ===================================================================== SUBROUTINE DLAQZ2( ILQ, ILZ, K, ISTARTM, ISTOPM, IHI, A, LDA, B, diff --git a/SRC/dlaqz3.f b/SRC/dlaqz3.f index 8f7a0906b8..c2c5cb28f2 100644 --- a/SRC/dlaqz3.f +++ b/SRC/dlaqz3.f @@ -229,7 +229,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz3 *> * ===================================================================== RECURSIVE SUBROUTINE DLAQZ3( ILSCHUR, ILQ, ILZ, N, ILO, IHI, NW, diff --git a/SRC/dlaqz4.f b/SRC/dlaqz4.f index 1848727751..7b1605e782 100644 --- a/SRC/dlaqz4.f +++ b/SRC/dlaqz4.f @@ -203,7 +203,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz4 *> * ===================================================================== SUBROUTINE DLAQZ4( ILSCHUR, ILQ, ILZ, N, ILO, IHI, NSHIFTS, diff --git a/SRC/dlar1v.f b/SRC/dlar1v.f index df836c34db..9cb9f9e548 100644 --- a/SRC/dlar1v.f +++ b/SRC/dlar1v.f @@ -212,7 +212,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lar1v * *> \par Contributors: * ================== diff --git a/SRC/dlar2v.f b/SRC/dlar2v.f index c763e997ac..8d6f861497 100644 --- a/SRC/dlar2v.f +++ b/SRC/dlar2v.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lar2v * * ===================================================================== SUBROUTINE DLAR2V( N, X, Y, Z, INCX, C, S, INCC ) diff --git a/SRC/dlarf.f b/SRC/dlarf.f index ed21638645..28f6226e37 100644 --- a/SRC/dlarf.f +++ b/SRC/dlarf.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larf * * ===================================================================== SUBROUTINE DLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK ) diff --git a/SRC/dlarfb.f b/SRC/dlarfb.f index a3fa083b43..6509253ce2 100644 --- a/SRC/dlarfb.f +++ b/SRC/dlarfb.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larfb * *> \par Further Details: * ===================== diff --git a/SRC/dlarfb_gett.f b/SRC/dlarfb_gett.f index 2c7ea59b06..d8461064d4 100644 --- a/SRC/dlarfb_gett.f +++ b/SRC/dlarfb_gett.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larfb_gett * *> \par Contributors: * ================== diff --git a/SRC/dlarfg.f b/SRC/dlarfg.f index 9bfb45a6b0..1d6fb6c8e5 100644 --- a/SRC/dlarfg.f +++ b/SRC/dlarfg.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larfg * * ===================================================================== SUBROUTINE DLARFG( N, ALPHA, X, INCX, TAU ) diff --git a/SRC/dlarfgp.f b/SRC/dlarfgp.f index 69845056d4..bd7a719342 100644 --- a/SRC/dlarfgp.f +++ b/SRC/dlarfgp.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larfgp * * ===================================================================== SUBROUTINE DLARFGP( N, ALPHA, X, INCX, TAU ) diff --git a/SRC/dlarft.f b/SRC/dlarft.f index a8d9de61f1..7f32f3018b 100644 --- a/SRC/dlarft.f +++ b/SRC/dlarft.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larft * *> \par Further Details: * ===================== diff --git a/SRC/dlarfx.f b/SRC/dlarfx.f index e7665f9866..04c706d0b2 100644 --- a/SRC/dlarfx.f +++ b/SRC/dlarfx.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larfx * * ===================================================================== SUBROUTINE DLARFX( SIDE, M, N, V, TAU, C, LDC, WORK ) diff --git a/SRC/dlarfy.f b/SRC/dlarfy.f index d0c3c8b8ac..7972a62540 100644 --- a/SRC/dlarfy.f +++ b/SRC/dlarfy.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larfy * * ===================================================================== SUBROUTINE DLARFY( UPLO, N, V, INCV, TAU, C, LDC, WORK ) diff --git a/SRC/dlargv.f b/SRC/dlargv.f index 90a4f8d544..83f522e72f 100644 --- a/SRC/dlargv.f +++ b/SRC/dlargv.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup largv * * ===================================================================== SUBROUTINE DLARGV( N, X, INCX, Y, INCY, C, INCC ) diff --git a/SRC/dlarmm.f b/SRC/dlarmm.f index c360420092..f276df3655 100644 --- a/SRC/dlarmm.f +++ b/SRC/dlarmm.f @@ -54,7 +54,7 @@ *> Conference on Parallel Processing and Applied Mathematics, pages *> 68--78. Springer, 2017. *> -*> \ingroup OTHERauxiliary +*> \ingroup larmm * ===================================================================== DOUBLE PRECISION FUNCTION DLARMM( ANORM, BNORM, CNORM ) diff --git a/SRC/dlarnv.f b/SRC/dlarnv.f index 3557d215c1..30b76542e3 100644 --- a/SRC/dlarnv.f +++ b/SRC/dlarnv.f @@ -79,7 +79,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larnv * *> \par Further Details: * ===================== diff --git a/SRC/dlarra.f b/SRC/dlarra.f index a62a079da0..f325d725d5 100644 --- a/SRC/dlarra.f +++ b/SRC/dlarra.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larra * *> \par Contributors: * ================== diff --git a/SRC/dlarrb.f b/SRC/dlarrb.f index 839b1d41ba..2ebdaeebd2 100644 --- a/SRC/dlarrb.f +++ b/SRC/dlarrb.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrb * *> \par Contributors: * ================== diff --git a/SRC/dlarrc.f b/SRC/dlarrc.f index d3fea59666..9f3eed0140 100644 --- a/SRC/dlarrc.f +++ b/SRC/dlarrc.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrc * *> \par Contributors: * ================== diff --git a/SRC/dlarrd.f b/SRC/dlarrd.f index ea1896adf2..198ce2f552 100644 --- a/SRC/dlarrd.f +++ b/SRC/dlarrd.f @@ -319,7 +319,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrd * * ===================================================================== SUBROUTINE DLARRD( RANGE, ORDER, N, VL, VU, IL, IU, GERS, diff --git a/SRC/dlarre.f b/SRC/dlarre.f index 1cceed1a2e..5c8ea205ed 100644 --- a/SRC/dlarre.f +++ b/SRC/dlarre.f @@ -276,7 +276,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larre * *> \par Further Details: * ===================== diff --git a/SRC/dlarrf.f b/SRC/dlarrf.f index a496e1b2d8..d7c6195e5b 100644 --- a/SRC/dlarrf.f +++ b/SRC/dlarrf.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrf * *> \par Contributors: * ================== diff --git a/SRC/dlarrj.f b/SRC/dlarrj.f index f6abd84e7f..5596af3725 100644 --- a/SRC/dlarrj.f +++ b/SRC/dlarrj.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrj * *> \par Contributors: * ================== diff --git a/SRC/dlarrk.f b/SRC/dlarrk.f index 6c56a9baba..347ff0af3b 100644 --- a/SRC/dlarrk.f +++ b/SRC/dlarrk.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrk * * ===================================================================== SUBROUTINE DLARRK( N, IW, GL, GU, diff --git a/SRC/dlarrr.f b/SRC/dlarrr.f index 3bd6beb308..23ab364642 100644 --- a/SRC/dlarrr.f +++ b/SRC/dlarrr.f @@ -78,7 +78,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrr * *> \par Contributors: * ================== diff --git a/SRC/dlarrv.f b/SRC/dlarrv.f index 2994303612..7bf7a3e1d7 100644 --- a/SRC/dlarrv.f +++ b/SRC/dlarrv.f @@ -272,7 +272,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup larrv * *> \par Contributors: * ================== diff --git a/SRC/dlarscl2.f b/SRC/dlarscl2.f index cc4b9aa3c1..3857447e6d 100644 --- a/SRC/dlarscl2.f +++ b/SRC/dlarscl2.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup larscl2 * * ===================================================================== SUBROUTINE DLARSCL2 ( M, N, D, X, LDX ) diff --git a/SRC/dlartg.f90 b/SRC/dlartg.f90 index b7049c32f1..b96b8d49fc 100644 --- a/SRC/dlartg.f90 +++ b/SRC/dlartg.f90 @@ -88,7 +88,7 @@ ! !> \date July 2016 ! -!> \ingroup OTHERauxiliary +!> \ingroup lartg ! !> \par Contributors: ! ================== diff --git a/SRC/dlartgp.f b/SRC/dlartgp.f index 8aeb2edbb8..d437039b77 100644 --- a/SRC/dlartgp.f +++ b/SRC/dlartgp.f @@ -88,7 +88,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lartgp * * ===================================================================== SUBROUTINE DLARTGP( F, G, CS, SN, R ) diff --git a/SRC/dlartgs.f b/SRC/dlartgs.f index 2310df87fa..abfac6e65b 100644 --- a/SRC/dlartgs.f +++ b/SRC/dlartgs.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lartgs * * ===================================================================== SUBROUTINE DLARTGS( X, Y, SIGMA, CS, SN ) diff --git a/SRC/dlartv.f b/SRC/dlartv.f index 85f5136cd5..18f2f9cfc6 100644 --- a/SRC/dlartv.f +++ b/SRC/dlartv.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lartv * * ===================================================================== SUBROUTINE DLARTV( N, X, INCX, Y, INCY, C, S, INCC ) diff --git a/SRC/dlaruv.f b/SRC/dlaruv.f index 1a4ce40092..1bacb0bb6f 100644 --- a/SRC/dlaruv.f +++ b/SRC/dlaruv.f @@ -72,7 +72,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laruv * *> \par Further Details: * ===================== diff --git a/SRC/dlarz.f b/SRC/dlarz.f index 2c628a7f51..329b44a81e 100644 --- a/SRC/dlarz.f +++ b/SRC/dlarz.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup larz * *> \par Contributors: * ================== diff --git a/SRC/dlarzb.f b/SRC/dlarzb.f index d7b8fd2c19..0f0f68f828 100644 --- a/SRC/dlarzb.f +++ b/SRC/dlarzb.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup larzb * *> \par Contributors: * ================== diff --git a/SRC/dlarzt.f b/SRC/dlarzt.f index f24b690a40..b7fa731d65 100644 --- a/SRC/dlarzt.f +++ b/SRC/dlarzt.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup larzt * *> \par Contributors: * ================== diff --git a/SRC/dlas2.f b/SRC/dlas2.f index ff75e3942f..11ae217cf1 100644 --- a/SRC/dlas2.f +++ b/SRC/dlas2.f @@ -78,7 +78,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup las2 * *> \par Further Details: * ===================== diff --git a/SRC/dlascl.f b/SRC/dlascl.f index 0a4bf21ce1..0f92c32511 100644 --- a/SRC/dlascl.f +++ b/SRC/dlascl.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lascl * * ===================================================================== SUBROUTINE DLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO ) diff --git a/SRC/dlascl2.f b/SRC/dlascl2.f index 568e296ad0..edb816f0da 100644 --- a/SRC/dlascl2.f +++ b/SRC/dlascl2.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup lascl2 * * ===================================================================== SUBROUTINE DLASCL2 ( M, N, D, X, LDX ) diff --git a/SRC/dlasd0.f b/SRC/dlasd0.f index 6d8d4e2db3..a689234b4b 100644 --- a/SRC/dlasd0.f +++ b/SRC/dlasd0.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd0 * *> \par Contributors: * ================== diff --git a/SRC/dlasd1.f b/SRC/dlasd1.f index f17bf94853..926b26cd2f 100644 --- a/SRC/dlasd1.f +++ b/SRC/dlasd1.f @@ -190,7 +190,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd1 * *> \par Contributors: * ================== diff --git a/SRC/dlasd2.f b/SRC/dlasd2.f index 378faa6813..94f0b1542e 100644 --- a/SRC/dlasd2.f +++ b/SRC/dlasd2.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd2 * *> \par Contributors: * ================== diff --git a/SRC/dlasd3.f b/SRC/dlasd3.f index 44957377b3..f44ac44195 100644 --- a/SRC/dlasd3.f +++ b/SRC/dlasd3.f @@ -202,7 +202,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd3 * *> \par Contributors: * ================== diff --git a/SRC/dlasd4.f b/SRC/dlasd4.f index acfd896b3b..45a85f476d 100644 --- a/SRC/dlasd4.f +++ b/SRC/dlasd4.f @@ -140,7 +140,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd4 * *> \par Contributors: * ================== diff --git a/SRC/dlasd5.f b/SRC/dlasd5.f index 645c2fdc3e..df508a60df 100644 --- a/SRC/dlasd5.f +++ b/SRC/dlasd5.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd5 * *> \par Contributors: * ================== diff --git a/SRC/dlasd6.f b/SRC/dlasd6.f index 51e67588dd..9d394629b7 100644 --- a/SRC/dlasd6.f +++ b/SRC/dlasd6.f @@ -297,7 +297,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd6 * *> \par Contributors: * ================== diff --git a/SRC/dlasd7.f b/SRC/dlasd7.f index ff9ba4c36a..3c22ea7c91 100644 --- a/SRC/dlasd7.f +++ b/SRC/dlasd7.f @@ -264,7 +264,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd7 * *> \par Contributors: * ================== diff --git a/SRC/dlasd8.f b/SRC/dlasd8.f index 73c3ef0b4d..865bbdbf0b 100644 --- a/SRC/dlasd8.f +++ b/SRC/dlasd8.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd8 * *> \par Contributors: * ================== diff --git a/SRC/dlasda.f b/SRC/dlasda.f index 3e169a4edb..d75913a0eb 100644 --- a/SRC/dlasda.f +++ b/SRC/dlasda.f @@ -258,7 +258,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasda * *> \par Contributors: * ================== diff --git a/SRC/dlasdq.f b/SRC/dlasdq.f index 0c39b24f0d..072e8a034a 100644 --- a/SRC/dlasdq.f +++ b/SRC/dlasdq.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasdq * *> \par Contributors: * ================== diff --git a/SRC/dlasdt.f b/SRC/dlasdt.f index 0d9999ea62..9fc1b77e4f 100644 --- a/SRC/dlasdt.f +++ b/SRC/dlasdt.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasdt * *> \par Contributors: * ================== diff --git a/SRC/dlaset.f b/SRC/dlaset.f index 625c757b6b..e527d794b0 100644 --- a/SRC/dlaset.f +++ b/SRC/dlaset.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laset * * ===================================================================== SUBROUTINE DLASET( UPLO, M, N, ALPHA, BETA, A, LDA ) diff --git a/SRC/dlasq1.f b/SRC/dlasq1.f index 27fa30736e..e2ad43cc61 100644 --- a/SRC/dlasq1.f +++ b/SRC/dlasq1.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq1 * * ===================================================================== SUBROUTINE DLASQ1( N, D, E, WORK, INFO ) diff --git a/SRC/dlasq2.f b/SRC/dlasq2.f index 608ca7a619..e8b8ec5e1f 100644 --- a/SRC/dlasq2.f +++ b/SRC/dlasq2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq2 * *> \par Further Details: * ===================== diff --git a/SRC/dlasq3.f b/SRC/dlasq3.f index e4bdafe06e..67d4d08420 100644 --- a/SRC/dlasq3.f +++ b/SRC/dlasq3.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq3 * * ===================================================================== SUBROUTINE DLASQ3( I0, N0, Z, PP, DMIN, SIGMA, DESIG, QMAX, NFAIL, diff --git a/SRC/dlasq4.f b/SRC/dlasq4.f index 2652ddb2ba..d96d51ab14 100644 --- a/SRC/dlasq4.f +++ b/SRC/dlasq4.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq4 * *> \par Further Details: * ===================== diff --git a/SRC/dlasq5.f b/SRC/dlasq5.f index 5679ab60a5..3e87ef7bc9 100644 --- a/SRC/dlasq5.f +++ b/SRC/dlasq5.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq5 * * ===================================================================== SUBROUTINE DLASQ5( I0, N0, Z, PP, TAU, SIGMA, DMIN, DMIN1, DMIN2, diff --git a/SRC/dlasq6.f b/SRC/dlasq6.f index 9218b5060e..7aff8f37c0 100644 --- a/SRC/dlasq6.f +++ b/SRC/dlasq6.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq6 * * ===================================================================== SUBROUTINE DLASQ6( I0, N0, Z, PP, DMIN, DMIN1, DMIN2, DN, diff --git a/SRC/dlasr.f b/SRC/dlasr.f index dd0cedd85e..794b489632 100644 --- a/SRC/dlasr.f +++ b/SRC/dlasr.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasr * * ===================================================================== SUBROUTINE DLASR( SIDE, PIVOT, DIRECT, M, N, C, S, A, LDA ) diff --git a/SRC/dlasrt.f b/SRC/dlasrt.f index d789239e3d..0232f64133 100644 --- a/SRC/dlasrt.f +++ b/SRC/dlasrt.f @@ -81,7 +81,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasrt * * ===================================================================== SUBROUTINE DLASRT( ID, N, D, INFO ) diff --git a/SRC/dlasv2.f b/SRC/dlasv2.f index cb2bf51c46..4bd6b34a31 100644 --- a/SRC/dlasv2.f +++ b/SRC/dlasv2.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasv2 * *> \par Further Details: * ===================== diff --git a/SRC/dlaswlq.f b/SRC/dlaswlq.f index c95c94cbc4..8955b76d30 100644 --- a/SRC/dlaswlq.f +++ b/SRC/dlaswlq.f @@ -159,6 +159,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup laswlq +*> * ===================================================================== SUBROUTINE DLASWLQ( M, N, MB, NB, A, LDA, T, LDT, WORK, LWORK, $ INFO) diff --git a/SRC/dlaswp.f b/SRC/dlaswp.f index b35729a205..43dcaf8d54 100644 --- a/SRC/dlaswp.f +++ b/SRC/dlaswp.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup laswp * *> \par Further Details: * ===================== diff --git a/SRC/dlasy2.f b/SRC/dlasy2.f index 18245202cc..ba91ae454a 100644 --- a/SRC/dlasy2.f +++ b/SRC/dlasy2.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYauxiliary +*> \ingroup lasy2 * * ===================================================================== SUBROUTINE DLASY2( LTRANL, LTRANR, ISGN, N1, N2, TL, LDTL, TR, diff --git a/SRC/dlasyf.f b/SRC/dlasyf.f index 3064f5e1e4..5aa3669788 100644 --- a/SRC/dlasyf.f +++ b/SRC/dlasyf.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup lahef * *> \par Contributors: * ================== diff --git a/SRC/dlasyf_aa.f b/SRC/dlasyf_aa.f index f6b01ea6c0..6c5cf6717b 100644 --- a/SRC/dlasyf_aa.f +++ b/SRC/dlasyf_aa.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup lahef_aa * * ===================================================================== SUBROUTINE DLASYF_AA( UPLO, J1, M, NB, A, LDA, IPIV, diff --git a/SRC/dlasyf_rk.f b/SRC/dlasyf_rk.f index 1a0117738f..4f30db88a9 100644 --- a/SRC/dlasyf_rk.f +++ b/SRC/dlasyf_rk.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup lahef_rk * *> \par Contributors: * ================== diff --git a/SRC/dlasyf_rook.f b/SRC/dlasyf_rook.f index 03bcd91a34..fc8092d06f 100644 --- a/SRC/dlasyf_rook.f +++ b/SRC/dlasyf_rook.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup lahef_rook * *> \par Contributors: * ================== diff --git a/SRC/dlat2s.f b/SRC/dlat2s.f index c926e99307..5dc33838d8 100644 --- a/SRC/dlat2s.f +++ b/SRC/dlat2s.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup _lat2_ * * ===================================================================== SUBROUTINE DLAT2S( UPLO, N, A, LDA, SA, LDSA, INFO ) diff --git a/SRC/dlatbs.f b/SRC/dlatbs.f index 6a812743b0..5726596d8c 100644 --- a/SRC/dlatbs.f +++ b/SRC/dlatbs.f @@ -162,7 +162,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latbs * *> \par Further Details: * ===================== diff --git a/SRC/dlatdf.f b/SRC/dlatdf.f index bb285c4956..35083457af 100644 --- a/SRC/dlatdf.f +++ b/SRC/dlatdf.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latdf * *> \par Further Details: * ===================== diff --git a/SRC/dlatps.f b/SRC/dlatps.f index 0aead85563..3dabade7db 100644 --- a/SRC/dlatps.f +++ b/SRC/dlatps.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latps * *> \par Further Details: * ===================== diff --git a/SRC/dlatrd.f b/SRC/dlatrd.f index 010a85a212..cc815d72d4 100644 --- a/SRC/dlatrd.f +++ b/SRC/dlatrd.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latrd * *> \par Further Details: * ===================== diff --git a/SRC/dlatrs.f b/SRC/dlatrs.f index be156bee20..72f3a3f525 100644 --- a/SRC/dlatrs.f +++ b/SRC/dlatrs.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latrs * *> \par Further Details: * ===================== diff --git a/SRC/dlatrs3.f b/SRC/dlatrs3.f index e6d78b672c..c66c399c9f 100644 --- a/SRC/dlatrs3.f +++ b/SRC/dlatrs3.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latrs3 *> \par Further Details: * ===================== * \verbatim diff --git a/SRC/dlatrz.f b/SRC/dlatrz.f index 42b3171313..dc94703970 100644 --- a/SRC/dlatrz.f +++ b/SRC/dlatrz.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup latrz * *> \par Contributors: * ================== diff --git a/SRC/dlatsqr.f b/SRC/dlatsqr.f index 94a04be028..c306fecc66 100644 --- a/SRC/dlatsqr.f +++ b/SRC/dlatsqr.f @@ -161,6 +161,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup latsqr +*> * ===================================================================== SUBROUTINE DLATSQR( M, N, MB, NB, A, LDA, T, LDT, WORK, $ LWORK, INFO) diff --git a/SRC/dlauu2.f b/SRC/dlauu2.f index a026d96de1..e0c9ad84a0 100644 --- a/SRC/dlauu2.f +++ b/SRC/dlauu2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lauu2 * * ===================================================================== SUBROUTINE DLAUU2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/dlauum.f b/SRC/dlauum.f index b832eaa869..611bd4283b 100644 --- a/SRC/dlauum.f +++ b/SRC/dlauum.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup lauum * * ===================================================================== SUBROUTINE DLAUUM( UPLO, N, A, LDA, INFO ) diff --git a/SRC/dopgtr.f b/SRC/dopgtr.f index 214030ffbe..bf2f6c5fa3 100644 --- a/SRC/dopgtr.f +++ b/SRC/dopgtr.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup upgtr * * ===================================================================== SUBROUTINE DOPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO ) diff --git a/SRC/dopmtr.f b/SRC/dopmtr.f index c18074deca..a877a51d76 100644 --- a/SRC/dopmtr.f +++ b/SRC/dopmtr.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup upmtr * * ===================================================================== SUBROUTINE DOPMTR( SIDE, UPLO, TRANS, M, N, AP, TAU, C, LDC, WORK, diff --git a/SRC/dorbdb.f b/SRC/dorbdb.f index 3edfda6b84..a1c1a68af6 100644 --- a/SRC/dorbdb.f +++ b/SRC/dorbdb.f @@ -255,7 +255,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unbdb * *> \par Further Details: * ===================== diff --git a/SRC/dorbdb1.f b/SRC/dorbdb1.f index b5b2d13623..828b2dd6ca 100644 --- a/SRC/dorbdb1.f +++ b/SRC/dorbdb1.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unbdb1 * *> \par Further Details: * ===================== diff --git a/SRC/dorbdb2.f b/SRC/dorbdb2.f index 0b4ad732c1..3585334ef2 100644 --- a/SRC/dorbdb2.f +++ b/SRC/dorbdb2.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unbdb2 * *> \par Further Details: * ===================== diff --git a/SRC/dorbdb3.f b/SRC/dorbdb3.f index 79b10a5d36..e22d975bdf 100644 --- a/SRC/dorbdb3.f +++ b/SRC/dorbdb3.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unbdb3 * *> \par Further Details: * ===================== diff --git a/SRC/dorbdb4.f b/SRC/dorbdb4.f index 985be3277e..b7f042c81d 100644 --- a/SRC/dorbdb4.f +++ b/SRC/dorbdb4.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unbdb4 * *> \par Further Details: * ===================== diff --git a/SRC/dorbdb5.f b/SRC/dorbdb5.f index 6e057a05f8..07b7a024d3 100644 --- a/SRC/dorbdb5.f +++ b/SRC/dorbdb5.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unbdb5 * * ===================================================================== SUBROUTINE DORBDB5( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, diff --git a/SRC/dorbdb6.f b/SRC/dorbdb6.f index 45c8ba8a28..386faca040 100644 --- a/SRC/dorbdb6.f +++ b/SRC/dorbdb6.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unbdb6 * * ===================================================================== SUBROUTINE DORBDB6( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, diff --git a/SRC/dorcsd.f b/SRC/dorcsd.f index 86463bd9b3..947f401cda 100644 --- a/SRC/dorcsd.f +++ b/SRC/dorcsd.f @@ -289,7 +289,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup uncsd * * ===================================================================== RECURSIVE SUBROUTINE DORCSD( JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, diff --git a/SRC/dorcsd2by1.f b/SRC/dorcsd2by1.f index 25fab0f33c..bf427f94f4 100644 --- a/SRC/dorcsd2by1.f +++ b/SRC/dorcsd2by1.f @@ -224,7 +224,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup uncsd2by1 * * ===================================================================== SUBROUTINE DORCSD2BY1( JOBU1, JOBU2, JOBV1T, M, P, Q, X11, LDX11, diff --git a/SRC/dorg2l.f b/SRC/dorg2l.f index 0a42d4cf5a..85d6e7c354 100644 --- a/SRC/dorg2l.f +++ b/SRC/dorg2l.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ung2l * * ===================================================================== SUBROUTINE DORG2L( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/dorg2r.f b/SRC/dorg2r.f index c64ad4b0ac..221b52bb8c 100644 --- a/SRC/dorg2r.f +++ b/SRC/dorg2r.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ung2r * * ===================================================================== SUBROUTINE DORG2R( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/dorgbr.f b/SRC/dorgbr.f index 7dfd03961e..2d1f7868f5 100644 --- a/SRC/dorgbr.f +++ b/SRC/dorgbr.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGBcomputational +*> \ingroup ungbr * * ===================================================================== SUBROUTINE DORGBR( VECT, M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/dorghr.f b/SRC/dorghr.f index 2feb39b5aa..a228787629 100644 --- a/SRC/dorghr.f +++ b/SRC/dorghr.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unghr * * ===================================================================== SUBROUTINE DORGHR( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/dorgl2.f b/SRC/dorgl2.f index ce1d2c6750..98128b25d5 100644 --- a/SRC/dorgl2.f +++ b/SRC/dorgl2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ungl2 * * ===================================================================== SUBROUTINE DORGL2( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/dorglq.f b/SRC/dorglq.f index 8c37c18b75..8b3b4deb85 100644 --- a/SRC/dorglq.f +++ b/SRC/dorglq.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unglq * * ===================================================================== SUBROUTINE DORGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/dorgql.f b/SRC/dorgql.f index 45e5bf19f1..093ecd7fa2 100644 --- a/SRC/dorgql.f +++ b/SRC/dorgql.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ungql * * ===================================================================== SUBROUTINE DORGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/dorgqr.f b/SRC/dorgqr.f index a41ce7ed56..99a9c6a8ee 100644 --- a/SRC/dorgqr.f +++ b/SRC/dorgqr.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ungqr * * ===================================================================== SUBROUTINE DORGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/dorgr2.f b/SRC/dorgr2.f index 5244c85fd0..30888bb941 100644 --- a/SRC/dorgr2.f +++ b/SRC/dorgr2.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ungr2 * * ===================================================================== SUBROUTINE DORGR2( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/dorgrq.f b/SRC/dorgrq.f index 7e09f94e5b..351d015d4c 100644 --- a/SRC/dorgrq.f +++ b/SRC/dorgrq.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ungrq * * ===================================================================== SUBROUTINE DORGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/dorgtr.f b/SRC/dorgtr.f index 0a0ab15a78..2dae658828 100644 --- a/SRC/dorgtr.f +++ b/SRC/dorgtr.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ungtr * * ===================================================================== SUBROUTINE DORGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/dorgtsqr.f b/SRC/dorgtsqr.f index 2e5cd40bec..323ffe0aab 100644 --- a/SRC/dorgtsqr.f +++ b/SRC/dorgtsqr.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ungtsqr * *> \par Contributors: * ================== diff --git a/SRC/dorgtsqr_row.f b/SRC/dorgtsqr_row.f index 94f8b01206..95cb02cc2e 100644 --- a/SRC/dorgtsqr_row.f +++ b/SRC/dorgtsqr_row.f @@ -169,7 +169,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ungtsqr_row * *> \par Contributors: * ================== diff --git a/SRC/dorhr_col.f b/SRC/dorhr_col.f index 794ecab78e..470d3be1b4 100644 --- a/SRC/dorhr_col.f +++ b/SRC/dorhr_col.f @@ -241,7 +241,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unhr_col * *> \par Contributors: * ================== diff --git a/SRC/dorm22.f b/SRC/dorm22.f index 7a25660404..ab874de5ae 100644 --- a/SRC/dorm22.f +++ b/SRC/dorm22.f @@ -155,7 +155,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unm22 * * ===================================================================== SUBROUTINE DORM22( SIDE, TRANS, M, N, N1, N2, Q, LDQ, C, LDC, diff --git a/SRC/dorm2l.f b/SRC/dorm2l.f index c99039c541..b1a27ab21b 100644 --- a/SRC/dorm2l.f +++ b/SRC/dorm2l.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unm2l * * ===================================================================== SUBROUTINE DORM2L( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/dorm2r.f b/SRC/dorm2r.f index ac88eec8dc..7bb0a6da21 100644 --- a/SRC/dorm2r.f +++ b/SRC/dorm2r.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unm2r * * ===================================================================== SUBROUTINE DORM2R( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/dormbr.f b/SRC/dormbr.f index 86abb10072..d1778c323f 100644 --- a/SRC/dormbr.f +++ b/SRC/dormbr.f @@ -187,7 +187,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmbr * * ===================================================================== SUBROUTINE DORMBR( VECT, SIDE, TRANS, M, N, K, A, LDA, TAU, C, diff --git a/SRC/dormhr.f b/SRC/dormhr.f index 1cf1731743..5cac673a47 100644 --- a/SRC/dormhr.f +++ b/SRC/dormhr.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmhr * * ===================================================================== SUBROUTINE DORMHR( SIDE, TRANS, M, N, ILO, IHI, A, LDA, TAU, C, diff --git a/SRC/dorml2.f b/SRC/dorml2.f index a9ddd460d8..fcdf5b1b13 100644 --- a/SRC/dorml2.f +++ b/SRC/dorml2.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unml2 * * ===================================================================== SUBROUTINE DORML2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/dormlq.f b/SRC/dormlq.f index ef039285ab..17eea7fd83 100644 --- a/SRC/dormlq.f +++ b/SRC/dormlq.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmlq * * ===================================================================== SUBROUTINE DORMLQ( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/dormql.f b/SRC/dormql.f index 7c9f189e0d..638f4167f9 100644 --- a/SRC/dormql.f +++ b/SRC/dormql.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmql * * ===================================================================== SUBROUTINE DORMQL( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/dormqr.f b/SRC/dormqr.f index 4d0bae3a5f..1e5d4b38ae 100644 --- a/SRC/dormqr.f +++ b/SRC/dormqr.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmqr * * ===================================================================== SUBROUTINE DORMQR( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/dormr2.f b/SRC/dormr2.f index 8f15c6eb4d..4d91aca411 100644 --- a/SRC/dormr2.f +++ b/SRC/dormr2.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmr2 * * ===================================================================== SUBROUTINE DORMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/dormr3.f b/SRC/dormr3.f index 9eaef200ae..aad1e8fa03 100644 --- a/SRC/dormr3.f +++ b/SRC/dormr3.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmr3 * *> \par Contributors: * ================== diff --git a/SRC/dormrq.f b/SRC/dormrq.f index 43422f9583..2355e0f336 100644 --- a/SRC/dormrq.f +++ b/SRC/dormrq.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmrq * * ===================================================================== SUBROUTINE DORMRQ( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/dormrz.f b/SRC/dormrz.f index 0dea1b5ff1..2e209f988e 100644 --- a/SRC/dormrz.f +++ b/SRC/dormrz.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmrz * *> \par Contributors: * ================== diff --git a/SRC/dormtr.f b/SRC/dormtr.f index 1f664d63cc..04991866fd 100644 --- a/SRC/dormtr.f +++ b/SRC/dormtr.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup unmtr * * ===================================================================== SUBROUTINE DORMTR( SIDE, UPLO, TRANS, M, N, A, LDA, TAU, C, LDC, diff --git a/SRC/dpbcon.f b/SRC/dpbcon.f index 27ea5e234f..a450fe299d 100644 --- a/SRC/dpbcon.f +++ b/SRC/dpbcon.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pbcon * * ===================================================================== SUBROUTINE DPBCON( UPLO, N, KD, AB, LDAB, ANORM, RCOND, WORK, diff --git a/SRC/dpbequ.f b/SRC/dpbequ.f index 01c2cd0886..ab7e8eda26 100644 --- a/SRC/dpbequ.f +++ b/SRC/dpbequ.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pbequ * * ===================================================================== SUBROUTINE DPBEQU( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, INFO ) diff --git a/SRC/dpbrfs.f b/SRC/dpbrfs.f index d7a854f02d..abad05466e 100644 --- a/SRC/dpbrfs.f +++ b/SRC/dpbrfs.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pbrfs * * ===================================================================== SUBROUTINE DPBRFS( UPLO, N, KD, NRHS, AB, LDAB, AFB, LDAFB, B, diff --git a/SRC/dpbstf.f b/SRC/dpbstf.f index 61068d9cd8..471ddf77d2 100644 --- a/SRC/dpbstf.f +++ b/SRC/dpbstf.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pbstf * *> \par Further Details: * ===================== diff --git a/SRC/dpbsv.f b/SRC/dpbsv.f index 2d8f064408..2ea8ec188e 100644 --- a/SRC/dpbsv.f +++ b/SRC/dpbsv.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERsolve +*> \ingroup pbsv * *> \par Further Details: * ===================== diff --git a/SRC/dpbsvx.f b/SRC/dpbsvx.f index 142dda5da5..8a307d76a4 100644 --- a/SRC/dpbsvx.f +++ b/SRC/dpbsvx.f @@ -302,7 +302,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERsolve +*> \ingroup pbsvx * *> \par Further Details: * ===================== diff --git a/SRC/dpbtf2.f b/SRC/dpbtf2.f index 1284c9ec86..b2b4956110 100644 --- a/SRC/dpbtf2.f +++ b/SRC/dpbtf2.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pbtf2 * *> \par Further Details: * ===================== diff --git a/SRC/dpbtrf.f b/SRC/dpbtrf.f index 29e9aaecd4..12271285bd 100644 --- a/SRC/dpbtrf.f +++ b/SRC/dpbtrf.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pbtrf * *> \par Further Details: * ===================== diff --git a/SRC/dpbtrs.f b/SRC/dpbtrs.f index 134b3b1d5c..532b48d9a3 100644 --- a/SRC/dpbtrs.f +++ b/SRC/dpbtrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pbtrs * * ===================================================================== SUBROUTINE DPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) diff --git a/SRC/dpftrf.f b/SRC/dpftrf.f index 312dcdf843..8d0cae7f83 100644 --- a/SRC/dpftrf.f +++ b/SRC/dpftrf.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pftrf * *> \par Further Details: * ===================== diff --git a/SRC/dpftri.f b/SRC/dpftri.f index dca45d32cd..95d858cd57 100644 --- a/SRC/dpftri.f +++ b/SRC/dpftri.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pftri * *> \par Further Details: * ===================== diff --git a/SRC/dpftrs.f b/SRC/dpftrs.f index adbe677a4a..abbf0cc0f4 100644 --- a/SRC/dpftrs.f +++ b/SRC/dpftrs.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pftrs * *> \par Further Details: * ===================== diff --git a/SRC/dpocon.f b/SRC/dpocon.f index 4cdc010da2..8a654380bd 100644 --- a/SRC/dpocon.f +++ b/SRC/dpocon.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup pocon * * ===================================================================== SUBROUTINE DPOCON( UPLO, N, A, LDA, ANORM, RCOND, WORK, IWORK, diff --git a/SRC/dpoequ.f b/SRC/dpoequ.f index c6223a6e51..a04fb13277 100644 --- a/SRC/dpoequ.f +++ b/SRC/dpoequ.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup poequ * * ===================================================================== SUBROUTINE DPOEQU( N, A, LDA, S, SCOND, AMAX, INFO ) diff --git a/SRC/dpoequb.f b/SRC/dpoequb.f index 0706834a10..d8936c4099 100644 --- a/SRC/dpoequb.f +++ b/SRC/dpoequb.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup poequb * * ===================================================================== SUBROUTINE DPOEQUB( N, A, LDA, S, SCOND, AMAX, INFO ) diff --git a/SRC/dporfs.f b/SRC/dporfs.f index 4b4a209373..1950d1a55a 100644 --- a/SRC/dporfs.f +++ b/SRC/dporfs.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup porfs * * ===================================================================== SUBROUTINE DPORFS( UPLO, N, NRHS, A, LDA, AF, LDAF, B, LDB, X, diff --git a/SRC/dporfsx.f b/SRC/dporfsx.f index a7937f0dce..ba56232b7a 100644 --- a/SRC/dporfsx.f +++ b/SRC/dporfsx.f @@ -384,7 +384,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup porfsx * * ===================================================================== SUBROUTINE DPORFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, S, B, diff --git a/SRC/dposv.f b/SRC/dposv.f index cb76e99771..62a60645ce 100644 --- a/SRC/dposv.f +++ b/SRC/dposv.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOsolve +*> \ingroup posv * * ===================================================================== SUBROUTINE DPOSV( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) diff --git a/SRC/dposvx.f b/SRC/dposvx.f index faffff803d..0b8264336d 100644 --- a/SRC/dposvx.f +++ b/SRC/dposvx.f @@ -298,7 +298,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOsolve +*> \ingroup posvx * * ===================================================================== SUBROUTINE DPOSVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, EQUED, diff --git a/SRC/dposvxx.f b/SRC/dposvxx.f index b5336cf635..18b800eb86 100644 --- a/SRC/dposvxx.f +++ b/SRC/dposvxx.f @@ -484,7 +484,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOsolve +*> \ingroup posvxx * * ===================================================================== SUBROUTINE DPOSVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, EQUED, diff --git a/SRC/dpotf2.f b/SRC/dpotf2.f index 30da5c3f34..3255ec8f5f 100644 --- a/SRC/dpotf2.f +++ b/SRC/dpotf2.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup potf2 * * ===================================================================== SUBROUTINE DPOTF2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/dpotrf.f b/SRC/dpotrf.f index 65509feb8f..561291b7a9 100644 --- a/SRC/dpotrf.f +++ b/SRC/dpotrf.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup potrf * * ===================================================================== SUBROUTINE DPOTRF( UPLO, N, A, LDA, INFO ) diff --git a/SRC/dpotrf2.f b/SRC/dpotrf2.f index aaf9b9c585..5f06352175 100644 --- a/SRC/dpotrf2.f +++ b/SRC/dpotrf2.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup potrf2 * * ===================================================================== RECURSIVE SUBROUTINE DPOTRF2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/dpotri.f b/SRC/dpotri.f index 7daa0c8c43..d3bf8ee2d3 100644 --- a/SRC/dpotri.f +++ b/SRC/dpotri.f @@ -88,7 +88,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup potri * * ===================================================================== SUBROUTINE DPOTRI( UPLO, N, A, LDA, INFO ) diff --git a/SRC/dpotrs.f b/SRC/dpotrs.f index 862ee078fd..596e9869e7 100644 --- a/SRC/dpotrs.f +++ b/SRC/dpotrs.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOcomputational +*> \ingroup potrs * * ===================================================================== SUBROUTINE DPOTRS( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) diff --git a/SRC/dppcon.f b/SRC/dppcon.f index 3e3112929a..11299587a7 100644 --- a/SRC/dppcon.f +++ b/SRC/dppcon.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ppcon * * ===================================================================== SUBROUTINE DPPCON( UPLO, N, AP, ANORM, RCOND, WORK, IWORK, INFO ) diff --git a/SRC/dppequ.f b/SRC/dppequ.f index c99a71e454..518dc7727a 100644 --- a/SRC/dppequ.f +++ b/SRC/dppequ.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup ppequ * * ===================================================================== SUBROUTINE DPPEQU( UPLO, N, AP, S, SCOND, AMAX, INFO ) diff --git a/SRC/dpprfs.f b/SRC/dpprfs.f index d547cb2efd..0277880a39 100644 --- a/SRC/dpprfs.f +++ b/SRC/dpprfs.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pprfs * * ===================================================================== SUBROUTINE DPPRFS( UPLO, N, NRHS, AP, AFP, B, LDB, X, LDX, FERR, diff --git a/SRC/dppsv.f b/SRC/dppsv.f index 1888005d98..5b30aa6b83 100644 --- a/SRC/dppsv.f +++ b/SRC/dppsv.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERsolve +*> \ingroup ppsv * *> \par Further Details: * ===================== diff --git a/SRC/dppsvx.f b/SRC/dppsvx.f index 3b08fc821f..184abad312 100644 --- a/SRC/dppsvx.f +++ b/SRC/dppsvx.f @@ -283,7 +283,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERsolve +*> \ingroup ppsvx * *> \par Further Details: * ===================== diff --git a/SRC/dpptrf.f b/SRC/dpptrf.f index d9eed910d9..0fb22c6dd5 100644 --- a/SRC/dpptrf.f +++ b/SRC/dpptrf.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pptrf * *> \par Further Details: * ===================== diff --git a/SRC/dpptri.f b/SRC/dpptri.f index 1f7d14a774..3ac5876c3c 100644 --- a/SRC/dpptri.f +++ b/SRC/dpptri.f @@ -86,7 +86,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pptri * * ===================================================================== SUBROUTINE DPPTRI( UPLO, N, AP, INFO ) diff --git a/SRC/dpptrs.f b/SRC/dpptrs.f index c5b8eb9911..21c71adedd 100644 --- a/SRC/dpptrs.f +++ b/SRC/dpptrs.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pptrs * * ===================================================================== SUBROUTINE DPPTRS( UPLO, N, NRHS, AP, B, LDB, INFO ) diff --git a/SRC/dpstf2.f b/SRC/dpstf2.f index 8055fa9825..eef3b58439 100644 --- a/SRC/dpstf2.f +++ b/SRC/dpstf2.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pstf2 * * ===================================================================== SUBROUTINE DPSTF2( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) diff --git a/SRC/dpstrf.f b/SRC/dpstrf.f index 9987cde574..baaccc9345 100644 --- a/SRC/dpstrf.f +++ b/SRC/dpstrf.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup pstrf * * ===================================================================== SUBROUTINE DPSTRF( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) diff --git a/SRC/dptcon.f b/SRC/dptcon.f index f619064163..094a5b49de 100644 --- a/SRC/dptcon.f +++ b/SRC/dptcon.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePTcomputational +*> \ingroup ptcon * *> \par Further Details: * ===================== diff --git a/SRC/dpteqr.f b/SRC/dpteqr.f index d07b065b07..952a13f90c 100644 --- a/SRC/dpteqr.f +++ b/SRC/dpteqr.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePTcomputational +*> \ingroup pteqr * * ===================================================================== SUBROUTINE DPTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/dptrfs.f b/SRC/dptrfs.f index c3486dbb63..b94e76fb86 100644 --- a/SRC/dptrfs.f +++ b/SRC/dptrfs.f @@ -155,7 +155,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePTcomputational +*> \ingroup ptrfs * * ===================================================================== SUBROUTINE DPTRFS( N, NRHS, D, E, DF, EF, B, LDB, X, LDX, FERR, diff --git a/SRC/dptsv.f b/SRC/dptsv.f index 41d8cff15e..25494833c2 100644 --- a/SRC/dptsv.f +++ b/SRC/dptsv.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePTsolve +*> \ingroup ptsv * * ===================================================================== SUBROUTINE DPTSV( N, NRHS, D, E, B, LDB, INFO ) diff --git a/SRC/dptsvx.f b/SRC/dptsvx.f index fcbf5aa3b0..a8d6be19d1 100644 --- a/SRC/dptsvx.f +++ b/SRC/dptsvx.f @@ -220,7 +220,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePTsolve +*> \ingroup ptsvx * * ===================================================================== SUBROUTINE DPTSVX( FACT, N, NRHS, D, E, DF, EF, B, LDB, X, LDX, diff --git a/SRC/dpttrf.f b/SRC/dpttrf.f index 156e845a38..66ec3a4b43 100644 --- a/SRC/dpttrf.f +++ b/SRC/dpttrf.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePTcomputational +*> \ingroup pttrf * * ===================================================================== SUBROUTINE DPTTRF( N, D, E, INFO ) diff --git a/SRC/dpttrs.f b/SRC/dpttrs.f index c98f700300..48244e63af 100644 --- a/SRC/dpttrs.f +++ b/SRC/dpttrs.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePTcomputational +*> \ingroup pttrs * * ===================================================================== SUBROUTINE DPTTRS( N, NRHS, D, E, B, LDB, INFO ) diff --git a/SRC/dptts2.f b/SRC/dptts2.f index 2fec1515fc..f00f23bd6d 100644 --- a/SRC/dptts2.f +++ b/SRC/dptts2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePTcomputational +*> \ingroup ptts2 * * ===================================================================== SUBROUTINE DPTTS2( N, NRHS, D, E, B, LDB ) diff --git a/SRC/drscl.f b/SRC/drscl.f index cfd1363d6c..840957bbab 100644 --- a/SRC/drscl.f +++ b/SRC/drscl.f @@ -77,7 +77,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup rscl * * ===================================================================== SUBROUTINE DRSCL( N, SA, SX, INCX ) diff --git a/SRC/dsb2st_kernels.f b/SRC/dsb2st_kernels.f index 683d7a24e3..05e3ccda99 100644 --- a/SRC/dsb2st_kernels.f +++ b/SRC/dsb2st_kernels.f @@ -163,6 +163,8 @@ *> *> \endverbatim *> +*> \ingroup hb2st_kernels +*> * ===================================================================== SUBROUTINE DSB2ST_KERNELS( UPLO, WANTZ, TTYPE, $ ST, ED, SWEEP, N, NB, IB, diff --git a/SRC/dsbev.f b/SRC/dsbev.f index a323dd4b5e..e417ff4eac 100644 --- a/SRC/dsbev.f +++ b/SRC/dsbev.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbev * * ===================================================================== SUBROUTINE DSBEV( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, WORK, diff --git a/SRC/dsbev_2stage.f b/SRC/dsbev_2stage.f index 84143fc4a7..eb35eb0332 100644 --- a/SRC/dsbev_2stage.f +++ b/SRC/dsbev_2stage.f @@ -131,7 +131,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS + N @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbev_2stage * *> \par Further Details: * ===================== @@ -182,7 +182,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -190,11 +190,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -237,7 +237,7 @@ SUBROUTINE DSBEV_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, * .. * .. External Subroutines .. EXTERNAL DLASCL, DSCAL, DSTEQR, DSTERF, XERBLA, - $ DSYTRD_SB2ST + $ DSYTRD_SB2ST * .. * .. Intrinsic Functions .. INTRINSIC SQRT @@ -343,7 +343,7 @@ SUBROUTINE DSBEV_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, LLWORK = LWORK - INDWRK + 1 * CALL DSYTRD_SB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, W, - $ WORK( INDE ), WORK( INDHOUS ), LHTRD, + $ WORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call DSTERF. For eigenvectors, call SSTEQR. diff --git a/SRC/dsbevd.f b/SRC/dsbevd.f index 350c0a9f08..60042788d4 100644 --- a/SRC/dsbevd.f +++ b/SRC/dsbevd.f @@ -179,7 +179,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbevd * * ===================================================================== SUBROUTINE DSBEVD( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, WORK, diff --git a/SRC/dsbevd_2stage.f b/SRC/dsbevd_2stage.f index 82997c8502..4301ec80be 100644 --- a/SRC/dsbevd_2stage.f +++ b/SRC/dsbevd_2stage.f @@ -134,7 +134,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS + N @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbevd_2stage * *> \par Further Details: * ===================== @@ -206,7 +206,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -214,11 +214,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -374,7 +374,7 @@ SUBROUTINE DSBEVD_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, LLWRK2 = LWORK - INDWK2 + 1 * CALL DSYTRD_SB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, W, - $ WORK( INDE ), WORK( INDHOUS ), LHTRD, + $ WORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call DSTERF. For eigenvectors, call SSTEDC. diff --git a/SRC/dsbevx.f b/SRC/dsbevx.f index c5886a2d6a..ceb4cd5e43 100644 --- a/SRC/dsbevx.f +++ b/SRC/dsbevx.f @@ -256,7 +256,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbevx * * ===================================================================== SUBROUTINE DSBEVX( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, Q, LDQ, VL, diff --git a/SRC/dsbevx_2stage.f b/SRC/dsbevx_2stage.f index b57eee29f1..23d9d94780 100644 --- a/SRC/dsbevx_2stage.f +++ b/SRC/dsbevx_2stage.f @@ -235,7 +235,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 7*N, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS + 2*N @@ -281,7 +281,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbevx_2stage * *> \par Further Details: * ===================== @@ -299,7 +299,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -307,11 +307,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -513,7 +513,7 @@ SUBROUTINE DSBEVX_2STAGE( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, Q, LLWORK = LWORK - INDWRK + 1 * CALL DSYTRD_SB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, WORK( INDD ), - $ WORK( INDE ), WORK( INDHOUS ), LHTRD, + $ WORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * If all eigenvalues are desired and ABSTOL is less than or equal diff --git a/SRC/dsbgst.f b/SRC/dsbgst.f index 10500b8c5d..88e8ab8d80 100644 --- a/SRC/dsbgst.f +++ b/SRC/dsbgst.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hbgst * * ===================================================================== SUBROUTINE DSBGST( VECT, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, X, diff --git a/SRC/dsbgv.f b/SRC/dsbgv.f index 9bb07a1fa2..c218b04cc4 100644 --- a/SRC/dsbgv.f +++ b/SRC/dsbgv.f @@ -169,7 +169,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbgv * * ===================================================================== SUBROUTINE DSBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z, diff --git a/SRC/dsbgvd.f b/SRC/dsbgvd.f index 0ab3177ace..74287f088b 100644 --- a/SRC/dsbgvd.f +++ b/SRC/dsbgvd.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbgvd * *> \par Contributors: * ================== diff --git a/SRC/dsbgvx.f b/SRC/dsbgvx.f index 53deae5800..733a7471a7 100644 --- a/SRC/dsbgvx.f +++ b/SRC/dsbgvx.f @@ -280,7 +280,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hbgvx * *> \par Contributors: * ================== diff --git a/SRC/dsbtrd.f b/SRC/dsbtrd.f index 28b8d73955..b791aba0cc 100644 --- a/SRC/dsbtrd.f +++ b/SRC/dsbtrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hbtrd * *> \par Further Details: * ===================== diff --git a/SRC/dsfrk.f b/SRC/dsfrk.f index e1b9b89bb1..17a0fc5779 100644 --- a/SRC/dsfrk.f +++ b/SRC/dsfrk.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hfrk * * ===================================================================== SUBROUTINE DSFRK( TRANSR, UPLO, TRANS, N, K, ALPHA, A, LDA, BETA, diff --git a/SRC/dsgesv.f b/SRC/dsgesv.f index 986492f8ba..f6269e49a6 100644 --- a/SRC/dsgesv.f +++ b/SRC/dsgesv.f @@ -187,7 +187,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEsolve +*> \ingroup gesv_mixed * * ===================================================================== SUBROUTINE DSGESV( N, NRHS, A, LDA, IPIV, B, LDB, X, LDX, WORK, diff --git a/SRC/dspcon.f b/SRC/dspcon.f index ea92d70aff..4885e30b5d 100644 --- a/SRC/dspcon.f +++ b/SRC/dspcon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hpcon * * ===================================================================== SUBROUTINE DSPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, IWORK, diff --git a/SRC/dspev.f b/SRC/dspev.f index f884664a98..1c1807775e 100644 --- a/SRC/dspev.f +++ b/SRC/dspev.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hpev * * ===================================================================== SUBROUTINE DSPEV( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, INFO ) diff --git a/SRC/dspevd.f b/SRC/dspevd.f index 05aa91b03a..7b7d979a8f 100644 --- a/SRC/dspevd.f +++ b/SRC/dspevd.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hpevd * * ===================================================================== SUBROUTINE DSPEVD( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, LWORK, diff --git a/SRC/dspevx.f b/SRC/dspevx.f index 658cb1f527..6e34895ba0 100644 --- a/SRC/dspevx.f +++ b/SRC/dspevx.f @@ -225,7 +225,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hpevx * * ===================================================================== SUBROUTINE DSPEVX( JOBZ, RANGE, UPLO, N, AP, VL, VU, IL, IU, diff --git a/SRC/dspgst.f b/SRC/dspgst.f index 95734606a3..188a1125b1 100644 --- a/SRC/dspgst.f +++ b/SRC/dspgst.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hpgst * * ===================================================================== SUBROUTINE DSPGST( ITYPE, UPLO, N, AP, BP, INFO ) diff --git a/SRC/dspgv.f b/SRC/dspgv.f index 96041c301d..15a1c57e87 100644 --- a/SRC/dspgv.f +++ b/SRC/dspgv.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hpgv * * ===================================================================== SUBROUTINE DSPGV( ITYPE, JOBZ, UPLO, N, AP, BP, W, Z, LDZ, WORK, diff --git a/SRC/dspgvd.f b/SRC/dspgvd.f index 24c2309c34..902472dd6d 100644 --- a/SRC/dspgvd.f +++ b/SRC/dspgvd.f @@ -191,7 +191,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hpgvd * *> \par Contributors: * ================== diff --git a/SRC/dspgvx.f b/SRC/dspgvx.f index 5afd73d022..632c0deae9 100644 --- a/SRC/dspgvx.f +++ b/SRC/dspgvx.f @@ -258,7 +258,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup hpgvx * *> \par Contributors: * ================== diff --git a/SRC/dsposv.f b/SRC/dsposv.f index 0bd75698d7..3299d36678 100644 --- a/SRC/dsposv.f +++ b/SRC/dsposv.f @@ -191,7 +191,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doublePOsolve +*> \ingroup posv_mixed * * ===================================================================== SUBROUTINE DSPOSV( UPLO, N, NRHS, A, LDA, B, LDB, X, LDX, WORK, diff --git a/SRC/dsprfs.f b/SRC/dsprfs.f index 796686d569..6e6b9c59d8 100644 --- a/SRC/dsprfs.f +++ b/SRC/dsprfs.f @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hprfs * * ===================================================================== SUBROUTINE DSPRFS( UPLO, N, NRHS, AP, AFP, IPIV, B, LDB, X, LDX, diff --git a/SRC/dspsv.f b/SRC/dspsv.f index 8cf1927964..2abf736562 100644 --- a/SRC/dspsv.f +++ b/SRC/dspsv.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERsolve +*> \ingroup hpsv * *> \par Further Details: * ===================== diff --git a/SRC/dspsvx.f b/SRC/dspsvx.f index 86737f8191..2f2f6a83e5 100644 --- a/SRC/dspsvx.f +++ b/SRC/dspsvx.f @@ -248,7 +248,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERsolve +*> \ingroup hpsvx * *> \par Further Details: * ===================== diff --git a/SRC/dsptrd.f b/SRC/dsptrd.f index b892ed9aab..f12c10a57a 100644 --- a/SRC/dsptrd.f +++ b/SRC/dsptrd.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hptrd * *> \par Further Details: * ===================== diff --git a/SRC/dsptrf.f b/SRC/dsptrf.f index c81d8bcbf8..bd952ec34c 100644 --- a/SRC/dsptrf.f +++ b/SRC/dsptrf.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hptrf * *> \par Further Details: * ===================== diff --git a/SRC/dsptri.f b/SRC/dsptri.f index abed7ed499..47ed2640a1 100644 --- a/SRC/dsptri.f +++ b/SRC/dsptri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hptri * * ===================================================================== SUBROUTINE DSPTRI( UPLO, N, AP, IPIV, WORK, INFO ) diff --git a/SRC/dsptrs.f b/SRC/dsptrs.f index a8f39a4ede..8f6f033ce4 100644 --- a/SRC/dsptrs.f +++ b/SRC/dsptrs.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup hptrs * * ===================================================================== SUBROUTINE DSPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) diff --git a/SRC/dstebz.f b/SRC/dstebz.f index baf417b0a5..433145e382 100644 --- a/SRC/dstebz.f +++ b/SRC/dstebz.f @@ -264,7 +264,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup stebz * * ===================================================================== SUBROUTINE DSTEBZ( RANGE, ORDER, N, VL, VU, IL, IU, ABSTOL, D, E, diff --git a/SRC/dstedc.f b/SRC/dstedc.f index 6d533664bd..971aeadd39 100644 --- a/SRC/dstedc.f +++ b/SRC/dstedc.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup stedc * *> \par Contributors: * ================== diff --git a/SRC/dstegr.f b/SRC/dstegr.f index 598c60e8d5..9688c69839 100644 --- a/SRC/dstegr.f +++ b/SRC/dstegr.f @@ -249,7 +249,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup stegr * *> \par Contributors: * ================== diff --git a/SRC/dstein.f b/SRC/dstein.f index 6506be92ac..520ec73319 100644 --- a/SRC/dstein.f +++ b/SRC/dstein.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup stein * * ===================================================================== SUBROUTINE DSTEIN( N, D, E, M, W, IBLOCK, ISPLIT, Z, LDZ, WORK, diff --git a/SRC/dstemr.f b/SRC/dstemr.f index d0c71ddd98..63f46a1bd6 100644 --- a/SRC/dstemr.f +++ b/SRC/dstemr.f @@ -303,7 +303,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup stemr * *> \par Contributors: * ================== diff --git a/SRC/dsteqr.f b/SRC/dsteqr.f index 50a9188c7c..eed53fde4a 100644 --- a/SRC/dsteqr.f +++ b/SRC/dsteqr.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup steqr * * ===================================================================== SUBROUTINE DSTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/dsterf.f b/SRC/dsterf.f index b0f8d36084..b8de31620f 100644 --- a/SRC/dsterf.f +++ b/SRC/dsterf.f @@ -79,7 +79,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup sterf * * ===================================================================== SUBROUTINE DSTERF( N, D, E, INFO ) diff --git a/SRC/dstev.f b/SRC/dstev.f index 21c4ceed1c..bc0d4e5d73 100644 --- a/SRC/dstev.f +++ b/SRC/dstev.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup stev * * ===================================================================== SUBROUTINE DSTEV( JOBZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/dstevd.f b/SRC/dstevd.f index 54717df3d4..482c9399d9 100644 --- a/SRC/dstevd.f +++ b/SRC/dstevd.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup stevd * * ===================================================================== SUBROUTINE DSTEVD( JOBZ, N, D, E, Z, LDZ, WORK, LWORK, IWORK, diff --git a/SRC/dstevr.f b/SRC/dstevr.f index ce9383758d..ccb01a6d86 100644 --- a/SRC/dstevr.f +++ b/SRC/dstevr.f @@ -287,7 +287,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup stevr * *> \par Contributors: * ================== diff --git a/SRC/dstevx.f b/SRC/dstevx.f index e0cd07da05..ce2833c486 100644 --- a/SRC/dstevx.f +++ b/SRC/dstevx.f @@ -219,7 +219,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHEReigen +*> \ingroup stevx * * ===================================================================== SUBROUTINE DSTEVX( JOBZ, RANGE, N, D, E, VL, VU, IL, IU, ABSTOL, diff --git a/SRC/dsycon.f b/SRC/dsycon.f index 617a917008..4072dd4165 100644 --- a/SRC/dsycon.f +++ b/SRC/dsycon.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hecon * * ===================================================================== SUBROUTINE DSYCON( UPLO, N, A, LDA, IPIV, ANORM, RCOND, WORK, diff --git a/SRC/dsycon_3.f b/SRC/dsycon_3.f index f5cc65dd42..b4650c784f 100644 --- a/SRC/dsycon_3.f +++ b/SRC/dsycon_3.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hecon_3 * *> \par Contributors: * ================== diff --git a/SRC/dsycon_rook.f b/SRC/dsycon_rook.f index dab67a225a..81de95638a 100644 --- a/SRC/dsycon_rook.f +++ b/SRC/dsycon_rook.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hecon_rook * *> \par Contributors: * ================== diff --git a/SRC/dsyconv.f b/SRC/dsyconv.f index e213f03d1b..e4c9b0f005 100644 --- a/SRC/dsyconv.f +++ b/SRC/dsyconv.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup syconv * * ===================================================================== SUBROUTINE DSYCONV( UPLO, WAY, N, A, LDA, IPIV, E, INFO ) diff --git a/SRC/dsyconvf.f b/SRC/dsyconvf.f index 005c98a030..b772d11a5b 100644 --- a/SRC/dsyconvf.f +++ b/SRC/dsyconvf.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup syconvf * *> \par Contributors: * ================== diff --git a/SRC/dsyconvf_rook.f b/SRC/dsyconvf_rook.f index c3f2083bdb..a8fcf90d82 100644 --- a/SRC/dsyconvf_rook.f +++ b/SRC/dsyconvf_rook.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup syconvf_rook * *> \par Contributors: * ================== diff --git a/SRC/dsyequb.f b/SRC/dsyequb.f index 1f909be19b..229968e687 100644 --- a/SRC/dsyequb.f +++ b/SRC/dsyequb.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup heequb * *> \par References: * ================ diff --git a/SRC/dsyev.f b/SRC/dsyev.f index da7557ee02..0fcedbdd02 100644 --- a/SRC/dsyev.f +++ b/SRC/dsyev.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup heev * * ===================================================================== SUBROUTINE DSYEV( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, INFO ) diff --git a/SRC/dsyev_2stage.f b/SRC/dsyev_2stage.f index 50d51d992b..fc080456a9 100644 --- a/SRC/dsyev_2stage.f +++ b/SRC/dsyev_2stage.f @@ -20,7 +20,7 @@ * Definition: * =========== * -* SUBROUTINE DSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, +* SUBROUTINE DSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, * INFO ) * * IMPLICIT NONE @@ -105,12 +105,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 2*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 2*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -143,7 +143,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup heev_2stage * *> \par Further Details: * ===================== @@ -161,7 +161,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -169,16 +169,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * * ===================================================================== - SUBROUTINE DSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, + SUBROUTINE DSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, $ INFO ) * IMPLICIT NONE @@ -305,7 +305,7 @@ SUBROUTINE DSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, LLWORK = LWORK - INDWRK + 1 * CALL DSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK( INDE ), - $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, + $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call DSTERF. For eigenvectors, first call diff --git a/SRC/dsyevd.f b/SRC/dsyevd.f index b27f4cdc7a..8785baee11 100644 --- a/SRC/dsyevd.f +++ b/SRC/dsyevd.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup heevd * *> \par Contributors: * ================== diff --git a/SRC/dsyevd_2stage.f b/SRC/dsyevd_2stage.f index d5a68c35df..8f15f31dc8 100644 --- a/SRC/dsyevd_2stage.f +++ b/SRC/dsyevd_2stage.f @@ -113,8 +113,8 @@ *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 2*N+1 -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 2*N+1 *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup heevd_2stage * *> \par Contributors: * ================== @@ -199,7 +199,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -207,11 +207,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -365,7 +365,7 @@ SUBROUTINE DSYEVD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, LLWRK2 = LWORK - INDWK2 + 1 * CALL DSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK( INDE ), - $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, + $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call DSTERF. For eigenvectors, first call diff --git a/SRC/dsyevr.f b/SRC/dsyevr.f index 698691533f..77f29d768c 100644 --- a/SRC/dsyevr.f +++ b/SRC/dsyevr.f @@ -315,7 +315,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup heevr * *> \par Contributors: * ================== diff --git a/SRC/dsyevr_2stage.f b/SRC/dsyevr_2stage.f index 09242bbd31..643c4d48ca 100644 --- a/SRC/dsyevr_2stage.f +++ b/SRC/dsyevr_2stage.f @@ -263,7 +263,7 @@ *> indicating the nonzero elements in Z. The i-th eigenvector *> is nonzero only in elements ISUPPZ( 2*i-1 ) through *> ISUPPZ( 2*i ). This is an output of DSTEMR (tridiagonal -*> matrix). The support of the eigenvectors of A is typically +*> matrix). The support of the eigenvectors of A is typically *> 1:N because of the orthogonal transformations applied by DORMTR. *> Implemented only for RANGE = 'A' or 'I' and IU - IL = N - 1 *> \endverbatim @@ -277,12 +277,12 @@ *> \param[in] LWORK *> \verbatim *> LWORK is INTEGER -*> The dimension of the array WORK. +*> The dimension of the array WORK. *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 26*N, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 5*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 5*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -330,7 +330,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup heevr_2stage * *> \par Contributors: * ================== @@ -358,7 +358,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -366,11 +366,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -608,7 +608,7 @@ SUBROUTINE DSYEVR_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, * Call DSYTRD_2STAGE to reduce symmetric matrix to tridiagonal form. * * - CALL DSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, WORK( INDD ), + CALL DSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, WORK( INDD ), $ WORK( INDE ), WORK( INDTAU ), WORK( INDHOUS ), $ LHTRD, WORK( INDWK ), LLWORK, IINFO ) * diff --git a/SRC/dsyevx.f b/SRC/dsyevx.f index 99719874b5..e90a82bc3a 100644 --- a/SRC/dsyevx.f +++ b/SRC/dsyevx.f @@ -244,7 +244,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup heevx * * ===================================================================== SUBROUTINE DSYEVX( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, IL, IU, diff --git a/SRC/dsyevx_2stage.f b/SRC/dsyevx_2stage.f index dbb3203d29..be158485fb 100644 --- a/SRC/dsyevx_2stage.f +++ b/SRC/dsyevx_2stage.f @@ -208,12 +208,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 8*N, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 3*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 3*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -259,7 +259,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup heevx_2stage * *> \par Further Details: * ===================== @@ -277,7 +277,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -285,11 +285,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -487,7 +487,7 @@ SUBROUTINE DSYEVX_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, INDWRK = INDHOUS + LHTRD LLWORK = LWORK - INDWRK + 1 * - CALL DSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, WORK( INDD ), + CALL DSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, WORK( INDD ), $ WORK( INDE ), WORK( INDTAU ), WORK( INDHOUS ), $ LHTRD, WORK( INDWRK ), LLWORK, IINFO ) * diff --git a/SRC/dsygs2.f b/SRC/dsygs2.f index 8a39bea77e..235666dd51 100644 --- a/SRC/dsygs2.f +++ b/SRC/dsygs2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hegs2 * * ===================================================================== SUBROUTINE DSYGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) diff --git a/SRC/dsygst.f b/SRC/dsygst.f index 05b90372ab..d4035fcaae 100644 --- a/SRC/dsygst.f +++ b/SRC/dsygst.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hegst * * ===================================================================== SUBROUTINE DSYGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) diff --git a/SRC/dsygv.f b/SRC/dsygv.f index 02a4cc3edc..79ba852a16 100644 --- a/SRC/dsygv.f +++ b/SRC/dsygv.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup hegv * * ===================================================================== SUBROUTINE DSYGV( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, WORK, diff --git a/SRC/dsygv_2stage.f b/SRC/dsygv_2stage.f index 383304267d..47a8df1589 100644 --- a/SRC/dsygv_2stage.f +++ b/SRC/dsygv_2stage.f @@ -143,12 +143,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 2*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 2*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -186,7 +186,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup hegv_2stage * *> \par Further Details: * ===================== @@ -204,7 +204,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -212,11 +212,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -247,7 +247,7 @@ SUBROUTINE DSYGV_2STAGE( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, * .. Local Scalars .. LOGICAL LQUERY, UPPER, WANTZ CHARACTER TRANS - INTEGER NEIG, LWMIN, LHTRD, LWTRD, KD, IB + INTEGER NEIG, LWMIN, LHTRD, LWTRD, KD, IB * .. * .. External Functions .. LOGICAL LSAME diff --git a/SRC/dsygvd.f b/SRC/dsygvd.f index 41a384c806..ffbe92028e 100644 --- a/SRC/dsygvd.f +++ b/SRC/dsygvd.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup hegvd * *> \par Further Details: * ===================== diff --git a/SRC/dsygvx.f b/SRC/dsygvx.f index 2dc27e8a86..f24735cd54 100644 --- a/SRC/dsygvx.f +++ b/SRC/dsygvx.f @@ -283,7 +283,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYeigen +*> \ingroup hegvx * *> \par Contributors: * ================== diff --git a/SRC/dsyrfs.f b/SRC/dsyrfs.f index eb23fd6019..21a8f2b82a 100644 --- a/SRC/dsyrfs.f +++ b/SRC/dsyrfs.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup herfs * * ===================================================================== SUBROUTINE DSYRFS( UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/dsyrfsx.f b/SRC/dsyrfsx.f index f3a1d75447..c8d3bf3052 100644 --- a/SRC/dsyrfsx.f +++ b/SRC/dsyrfsx.f @@ -392,7 +392,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup herfsx * * ===================================================================== SUBROUTINE DSYRFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/dsysv.f b/SRC/dsysv.f index ed6629ad95..c94a763509 100644 --- a/SRC/dsysv.f +++ b/SRC/dsysv.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYsolve +*> \ingroup hesv * * ===================================================================== SUBROUTINE DSYSV( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/dsysv_aa.f b/SRC/dsysv_aa.f index 8dab5a384d..7959012b71 100644 --- a/SRC/dsysv_aa.f +++ b/SRC/dsysv_aa.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYsolve +*> \ingroup hesv_aa * * ===================================================================== SUBROUTINE DSYSV_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/dsysv_aa_2stage.f b/SRC/dsysv_aa_2stage.f index 72fbe1e9a8..b91c0995e4 100644 --- a/SRC/dsysv_aa_2stage.f +++ b/SRC/dsysv_aa_2stage.f @@ -179,7 +179,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYsolve +*> \ingroup hesv_aa_2stage * * ===================================================================== SUBROUTINE DSYSV_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/dsysv_rk.f b/SRC/dsysv_rk.f index db8fd36ddd..ab81ccf0f9 100644 --- a/SRC/dsysv_rk.f +++ b/SRC/dsysv_rk.f @@ -205,7 +205,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYsolve +*> \ingroup hesv_rk * *> \par Contributors: * ================== diff --git a/SRC/dsysv_rook.f b/SRC/dsysv_rook.f index 85f2933092..95091bdfbe 100644 --- a/SRC/dsysv_rook.f +++ b/SRC/dsysv_rook.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYsolve +*> \ingroup hesv_rook * *> \par Contributors: * ================== diff --git a/SRC/dsysvx.f b/SRC/dsysvx.f index a30831e726..77a2c678d0 100644 --- a/SRC/dsysvx.f +++ b/SRC/dsysvx.f @@ -275,7 +275,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYsolve +*> \ingroup hesvx * * ===================================================================== SUBROUTINE DSYSVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, diff --git a/SRC/dsysvxx.f b/SRC/dsysvxx.f index 82d30a4b71..94ff30cb97 100644 --- a/SRC/dsysvxx.f +++ b/SRC/dsysvxx.f @@ -495,7 +495,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYsolve +*> \ingroup hesvxx * * ===================================================================== SUBROUTINE DSYSVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/dsyswapr.f b/SRC/dsyswapr.f index 93f6195f22..9048c0fc67 100644 --- a/SRC/dsyswapr.f +++ b/SRC/dsyswapr.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYauxiliary +*> \ingroup heswapr * * ===================================================================== SUBROUTINE DSYSWAPR( UPLO, N, A, LDA, I1, I2) diff --git a/SRC/dsytd2.f b/SRC/dsytd2.f index 977b6daa41..c2fa0353ed 100644 --- a/SRC/dsytd2.f +++ b/SRC/dsytd2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetd2 * *> \par Further Details: * ===================== diff --git a/SRC/dsytf2.f b/SRC/dsytf2.f index b05d25ad15..a4767f61b9 100644 --- a/SRC/dsytf2.f +++ b/SRC/dsytf2.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetf2 * *> \par Further Details: * ===================== diff --git a/SRC/dsytf2_rk.f b/SRC/dsytf2_rk.f index e9afcb6aad..032f5d5061 100644 --- a/SRC/dsytf2_rk.f +++ b/SRC/dsytf2_rk.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetf2_rk * *> \par Further Details: * ===================== diff --git a/SRC/dsytf2_rook.f b/SRC/dsytf2_rook.f index 251b3909bb..b823ca8a93 100644 --- a/SRC/dsytf2_rook.f +++ b/SRC/dsytf2_rook.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetf2_rook * *> \par Further Details: * ===================== diff --git a/SRC/dsytrd.f b/SRC/dsytrd.f index 3dcfc3db2b..386f1deed8 100644 --- a/SRC/dsytrd.f +++ b/SRC/dsytrd.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrd * *> \par Further Details: * ===================== diff --git a/SRC/dsytrd_2stage.f b/SRC/dsytrd_2stage.f index 8ae77d3e4b..eef9f9c6b9 100644 --- a/SRC/dsytrd_2stage.f +++ b/SRC/dsytrd_2stage.f @@ -4,23 +4,23 @@ * * =========== DOCUMENTATION =========== * -* Online html documentation available at -* http://www.netlib.org/lapack/explore-html/ +* Online html documentation available at +* http://www.netlib.org/lapack/explore-html/ * *> \htmlonly -*> Download DSYTRD_2STAGE + dependencies -*> -*> [TGZ] -*> -*> [ZIP] -*> +*> Download DSYTRD_2STAGE + dependencies +*> +*> [TGZ] +*> +*> [ZIP] +*> *> [TXT] -*> \endhtmlonly +*> \endhtmlonly * * Definition: * =========== * -* SUBROUTINE DSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, +* SUBROUTINE DSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, * HOUS2, LHOUS2, WORK, LWORK, INFO ) * * IMPLICIT NONE @@ -34,7 +34,7 @@ * DOUBLE PRECISION A( LDA, * ), TAU( * ), * HOUS2( * ), WORK( * ) * .. -* +* * *> \par Purpose: * ============= @@ -52,11 +52,11 @@ *> \param[in] VECT *> \verbatim *> VECT is CHARACTER*1 -*> = 'N': No need for the Housholder representation, +*> = 'N': No need for the Housholder representation, *> in particular for the second stage (Band to *> tridiagonal) and thus LHOUS2 is of size max(1, 4*N); -*> = 'V': the Householder representation is needed to -*> either generate Q1 Q2 or to apply Q1 Q2, +*> = 'V': the Householder representation is needed to +*> either generate Q1 Q2 or to apply Q1 Q2, *> then LHOUS2 is to be queried and computed. *> (NOT AVAILABLE IN THIS RELEASE). *> \endverbatim @@ -86,7 +86,7 @@ *> triangular part of A is not referenced. *> On exit, if UPLO = 'U', the band superdiagonal *> of A are overwritten by the corresponding elements of the -*> internal band-diagonal matrix AB, and the elements above +*> internal band-diagonal matrix AB, and the elements above *> the KD superdiagonal, with the array TAU, represent the orthogonal *> matrix Q1 as a product of elementary reflectors; if UPLO *> = 'L', the diagonal and band subdiagonal of A are over- @@ -117,7 +117,7 @@ *> \param[out] TAU *> \verbatim *> TAU is DOUBLE PRECISION array, dimension (N-KD) -*> The scalar factors of the elementary reflectors of +*> The scalar factors of the elementary reflectors of *> the first stage (see Further Details). *> \endverbatim *> @@ -157,9 +157,9 @@ *> message related to LWORK is issued by XERBLA. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) -*> + (KD+1)*N +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) +*> + (KD+1)*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ *> algorithm, usually FACTOPTNB=128 is a good choice @@ -177,12 +177,12 @@ * Authors: * ======== * -*> \author Univ. of Tennessee -*> \author Univ. of California Berkeley -*> \author Univ. of Colorado Denver -*> \author NAG Ltd. +*> \author Univ. of Tennessee +*> \author Univ. of California Berkeley +*> \author Univ. of Colorado Denver +*> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrd_2stage * *> \par Further Details: * ===================== @@ -202,7 +202,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -210,16 +210,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - SUBROUTINE DSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, + SUBROUTINE DSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, $ HOUS2, LHOUS2, WORK, LWORK, INFO ) * IMPLICIT NONE @@ -309,14 +309,14 @@ SUBROUTINE DSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, LWRK = LWORK-LDAB*N ABPOS = 1 WPOS = ABPOS + LDAB*N - CALL DSYTRD_SY2SB( UPLO, N, KD, A, LDA, WORK( ABPOS ), LDAB, + CALL DSYTRD_SY2SB( UPLO, N, KD, A, LDA, WORK( ABPOS ), LDAB, $ TAU, WORK( WPOS ), LWRK, INFO ) IF( INFO.NE.0 ) THEN CALL XERBLA( 'DSYTRD_SY2SB', -INFO ) RETURN END IF - CALL DSYTRD_SB2ST( 'Y', VECT, UPLO, N, KD, - $ WORK( ABPOS ), LDAB, D, E, + CALL DSYTRD_SB2ST( 'Y', VECT, UPLO, N, KD, + $ WORK( ABPOS ), LDAB, D, E, $ HOUS2, LHOUS2, WORK( WPOS ), LWRK, INFO ) IF( INFO.NE.0 ) THEN CALL XERBLA( 'DSYTRD_SB2ST', -INFO ) diff --git a/SRC/dsytrd_sb2st.F b/SRC/dsytrd_sb2st.F index bb74dd4914..374fcd9ebf 100644 --- a/SRC/dsytrd_sb2st.F +++ b/SRC/dsytrd_sb2st.F @@ -18,7 +18,7 @@ * Definition: * =========== * -* SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, +* SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * D, E, HOUS, LHOUS, WORK, LWORK, INFO ) * * #if defined(_OPENMP) @@ -53,12 +53,12 @@ *> \param[in] STAGE1 *> \verbatim *> STAGE1 is CHARACTER*1 -*> = 'N': "No": to mention that the stage 1 of the reduction +*> = 'N': "No": to mention that the stage 1 of the reduction *> from dense to band using the dsytrd_sy2sb routine -*> was not called before this routine to reproduce AB. -*> In other term this routine is called as standalone. -*> = 'Y': "Yes": to mention that the stage 1 of the -*> reduction from dense to band using the dsytrd_sy2sb +*> was not called before this routine to reproduce AB. +*> In other term this routine is called as standalone. +*> = 'Y': "Yes": to mention that the stage 1 of the +*> reduction from dense to band using the dsytrd_sy2sb *> routine has been called to produce AB (e.g., AB is *> the output of dsytrd_sy2sb. *> \endverbatim @@ -66,10 +66,10 @@ *> \param[in] VECT *> \verbatim *> VECT is CHARACTER*1 -*> = 'N': No need for the Housholder representation, +*> = 'N': No need for the Housholder representation, *> and thus LHOUS is of size max(1, 4*N); -*> = 'V': the Householder representation is needed to -*> either generate or to apply Q later on, +*> = 'V': the Householder representation is needed to +*> either generate or to apply Q later on, *> then LHOUS is to be queried and computed. *> (NOT AVAILABLE IN THIS RELEASE). *> \endverbatim @@ -147,7 +147,7 @@ *> message related to LHOUS is issued by XERBLA. *> LHOUS = MAX(1, dimension) where *> dimension = 4*N if VECT='N' -*> not available now if VECT='H' +*> not available now if VECT='H' *> \endverbatim *> *> \param[out] WORK @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup real16OTHERcomputational +*> \ingroup hetrd_hb2st * *> \par Further Details: * ===================== @@ -208,7 +208,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -216,16 +216,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, + SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, $ D, E, HOUS, LHOUS, WORK, LWORK, INFO ) * #if defined(_OPENMP) @@ -258,11 +258,11 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * .. * .. Local Scalars .. LOGICAL LQUERY, WANTQ, UPPER, AFTERS1 - INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST, + INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST, $ ED, STIND, EDIND, BLKLASTIND, COLPT, THED, $ STEPERCOL, GRSIZ, THGRSIZ, THGRNB, THGRID, $ NBTILES, TTYPE, TID, NTHREADS, DEBUG, - $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS, + $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS, $ INDA, INDW, APOS, SIZEA, LDA, INDV, INDTAU, $ SIDEV, SIZETAU, LDV, LHMIN, LWMIN * .. @@ -274,7 +274,7 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * .. * .. External Functions .. LOGICAL LSAME - INTEGER ILAENV2STAGE + INTEGER ILAENV2STAGE EXTERNAL LSAME, ILAENV2STAGE * .. * .. Executable Statements .. @@ -355,7 +355,7 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ABDPOS = KD + 1 ABOFDPOS = KD ELSE - APOS = INDA + APOS = INDA AWPOS = INDA + KD + 1 DPOS = APOS OFDPOS = DPOS + 1 @@ -363,11 +363,11 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ABOFDPOS = 2 ENDIF -* -* Case KD=0: -* The matrix is diagonal. We just copy it (convert to "real" for -* real because D is double and the imaginary part should be 0) -* and store it in D. A sequential code here is better or +* +* Case KD=0: +* The matrix is diagonal. We just copy it (convert to "real" for +* real because D is double and the imaginary part should be 0) +* and store it in D. A sequential code here is better or * in a parallel environment it might need two cores for D and E * IF( KD.EQ.0 ) THEN @@ -382,17 +382,17 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, WORK( 1 ) = 1 RETURN END IF -* -* Case KD=1: -* The matrix is already Tridiagonal. We have to make diagonal +* +* Case KD=1: +* The matrix is already Tridiagonal. We have to make diagonal * and offdiagonal elements real, and store them in D and E. -* For that, for real precision just copy the diag and offdiag -* to D and E while for the COMPLEX case the bulge chasing is -* performed to convert the hermetian tridiagonal to symmetric -* tridiagonal. A simpler conversion formula might be used, but then +* For that, for real precision just copy the diag and offdiag +* to D and E while for the COMPLEX case the bulge chasing is +* performed to convert the hermetian tridiagonal to symmetric +* tridiagonal. A simpler conversion formula might be used, but then * updating the Q matrix will be required and based if Q is generated -* or not this might complicate the story. -* +* or not this might complicate the story. +* IF( KD.EQ.1 ) THEN DO 50 I = 1, N D( I ) = ( AB( ABDPOS, I ) ) @@ -413,7 +413,7 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, RETURN END IF * -* Main code start here. +* Main code start here. * Reduce the symmetric band of A to a tridiagonal matrix. * THGRSIZ = N @@ -422,7 +422,7 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, NBTILES = CEILING( REAL(N)/REAL(KD) ) STEPERCOL = CEILING( REAL(SHIFT)/REAL(GRSIZ) ) THGRNB = CEILING( REAL(N-1)/REAL(THGRSIZ) ) -* +* CALL DLACPY( "A", KD+1, N, AB, LDAB, WORK( APOS ), LDA ) CALL DLASET( "A", KD, N, ZERO, ZERO, WORK( AWPOS ), LDA ) * @@ -431,7 +431,7 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * #if defined(_OPENMP) !$OMP PARALLEL PRIVATE( TID, THGRID, BLKLASTIND ) -!$OMP$ PRIVATE( THED, I, M, K, ST, ED, STT, SWEEPID ) +!$OMP$ PRIVATE( THED, I, M, K, ST, ED, STT, SWEEPID ) !$OMP$ PRIVATE( MYID, TTYPE, COLPT, STIND, EDIND ) !$OMP$ SHARED ( UPLO, WANTQ, INDV, INDTAU, HOUS, WORK) !$OMP$ SHARED ( N, KD, IB, NBTILES, LDA, LDV, INDA ) @@ -440,7 +440,7 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, #endif * * main bulge chasing loop -* +* DO 100 THGRID = 1, THGRNB STT = (THGRID-1)*THGRSIZ+1 THED = MIN( (STT + THGRSIZ -1), (N-1)) @@ -451,7 +451,7 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ST = STT DO 130 SWEEPID = ST, ED DO 140 K = 1, GRSIZ - MYID = (I-SWEEPID)*(STEPERCOL*GRSIZ) + MYID = (I-SWEEPID)*(STEPERCOL*GRSIZ) $ + (M-1)*GRSIZ + K IF ( MYID.EQ.1 ) THEN TTYPE = 1 @@ -477,16 +477,16 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ENDIF * * Call the kernel -* +* #if defined(_OPENMP) && _OPENMP >= 201307 - IF( TTYPE.NE.1 ) THEN + IF( TTYPE.NE.1 ) THEN !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1)) !$OMP$ DEPEND(in:WORK(MYID-1)) !$OMP$ DEPEND(out:WORK(MYID)) TID = OMP_GET_THREAD_NUM() - CALL DSB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL DSB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW + TID*KD ) ) !$OMP END TASK @@ -494,20 +494,20 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1)) !$OMP$ DEPEND(out:WORK(MYID)) TID = OMP_GET_THREAD_NUM() - CALL DSB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL DSB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW + TID*KD ) ) !$OMP END TASK ENDIF #else - CALL DSB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL DSB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW ) ) -#endif +#endif IF ( BLKLASTIND.GE.(N-1) ) THEN STT = STT + 1 EXIT @@ -522,14 +522,14 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, !$OMP END MASTER !$OMP END PARALLEL #endif -* +* * Copy the diagonal from A to D. Note that D is REAL thus only * the Real part is needed, the imaginary part should be zero. * DO 150 I = 1, N D( I ) = ( WORK( DPOS+(I-1)*LDA ) ) 150 CONTINUE -* +* * Copy the off diagonal from A to E. Note that E is REAL thus only * the Real part is needed, the imaginary part should be zero. * @@ -550,4 +550,4 @@ SUBROUTINE DSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * End of DSYTRD_SB2ST * END - + diff --git a/SRC/dsytrd_sy2sb.f b/SRC/dsytrd_sy2sb.f index d090b75082..f2292678df 100644 --- a/SRC/dsytrd_sy2sb.f +++ b/SRC/dsytrd_sy2sb.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrd_he2hb * *> \par Further Details: * ===================== diff --git a/SRC/dsytrf.f b/SRC/dsytrf.f index a39b032836..f575dd4ebc 100644 --- a/SRC/dsytrf.f +++ b/SRC/dsytrf.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrf * *> \par Further Details: * ===================== diff --git a/SRC/dsytrf_aa.f b/SRC/dsytrf_aa.f index 9a0b26ce53..ede6d938d8 100644 --- a/SRC/dsytrf_aa.f +++ b/SRC/dsytrf_aa.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrf_aa * * ===================================================================== SUBROUTINE DSYTRF_AA( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO) diff --git a/SRC/dsytrf_aa_2stage.f b/SRC/dsytrf_aa_2stage.f index c65bd86e62..4a295456ad 100644 --- a/SRC/dsytrf_aa_2stage.f +++ b/SRC/dsytrf_aa_2stage.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrf_aa_2stage * * ===================================================================== SUBROUTINE DSYTRF_AA_2STAGE( UPLO, N, A, LDA, TB, LTB, IPIV, diff --git a/SRC/dsytrf_rk.f b/SRC/dsytrf_rk.f index 7341b9263b..7c9cfe7c7d 100644 --- a/SRC/dsytrf_rk.f +++ b/SRC/dsytrf_rk.f @@ -229,7 +229,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrf_rk * *> \par Further Details: * ===================== diff --git a/SRC/dsytrf_rook.f b/SRC/dsytrf_rook.f index 2f00d18024..181e061910 100644 --- a/SRC/dsytrf_rook.f +++ b/SRC/dsytrf_rook.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrf_rook * *> \par Further Details: * ===================== diff --git a/SRC/dsytri.f b/SRC/dsytri.f index f1552d6fe2..c633f6e21a 100644 --- a/SRC/dsytri.f +++ b/SRC/dsytri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetri * * ===================================================================== SUBROUTINE DSYTRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) diff --git a/SRC/dsytri2.f b/SRC/dsytri2.f index dbcdcdb588..61379ae17c 100644 --- a/SRC/dsytri2.f +++ b/SRC/dsytri2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetri2 * * ===================================================================== SUBROUTINE DSYTRI2( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/dsytri2x.f b/SRC/dsytri2x.f index 2ae4f10591..cb9ed24716 100644 --- a/SRC/dsytri2x.f +++ b/SRC/dsytri2x.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetri2x * * ===================================================================== SUBROUTINE DSYTRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) diff --git a/SRC/dsytri_3.f b/SRC/dsytri_3.f index 86d69cdfdd..946cc2ffc6 100644 --- a/SRC/dsytri_3.f +++ b/SRC/dsytri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetri_3 * *> \par Contributors: * ================== diff --git a/SRC/dsytri_3x.f b/SRC/dsytri_3x.f index 2e3809a1ec..1eb6df25a0 100644 --- a/SRC/dsytri_3x.f +++ b/SRC/dsytri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetri_3x * *> \par Contributors: * ================== diff --git a/SRC/dsytri_rook.f b/SRC/dsytri_rook.f index 3d1a24aafc..472c0f37b4 100644 --- a/SRC/dsytri_rook.f +++ b/SRC/dsytri_rook.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetri_rook * *> \par Contributors: * ================== diff --git a/SRC/dsytrs.f b/SRC/dsytrs.f index f1be52e887..2d0c6069fb 100644 --- a/SRC/dsytrs.f +++ b/SRC/dsytrs.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrs * * ===================================================================== SUBROUTINE DSYTRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/dsytrs2.f b/SRC/dsytrs2.f index 7e868f1a1f..76e8c02539 100644 --- a/SRC/dsytrs2.f +++ b/SRC/dsytrs2.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrs2 * * ===================================================================== SUBROUTINE DSYTRS2( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/dsytrs_3.f b/SRC/dsytrs_3.f index 56ec92059a..6f42572dc2 100644 --- a/SRC/dsytrs_3.f +++ b/SRC/dsytrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrs_3 * *> \par Contributors: * ================== diff --git a/SRC/dsytrs_aa.f b/SRC/dsytrs_aa.f index 26b11a2a0b..d3894cc110 100644 --- a/SRC/dsytrs_aa.f +++ b/SRC/dsytrs_aa.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrs_aa * * ===================================================================== SUBROUTINE DSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/dsytrs_aa_2stage.f b/SRC/dsytrs_aa_2stage.f index 963a886839..9dc368af67 100644 --- a/SRC/dsytrs_aa_2stage.f +++ b/SRC/dsytrs_aa_2stage.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrs_aa_2stage * * ===================================================================== SUBROUTINE DSYTRS_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/dsytrs_rook.f b/SRC/dsytrs_rook.f index 1830347f83..4c61d1a4f1 100644 --- a/SRC/dsytrs_rook.f +++ b/SRC/dsytrs_rook.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup hetrs_rook * *> \par Contributors: * ================== diff --git a/SRC/dtbcon.f b/SRC/dtbcon.f index b0dc2a5641..0ec9316b55 100644 --- a/SRC/dtbcon.f +++ b/SRC/dtbcon.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tbcon * * ===================================================================== SUBROUTINE DTBCON( NORM, UPLO, DIAG, N, KD, AB, LDAB, RCOND, WORK, diff --git a/SRC/dtbrfs.f b/SRC/dtbrfs.f index 361a9b0b7a..0de2d60084 100644 --- a/SRC/dtbrfs.f +++ b/SRC/dtbrfs.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tbrfs * * ===================================================================== SUBROUTINE DTBRFS( UPLO, TRANS, DIAG, N, KD, NRHS, AB, LDAB, B, diff --git a/SRC/dtbtrs.f b/SRC/dtbtrs.f index 05bd5f895b..637817e2ed 100644 --- a/SRC/dtbtrs.f +++ b/SRC/dtbtrs.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tbtrs * * ===================================================================== SUBROUTINE DTBTRS( UPLO, TRANS, DIAG, N, KD, NRHS, AB, LDAB, B, diff --git a/SRC/dtfsm.f b/SRC/dtfsm.f index b2a80d029d..af14784947 100644 --- a/SRC/dtfsm.f +++ b/SRC/dtfsm.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tfsm * *> \par Further Details: * ===================== diff --git a/SRC/dtftri.f b/SRC/dtftri.f index d367c90299..6af5158799 100644 --- a/SRC/dtftri.f +++ b/SRC/dtftri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tftri * *> \par Further Details: * ===================== diff --git a/SRC/dtfttp.f b/SRC/dtfttp.f index c83af44067..fd7e44ae0c 100644 --- a/SRC/dtfttp.f +++ b/SRC/dtfttp.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tfttp * *> \par Further Details: * ===================== diff --git a/SRC/dtfttr.f b/SRC/dtfttr.f index 3bfe4f1d9a..9c68544ffb 100644 --- a/SRC/dtfttr.f +++ b/SRC/dtfttr.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tfttr * *> \par Further Details: * ===================== diff --git a/SRC/dtgevc.f b/SRC/dtgevc.f index be70b20832..6d7384ff52 100644 --- a/SRC/dtgevc.f +++ b/SRC/dtgevc.f @@ -228,7 +228,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup tgevc * *> \par Further Details: * ===================== diff --git a/SRC/dtgex2.f b/SRC/dtgex2.f index 00c23a8330..f92e446bf3 100644 --- a/SRC/dtgex2.f +++ b/SRC/dtgex2.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEauxiliary +*> \ingroup tgex2 * *> \par Further Details: * ===================== diff --git a/SRC/dtgexc.f b/SRC/dtgexc.f index 9dce3f597b..42e1f244cc 100644 --- a/SRC/dtgexc.f +++ b/SRC/dtgexc.f @@ -195,7 +195,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup tgexc * *> \par Contributors: * ================== diff --git a/SRC/dtgsen.f b/SRC/dtgsen.f index 8de66b6a17..e454e3481d 100644 --- a/SRC/dtgsen.f +++ b/SRC/dtgsen.f @@ -304,7 +304,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tgsen * *> \par Further Details: * ===================== diff --git a/SRC/dtgsja.f b/SRC/dtgsja.f index 37668c7391..1264e08575 100644 --- a/SRC/dtgsja.f +++ b/SRC/dtgsja.f @@ -350,7 +350,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tgsja * *> \par Further Details: * ===================== diff --git a/SRC/dtgsna.f b/SRC/dtgsna.f index 013dc91bd6..f31150507d 100644 --- a/SRC/dtgsna.f +++ b/SRC/dtgsna.f @@ -230,7 +230,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tgsna * *> \par Further Details: * ===================== diff --git a/SRC/dtgsy2.f b/SRC/dtgsy2.f index 3926f20865..e908a33ba0 100644 --- a/SRC/dtgsy2.f +++ b/SRC/dtgsy2.f @@ -259,7 +259,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYauxiliary +*> \ingroup tgsy2 * *> \par Contributors: * ================== diff --git a/SRC/dtgsyl.f b/SRC/dtgsyl.f index 101c92dcff..f1a988c777 100644 --- a/SRC/dtgsyl.f +++ b/SRC/dtgsyl.f @@ -261,7 +261,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup tgsyl * *> \par Contributors: * ================== diff --git a/SRC/dtpcon.f b/SRC/dtpcon.f index 39c7265bb3..0b2959b2e3 100644 --- a/SRC/dtpcon.f +++ b/SRC/dtpcon.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpcon * * ===================================================================== SUBROUTINE DTPCON( NORM, UPLO, DIAG, N, AP, RCOND, WORK, IWORK, diff --git a/SRC/dtplqt.f b/SRC/dtplqt.f index 98fe771042..e6a0556e0b 100644 --- a/SRC/dtplqt.f +++ b/SRC/dtplqt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tplqt * *> \par Further Details: * ===================== diff --git a/SRC/dtplqt2.f b/SRC/dtplqt2.f index 8a2f31dd1e..fd25cbf415 100644 --- a/SRC/dtplqt2.f +++ b/SRC/dtplqt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tplqt2 * *> \par Further Details: * ===================== diff --git a/SRC/dtpmlqt.f b/SRC/dtpmlqt.f index 05f1ed1316..5f03395934 100644 --- a/SRC/dtpmlqt.f +++ b/SRC/dtpmlqt.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpmlqt * *> \par Further Details: * ===================== diff --git a/SRC/dtpmqrt.f b/SRC/dtpmqrt.f index 9cf4fa0864..c78b45b227 100644 --- a/SRC/dtpmqrt.f +++ b/SRC/dtpmqrt.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpmqrt * *> \par Further Details: * ===================== diff --git a/SRC/dtpqrt.f b/SRC/dtpqrt.f index 28401f7142..2ce21342e6 100644 --- a/SRC/dtpqrt.f +++ b/SRC/dtpqrt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpqrt * *> \par Further Details: * ===================== diff --git a/SRC/dtpqrt2.f b/SRC/dtpqrt2.f index 1ace030138..e38d462611 100644 --- a/SRC/dtpqrt2.f +++ b/SRC/dtpqrt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpqrt2 * *> \par Further Details: * ===================== diff --git a/SRC/dtprfb.f b/SRC/dtprfb.f index c015075b3f..18a132ddba 100644 --- a/SRC/dtprfb.f +++ b/SRC/dtprfb.f @@ -194,7 +194,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup tprfb * *> \par Further Details: * ===================== diff --git a/SRC/dtprfs.f b/SRC/dtprfs.f index bd4f0ce08e..abeb49e065 100644 --- a/SRC/dtprfs.f +++ b/SRC/dtprfs.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tprfs * * ===================================================================== SUBROUTINE DTPRFS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, X, LDX, diff --git a/SRC/dtptri.f b/SRC/dtptri.f index f1c976f2ce..34706941b3 100644 --- a/SRC/dtptri.f +++ b/SRC/dtptri.f @@ -91,7 +91,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tptri * *> \par Further Details: * ===================== diff --git a/SRC/dtptrs.f b/SRC/dtptrs.f index 18a92d0454..8503d23838 100644 --- a/SRC/dtptrs.f +++ b/SRC/dtptrs.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tptrs * * ===================================================================== SUBROUTINE DTPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO ) diff --git a/SRC/dtpttf.f b/SRC/dtpttf.f index 0c7aa1e947..7764174af6 100644 --- a/SRC/dtpttf.f +++ b/SRC/dtpttf.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpttf * *> \par Further Details: * ===================== diff --git a/SRC/dtpttr.f b/SRC/dtpttr.f index 2126eda09a..5599762e77 100644 --- a/SRC/dtpttr.f +++ b/SRC/dtpttr.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpttr * * ===================================================================== SUBROUTINE DTPTTR( UPLO, N, AP, A, LDA, INFO ) diff --git a/SRC/dtrcon.f b/SRC/dtrcon.f index 9b6c75489a..cfa2919091 100644 --- a/SRC/dtrcon.f +++ b/SRC/dtrcon.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trcon * * ===================================================================== SUBROUTINE DTRCON( NORM, UPLO, DIAG, N, A, LDA, RCOND, WORK, diff --git a/SRC/dtrevc.f b/SRC/dtrevc.f index e0e7a2676d..82cd89ec54 100644 --- a/SRC/dtrevc.f +++ b/SRC/dtrevc.f @@ -200,7 +200,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trevc * *> \par Further Details: * ===================== diff --git a/SRC/dtrevc3.f b/SRC/dtrevc3.f index 245930412f..22a9bc7b19 100644 --- a/SRC/dtrevc3.f +++ b/SRC/dtrevc3.f @@ -215,7 +215,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trevc3 * *> \par Further Details: * ===================== diff --git a/SRC/dtrexc.f b/SRC/dtrexc.f index 4cb18e3836..26933861b2 100644 --- a/SRC/dtrexc.f +++ b/SRC/dtrexc.f @@ -140,7 +140,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trexc * * ===================================================================== SUBROUTINE DTREXC( COMPQ, N, T, LDT, Q, LDQ, IFST, ILST, WORK, diff --git a/SRC/dtrrfs.f b/SRC/dtrrfs.f index de0dc52058..6384d958c9 100644 --- a/SRC/dtrrfs.f +++ b/SRC/dtrrfs.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trrfs * * ===================================================================== SUBROUTINE DTRRFS( UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, X, diff --git a/SRC/dtrsen.f b/SRC/dtrsen.f index 3aba35aded..3d78c11ab7 100644 --- a/SRC/dtrsen.f +++ b/SRC/dtrsen.f @@ -230,7 +230,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trsen * *> \par Further Details: * ===================== diff --git a/SRC/dtrsna.f b/SRC/dtrsna.f index fbe72f7cc8..1676a7ecd3 100644 --- a/SRC/dtrsna.f +++ b/SRC/dtrsna.f @@ -213,7 +213,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trsna * *> \par Further Details: * ===================== diff --git a/SRC/dtrsyl.f b/SRC/dtrsyl.f index 1d418e0ace..d8828557c3 100644 --- a/SRC/dtrsyl.f +++ b/SRC/dtrsyl.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleSYcomputational +*> \ingroup trsyl * * ===================================================================== SUBROUTINE DTRSYL( TRANA, TRANB, ISGN, M, N, A, LDA, B, LDB, C, diff --git a/SRC/dtrti2.f b/SRC/dtrti2.f index 0d9115554c..20fa063461 100644 --- a/SRC/dtrti2.f +++ b/SRC/dtrti2.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trti2 * * ===================================================================== SUBROUTINE DTRTI2( UPLO, DIAG, N, A, LDA, INFO ) diff --git a/SRC/dtrtri.f b/SRC/dtrtri.f index 1cf9a9aafb..04f7abc1e2 100644 --- a/SRC/dtrtri.f +++ b/SRC/dtrtri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trtri * * ===================================================================== SUBROUTINE DTRTRI( UPLO, DIAG, N, A, LDA, INFO ) diff --git a/SRC/dtrtrs.f b/SRC/dtrtrs.f index d82f31d0b4..5cdd78b2b1 100644 --- a/SRC/dtrtrs.f +++ b/SRC/dtrtrs.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trtrs * * ===================================================================== SUBROUTINE DTRTRS( UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, diff --git a/SRC/dtrttf.f b/SRC/dtrttf.f index 4e4b5ee556..44be78a19c 100644 --- a/SRC/dtrttf.f +++ b/SRC/dtrttf.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trttf * *> \par Further Details: * ===================== diff --git a/SRC/dtrttp.f b/SRC/dtrttp.f index 15289172cf..072fcc325d 100644 --- a/SRC/dtrttp.f +++ b/SRC/dtrttp.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup trttp * * ===================================================================== SUBROUTINE DTRTTP( UPLO, N, A, LDA, AP, INFO ) diff --git a/SRC/dtzrzf.f b/SRC/dtzrzf.f index ced2c4f5e8..0ede8a292e 100644 --- a/SRC/dtzrzf.f +++ b/SRC/dtzrzf.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tzrzf * *> \par Contributors: * ================== diff --git a/SRC/dzsum1.f b/SRC/dzsum1.f index 7c5ebfacf7..4fc95d002b 100644 --- a/SRC/dzsum1.f +++ b/SRC/dzsum1.f @@ -69,7 +69,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup sum1 * *> \par Contributors: * ================== diff --git a/SRC/icmax1.f b/SRC/icmax1.f index 05a655836a..a17dbed86d 100644 --- a/SRC/icmax1.f +++ b/SRC/icmax1.f @@ -69,7 +69,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup imax1 * *> \par Contributors: * ================== diff --git a/SRC/ieeeck.f b/SRC/ieeeck.f index f9f6332ecf..9b9e8fabc4 100644 --- a/SRC/ieeeck.f +++ b/SRC/ieeeck.f @@ -75,7 +75,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup ieeeck * * ===================================================================== INTEGER FUNCTION IEEECK( ISPEC, ZERO, ONE ) diff --git a/SRC/ilaclc.f b/SRC/ilaclc.f index 9ac02867af..fff4dda2f6 100644 --- a/SRC/ilaclc.f +++ b/SRC/ilaclc.f @@ -71,7 +71,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup ilalc * * ===================================================================== INTEGER FUNCTION ILACLC( M, N, A, LDA ) diff --git a/SRC/ilaclr.f b/SRC/ilaclr.f index 9f9a1cd323..a40bf57aec 100644 --- a/SRC/ilaclr.f +++ b/SRC/ilaclr.f @@ -71,7 +71,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup ilalr * * ===================================================================== INTEGER FUNCTION ILACLR( M, N, A, LDA ) diff --git a/SRC/iladiag.f b/SRC/iladiag.f index 1fff79a931..2941f67ef5 100644 --- a/SRC/iladiag.f +++ b/SRC/iladiag.f @@ -51,7 +51,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup iladiag * * ===================================================================== INTEGER FUNCTION ILADIAG( DIAG ) diff --git a/SRC/iladlc.f b/SRC/iladlc.f index a98e7218bf..c5ef963c4b 100644 --- a/SRC/iladlc.f +++ b/SRC/iladlc.f @@ -71,7 +71,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup ilalc * * ===================================================================== INTEGER FUNCTION ILADLC( M, N, A, LDA ) diff --git a/SRC/iladlr.f b/SRC/iladlr.f index b1abded84b..900df1c1a7 100644 --- a/SRC/iladlr.f +++ b/SRC/iladlr.f @@ -71,7 +71,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup ilalr * * ===================================================================== INTEGER FUNCTION ILADLR( M, N, A, LDA ) diff --git a/SRC/ilaenv.f b/SRC/ilaenv.f index a639e0375a..a03d0abe97 100644 --- a/SRC/ilaenv.f +++ b/SRC/ilaenv.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup ilaenv * *> \par Further Details: * ===================== diff --git a/SRC/ilaenv2stage.f b/SRC/ilaenv2stage.f index f2b105307e..6f07b84fb3 100644 --- a/SRC/ilaenv2stage.f +++ b/SRC/ilaenv2stage.f @@ -66,8 +66,8 @@ *> = 2: the optimal blocksize ib for the eigenvectors *> singular vectors update routine *> -*> = 3: The length of the array that store the Housholder -*> representation for the second stage +*> = 3: The length of the array that store the Housholder +*> representation for the second stage *> Band to Tridiagonal or Bidiagonal *> *> = 4: The workspace needed for the routine in input. @@ -122,7 +122,7 @@ *> \author NAG Ltd. *> \author Nick R. Papior * -*> \ingroup OTHERauxiliary +*> \ingroup ilaenv2stage * *> \par Further Details: * ===================== @@ -141,7 +141,7 @@ *> passed a value of -1. *> 3) The parameter value returned by ILAENV2STAGE is checked for validity in *> the calling subroutine. -*> +*> *> \endverbatim *> * ===================================================================== diff --git a/SRC/ilaprec.f b/SRC/ilaprec.f index 6aea3e0f0b..d9bfe1ebef 100644 --- a/SRC/ilaprec.f +++ b/SRC/ilaprec.f @@ -51,7 +51,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup ilaprec * * ===================================================================== INTEGER FUNCTION ILAPREC( PREC ) diff --git a/SRC/ilaslc.f b/SRC/ilaslc.f index e299ff7c18..791d49c35f 100644 --- a/SRC/ilaslc.f +++ b/SRC/ilaslc.f @@ -71,7 +71,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup ilalc * * ===================================================================== INTEGER FUNCTION ILASLC( M, N, A, LDA ) diff --git a/SRC/ilaslr.f b/SRC/ilaslr.f index 840a797f02..db37d2a539 100644 --- a/SRC/ilaslr.f +++ b/SRC/ilaslr.f @@ -71,7 +71,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup ilalr * * ===================================================================== INTEGER FUNCTION ILASLR( M, N, A, LDA ) diff --git a/SRC/ilatrans.f b/SRC/ilatrans.f index e822261ef7..183757485d 100644 --- a/SRC/ilatrans.f +++ b/SRC/ilatrans.f @@ -51,7 +51,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup ilatrans * * ===================================================================== INTEGER FUNCTION ILATRANS( TRANS ) diff --git a/SRC/ilauplo.f b/SRC/ilauplo.f index 8d5b1210be..af23a0218f 100644 --- a/SRC/ilauplo.f +++ b/SRC/ilauplo.f @@ -51,7 +51,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup ilauplo * * ===================================================================== INTEGER FUNCTION ILAUPLO( UPLO ) diff --git a/SRC/ilazlc.f b/SRC/ilazlc.f index 8af3430e61..359f0ae2d3 100644 --- a/SRC/ilazlc.f +++ b/SRC/ilazlc.f @@ -71,7 +71,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup ilalc * * ===================================================================== INTEGER FUNCTION ILAZLC( M, N, A, LDA ) diff --git a/SRC/ilazlr.f b/SRC/ilazlr.f index e0134a6a35..f4359bd56e 100644 --- a/SRC/ilazlr.f +++ b/SRC/ilazlr.f @@ -71,7 +71,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup ilalr * * ===================================================================== INTEGER FUNCTION ILAZLR( M, N, A, LDA ) diff --git a/SRC/iparam2stage.F b/SRC/iparam2stage.F index 52d507e9d7..9aafb16ea9 100644 --- a/SRC/iparam2stage.F +++ b/SRC/iparam2stage.F @@ -2,23 +2,23 @@ * * =========== DOCUMENTATION =========== * -* Online html documentation available at -* http://www.netlib.org/lapack/explore-html/ +* Online html documentation available at +* http://www.netlib.org/lapack/explore-html/ * *> \htmlonly -*> Download IPARAM2STAGE + dependencies -*> -*> [TGZ] -*> +*> Download IPARAM2STAGE + dependencies +*> +*> [TGZ] +*> *> [ZIP] -*> +*> *> [TXT] -*> \endhtmlonly +*> \endhtmlonly * * Definition: * =========== * -* INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, +* INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, * NI, NBI, IBI, NXI ) * #if defined(_OPENMP) * use omp_lib @@ -36,8 +36,8 @@ *> *> This program sets problem and machine dependent parameters *> useful for xHETRD_2STAGE, xHETRD_HE2HB, xHETRD_HB2ST, -*> xGEBRD_2STAGE, xGEBRD_GE2GB, xGEBRD_GB2BD -*> and related subroutines for eigenvalue problems. +*> xGEBRD_2STAGE, xGEBRD_GE2GB, xGEBRD_GB2BD +*> and related subroutines for eigenvalue problems. *> It is called whenever ILAENV is called with 17 <= ISPEC <= 21. *> It is called whenever ILAENV2STAGE is called with 1 <= ISPEC <= 5 *> with a direct conversion ISPEC + 16. @@ -58,8 +58,8 @@ *> ISPEC=18: the optimal blocksize ib for the eigenvectors *> singular vectors update routine *> -*> ISPEC=19: The length of the array that store the Housholder -*> representation for the second stage +*> ISPEC=19: The length of the array that store the Housholder +*> representation for the second stage *> Band to Tridiagonal or Bidiagonal *> *> ISPEC=20: The workspace needed for the routine in input. @@ -89,7 +89,7 @@ *> *> \param[in] NBI *> \verbatim -*> NBI is INTEGER which is the used in the reduction, +*> NBI is INTEGER which is the used in the reduction, *> (e.g., the size of the band), needed to compute workspace *> and LHOUS2. *> \endverbatim @@ -108,12 +108,12 @@ * Authors: * ======== * -*> \author Univ. of Tennessee -*> \author Univ. of California Berkeley -*> \author Univ. of Colorado Denver -*> \author NAG Ltd. +*> \author Univ. of Tennessee +*> \author Univ. of California Berkeley +*> \author Univ. of Colorado Denver +*> \author NAG Ltd. * -*> \ingroup auxOTHERauxiliary +*> \ingroup iparam2stage * *> \par Further Details: * ===================== @@ -133,7 +133,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -141,16 +141,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, + INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, $ NI, NBI, IBI, NXI ) #if defined(_OPENMP) use omp_lib @@ -191,10 +191,10 @@ INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, ENDIF * * Get the number of threads -* +* NTHREADS = 1 #if defined(_OPENMP) -!$OMP PARALLEL +!$OMP PARALLEL NTHREADS = OMP_GET_NUM_THREADS() !$OMP END PARALLEL #endif @@ -259,7 +259,7 @@ INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, CPREC = PREC.EQ.'C' .OR. PREC.EQ.'Z' * * Invalid value for PRECISION -* +* IF( .NOT.( RPREC .OR. CPREC ) ) THEN IPARAM2STAGE = -1 RETURN @@ -267,9 +267,9 @@ INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, ENDIF * WRITE(*,*),'RPREC,CPREC ',RPREC,CPREC, * $ ' ALGO ',ALGO,' STAGE ',STAG -* * - IF (( ISPEC .EQ. 17 ) .OR. ( ISPEC .EQ. 18 )) THEN +* + IF (( ISPEC .EQ. 17 ) .OR. ( ISPEC .EQ. 18 )) THEN * * ISPEC = 17, 18: block size KD, IB * Could be also dependent from N but for now it @@ -305,7 +305,7 @@ INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, * ELSE IF ( ISPEC .EQ. 19 ) THEN * -* ISPEC = 19: +* ISPEC = 19: * LHOUS length of the Houselholder representation * matrix (V,T) of the second stage. should be >= 1. * @@ -325,18 +325,18 @@ INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, * ELSE IF ( ISPEC .EQ. 20 ) THEN * -* ISPEC = 20: (21 for future use) -* LWORK length of the workspace for +* ISPEC = 20: (21 for future use) +* LWORK length of the workspace for * either or both stages for TRD and BRD. should be >= 1. * TRD: * TRD_stage 1: = LT + LW + LS1 + LS2 -* = LDT*KD + N*KD + N*MAX(KD,FACTOPTNB) + LDS2*KD +* = LDT*KD + N*KD + N*MAX(KD,FACTOPTNB) + LDS2*KD * where LDT=LDS2=KD * = N*KD + N*max(KD,FACTOPTNB) + 2*KD*KD * TRD_stage 2: = (2NB+1)*N + KD*NTHREADS * TRD_both : = max(stage1,stage2) + AB ( AB=(KD+1)*N ) -* = N*KD + N*max(KD+1,FACTOPTNB) -* + max(2*KD*KD, KD*NTHREADS) +* = N*KD + N*max(KD+1,FACTOPTNB) +* + max(2*KD*KD, KD*NTHREADS) * + (KD+1)*N LWORK = -1 SUBNAM(1:1) = PREC @@ -348,8 +348,8 @@ INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, FACTOPTNB = MAX(QROPTNB, LQOPTNB) IF( ALGO.EQ.'TRD' ) THEN IF( STAG.EQ.'2STAG' ) THEN - LWORK = NI*NBI + NI*MAX(NBI+1,FACTOPTNB) - $ + MAX(2*NBI*NBI, NBI*NTHREADS) + LWORK = NI*NBI + NI*MAX(NBI+1,FACTOPTNB) + $ + MAX(2*NBI*NBI, NBI*NTHREADS) $ + (NBI+1)*NI ELSE IF( (STAG.EQ.'HE2HB').OR.(STAG.EQ.'SY2SB') ) THEN LWORK = NI*NBI + NI*MAX(NBI,FACTOPTNB) + 2*NBI*NBI @@ -358,8 +358,8 @@ INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, ENDIF ELSE IF( ALGO.EQ.'BRD' ) THEN IF( STAG.EQ.'2STAG' ) THEN - LWORK = 2*NI*NBI + NI*MAX(NBI+1,FACTOPTNB) - $ + MAX(2*NBI*NBI, NBI*NTHREADS) + LWORK = 2*NI*NBI + NI*MAX(NBI+1,FACTOPTNB) + $ + MAX(2*NBI*NBI, NBI*NTHREADS) $ + (NBI+1)*NI ELSE IF( STAG.EQ.'GE2GB' ) THEN LWORK = NI*NBI + NI*MAX(NBI,FACTOPTNB) + 2*NBI*NBI @@ -377,7 +377,7 @@ INTEGER FUNCTION IPARAM2STAGE( ISPEC, NAME, OPTS, * ELSE IF ( ISPEC .EQ. 21 ) THEN * -* ISPEC = 21 for future use +* ISPEC = 21 for future use IPARAM2STAGE = NXI ENDIF * diff --git a/SRC/iparmq.f b/SRC/iparmq.f index 54c05471ca..481115575e 100644 --- a/SRC/iparmq.f +++ b/SRC/iparmq.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup iparmq * *> \par Further Details: * ===================== diff --git a/SRC/izmax1.f b/SRC/izmax1.f index 210652fd1c..6474711e13 100644 --- a/SRC/izmax1.f +++ b/SRC/izmax1.f @@ -69,7 +69,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup imax1 * *> \par Contributors: * ================== diff --git a/SRC/la_constants.f90 b/SRC/la_constants.f90 index 26bec31687..3970e3a055 100644 --- a/SRC/la_constants.f90 +++ b/SRC/la_constants.f90 @@ -12,7 +12,7 @@ ! !> \date May 2016 ! -!> \ingroup OTHERauxiliary +!> \ingroup la_constants ! !> \par Contributors: ! ================== @@ -42,7 +42,7 @@ module LA_CONSTANTS ! -- LAPACK is a software package provided by Univ. of Tennessee, -- ! -- Univ. of California Berkeley, Univ. of Colorado Denver and NAG Ltd..-- -! Standard constants for +! Standard constants for integer, parameter :: sp = kind(1.e0) real(sp), parameter :: szero = 0.0_sp @@ -78,14 +78,14 @@ module LA_CONSTANTS real(sp), parameter :: stbig = real(radix(0._sp), sp)**floor( & (maxexponent(0._sp) - digits(0._sp) + 1) * 0.5_sp) ! ssml >= 1/s, where s was defined in https://doi.org/10.1145/355769.355771 -! The correction was added in https://doi.org/10.1145/3061665 to scale denormalized numbers correctly +! The correction was added in https://doi.org/10.1145/3061665 to scale denormalized numbers correctly real(sp), parameter :: sssml = real(radix(0._sp), sp)**( - floor( & (minexponent(0._sp) - digits(0._sp)) * 0.5_sp)) ! sbig = 1/S, where S was defined in https://doi.org/10.1145/355769.355771 real(sp), parameter :: ssbig = real(radix(0._sp), sp)**( - ceiling( & (maxexponent(0._sp) + digits(0._sp) - 1) * 0.5_sp)) -! Standard constants for +! Standard constants for integer, parameter :: dp = kind(1.d0) real(dp), parameter :: dzero = 0.0_dp @@ -121,7 +121,7 @@ module LA_CONSTANTS real(dp), parameter :: dtbig = real(radix(0._dp), dp)**floor( & (maxexponent(0._dp) - digits(0._dp) + 1) * 0.5_dp) ! ssml >= 1/s, where s was defined in https://doi.org/10.1145/355769.355771 -! The correction was added in https://doi.org/10.1145/3061665 to scale denormalized numbers correctly +! The correction was added in https://doi.org/10.1145/3061665 to scale denormalized numbers correctly real(dp), parameter :: dssml = real(radix(0._dp), dp)**( - floor( & (minexponent(0._dp) - digits(0._dp)) * 0.5_dp)) ! sbig = 1/S, where S was defined in https://doi.org/10.1145/355769.355771 diff --git a/SRC/lsamen.f b/SRC/lsamen.f index 59a81976fb..91447b4101 100644 --- a/SRC/lsamen.f +++ b/SRC/lsamen.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lsamen * * ===================================================================== LOGICAL FUNCTION LSAMEN( N, CA, CB ) diff --git a/SRC/sbbcsd.f b/SRC/sbbcsd.f index d5720cb33b..0e84bff8be 100644 --- a/SRC/sbbcsd.f +++ b/SRC/sbbcsd.f @@ -322,7 +322,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup bbcsd * * ===================================================================== SUBROUTINE SBBCSD( JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, M, P, Q, diff --git a/SRC/sbdsdc.f b/SRC/sbdsdc.f index 2a6cc99708..9f60301a2b 100644 --- a/SRC/sbdsdc.f +++ b/SRC/sbdsdc.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup bdsdc * *> \par Contributors: * ================== diff --git a/SRC/sbdsqr.f b/SRC/sbdsqr.f index 880f0607b7..4ce0fe55c9 100644 --- a/SRC/sbdsqr.f +++ b/SRC/sbdsqr.f @@ -232,7 +232,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup bdsqr * * ===================================================================== SUBROUTINE SBDSQR( UPLO, N, NCVT, NRU, NCC, D, E, VT, LDVT, U, diff --git a/SRC/sbdsvdx.f b/SRC/sbdsvdx.f index d7cb2dc839..d922d0e502 100644 --- a/SRC/sbdsvdx.f +++ b/SRC/sbdsvdx.f @@ -218,7 +218,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup bdsvdx * * ===================================================================== SUBROUTINE SBDSVDX( UPLO, JOBZ, RANGE, N, D, E, VL, VU, IL, IU, diff --git a/SRC/scsum1.f b/SRC/scsum1.f index 2616e4b789..d93baf233d 100644 --- a/SRC/scsum1.f +++ b/SRC/scsum1.f @@ -69,7 +69,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERauxiliary +*> \ingroup sum1 * *> \par Contributors: * ================== diff --git a/SRC/sdisna.f b/SRC/sdisna.f index 004ceae673..9bb63c0c3f 100644 --- a/SRC/sdisna.f +++ b/SRC/sdisna.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup disna * * ===================================================================== SUBROUTINE SDISNA( JOB, M, N, D, SEP, INFO ) diff --git a/SRC/sgbbrd.f b/SRC/sgbbrd.f index 74e9fe7675..7a22f4f6f8 100644 --- a/SRC/sgbbrd.f +++ b/SRC/sgbbrd.f @@ -179,7 +179,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbbrd * * ===================================================================== SUBROUTINE SGBBRD( VECT, M, N, NCC, KL, KU, AB, LDAB, D, E, Q, diff --git a/SRC/sgbcon.f b/SRC/sgbcon.f index 1914f152cd..0b0e6cf42b 100644 --- a/SRC/sgbcon.f +++ b/SRC/sgbcon.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbcon * * ===================================================================== SUBROUTINE SGBCON( NORM, N, KL, KU, AB, LDAB, IPIV, ANORM, RCOND, diff --git a/SRC/sgbequ.f b/SRC/sgbequ.f index b3c4dfd5db..e9e37fa94e 100644 --- a/SRC/sgbequ.f +++ b/SRC/sgbequ.f @@ -145,7 +145,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbequ * * ===================================================================== SUBROUTINE SGBEQU( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/sgbequb.f b/SRC/sgbequb.f index 206624d2a9..7bb5cbc733 100644 --- a/SRC/sgbequb.f +++ b/SRC/sgbequb.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbequb * * ===================================================================== SUBROUTINE SGBEQUB( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/sgbrfs.f b/SRC/sgbrfs.f index 2a8f3d1f2e..236c2856d2 100644 --- a/SRC/sgbrfs.f +++ b/SRC/sgbrfs.f @@ -196,7 +196,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbrfs * * ===================================================================== SUBROUTINE SGBRFS( TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, LDAFB, diff --git a/SRC/sgbrfsx.f b/SRC/sgbrfsx.f index 0193ba4f07..bb25047b78 100644 --- a/SRC/sgbrfsx.f +++ b/SRC/sgbrfsx.f @@ -429,7 +429,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbrfsx * * ===================================================================== SUBROUTINE SGBRFSX( TRANS, EQUED, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/sgbsv.f b/SRC/sgbsv.f index d4af6dfe3f..46cf311f11 100644 --- a/SRC/sgbsv.f +++ b/SRC/sgbsv.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBsolve +*> \ingroup gbsv * *> \par Further Details: * ===================== diff --git a/SRC/sgbsvx.f b/SRC/sgbsvx.f index df3a721d93..efc5622f45 100644 --- a/SRC/sgbsvx.f +++ b/SRC/sgbsvx.f @@ -359,7 +359,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBsolve +*> \ingroup gbsvx * * ===================================================================== SUBROUTINE SGBSVX( FACT, TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/sgbsvxx.f b/SRC/sgbsvxx.f index aef9034ae8..1d41da45f5 100644 --- a/SRC/sgbsvxx.f +++ b/SRC/sgbsvxx.f @@ -552,7 +552,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBsolve +*> \ingroup gbsvxx * * ===================================================================== SUBROUTINE SGBSVXX( FACT, TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/sgbtf2.f b/SRC/sgbtf2.f index 8bdea3902f..762c50c263 100644 --- a/SRC/sgbtf2.f +++ b/SRC/sgbtf2.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbtf2 * *> \par Further Details: * ===================== diff --git a/SRC/sgbtrf.f b/SRC/sgbtrf.f index 56712f157e..8cdd3538ae 100644 --- a/SRC/sgbtrf.f +++ b/SRC/sgbtrf.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbtrf * *> \par Further Details: * ===================== diff --git a/SRC/sgbtrs.f b/SRC/sgbtrs.f index fc4601b5f1..86888b047a 100644 --- a/SRC/sgbtrs.f +++ b/SRC/sgbtrs.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup gbtrs * * ===================================================================== SUBROUTINE SGBTRS( TRANS, N, KL, KU, NRHS, AB, LDAB, IPIV, B, LDB, diff --git a/SRC/sgebak.f b/SRC/sgebak.f index abb7809a3b..f9045c7397 100644 --- a/SRC/sgebak.f +++ b/SRC/sgebak.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gebak * * ===================================================================== SUBROUTINE SGEBAK( JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, diff --git a/SRC/sgebal.f b/SRC/sgebal.f index 7c115fb6c1..d917cd56f8 100644 --- a/SRC/sgebal.f +++ b/SRC/sgebal.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gebal * *> \par Further Details: * ===================== diff --git a/SRC/sgebd2.f b/SRC/sgebd2.f index cb57ed6780..0044b54c52 100644 --- a/SRC/sgebd2.f +++ b/SRC/sgebd2.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gebd2 * *> \par Further Details: * ===================== diff --git a/SRC/sgebrd.f b/SRC/sgebrd.f index 08701164cf..91d5b6755c 100644 --- a/SRC/sgebrd.f +++ b/SRC/sgebrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gebrd * *> \par Further Details: * ===================== diff --git a/SRC/sgecon.f b/SRC/sgecon.f index 86aeea73bb..64b96bf1f9 100644 --- a/SRC/sgecon.f +++ b/SRC/sgecon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gecon * * ===================================================================== SUBROUTINE SGECON( NORM, N, A, LDA, ANORM, RCOND, WORK, IWORK, diff --git a/SRC/sgeequ.f b/SRC/sgeequ.f index 9928eaf621..d897366b42 100644 --- a/SRC/sgeequ.f +++ b/SRC/sgeequ.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geequ * * ===================================================================== SUBROUTINE SGEEQU( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/sgeequb.f b/SRC/sgeequb.f index c669f4c0e0..8fa6a42cd2 100644 --- a/SRC/sgeequb.f +++ b/SRC/sgeequb.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geequb * * ===================================================================== SUBROUTINE SGEEQUB( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/sgees.f b/SRC/sgees.f index 1a418ff3cc..c492a1f28f 100644 --- a/SRC/sgees.f +++ b/SRC/sgees.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEeigen +*> \ingroup gees * * ===================================================================== SUBROUTINE SGEES( JOBVS, SORT, SELECT, N, A, LDA, SDIM, WR, WI, diff --git a/SRC/sgeesx.f b/SRC/sgeesx.f index d1fc4b59ee..b908dfe1b3 100644 --- a/SRC/sgeesx.f +++ b/SRC/sgeesx.f @@ -272,7 +272,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEeigen +*> \ingroup geesx * * ===================================================================== SUBROUTINE SGEESX( JOBVS, SORT, SELECT, SENSE, N, A, LDA, SDIM, diff --git a/SRC/sgeev.f b/SRC/sgeev.f index 0298b5537f..07fa159f5a 100644 --- a/SRC/sgeev.f +++ b/SRC/sgeev.f @@ -184,7 +184,7 @@ * * @generated from dgeev.f, fortran d -> s, Tue Apr 19 01:47:44 2016 * -*> \ingroup realGEeigen +*> \ingroup geev * * ===================================================================== SUBROUTINE SGEEV( JOBVL, JOBVR, N, A, LDA, WR, WI, VL, LDVL, VR, diff --git a/SRC/sgeevx.f b/SRC/sgeevx.f index 58b6eba539..8e0f7725bf 100644 --- a/SRC/sgeevx.f +++ b/SRC/sgeevx.f @@ -297,7 +297,7 @@ * * @generated from dgeevx.f, fortran d -> s, Tue Apr 19 01:47:44 2016 * -*> \ingroup realGEeigen +*> \ingroup geevx * * ===================================================================== SUBROUTINE SGEEVX( BALANC, JOBVL, JOBVR, SENSE, N, A, LDA, WR, WI, diff --git a/SRC/sgehd2.f b/SRC/sgehd2.f index c7d8db19ec..2692e68273 100644 --- a/SRC/sgehd2.f +++ b/SRC/sgehd2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gehd2 * *> \par Further Details: * ===================== diff --git a/SRC/sgehrd.f b/SRC/sgehrd.f index 41b9aa78e4..996641a878 100644 --- a/SRC/sgehrd.f +++ b/SRC/sgehrd.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gehrd * *> \par Further Details: * ===================== diff --git a/SRC/sgejsv.f b/SRC/sgejsv.f index 42d2b8313d..b4840bac21 100644 --- a/SRC/sgejsv.f +++ b/SRC/sgejsv.f @@ -391,7 +391,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsing +*> \ingroup gejsv * *> \par Further Details: * ===================== diff --git a/SRC/sgelq.f b/SRC/sgelq.f index 9209f918ec..fad39ca448 100644 --- a/SRC/sgelq.f +++ b/SRC/sgelq.f @@ -166,6 +166,8 @@ *> the LQ factorization. *> \endverbatim *> +*> \ingroup gelq +*> * ===================================================================== SUBROUTINE SGELQ( M, N, A, LDA, T, TSIZE, WORK, LWORK, $ INFO ) diff --git a/SRC/sgelq2.f b/SRC/sgelq2.f index 3e50beb13e..dea1335b7f 100644 --- a/SRC/sgelq2.f +++ b/SRC/sgelq2.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gelq2 * *> \par Further Details: * ===================== diff --git a/SRC/sgelqf.f b/SRC/sgelqf.f index 24d8ab19c0..1998322b63 100644 --- a/SRC/sgelqf.f +++ b/SRC/sgelqf.f @@ -118,7 +118,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gelqf * *> \par Further Details: * ===================== diff --git a/SRC/sgelqt.f b/SRC/sgelqt.f index b5a4c21b30..f941388ece 100644 --- a/SRC/sgelqt.f +++ b/SRC/sgelqt.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqt * *> \par Further Details: * ===================== diff --git a/SRC/sgelqt3.f b/SRC/sgelqt3.f index 23816b4c89..d070c1a131 100644 --- a/SRC/sgelqt3.f +++ b/SRC/sgelqt3.f @@ -85,7 +85,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqt3 * *> \par Further Details: * ===================== diff --git a/SRC/sgels.f b/SRC/sgels.f index ba3fd4e2dd..09f8fa9fae 100644 --- a/SRC/sgels.f +++ b/SRC/sgels.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup gels * * ===================================================================== SUBROUTINE SGELS( TRANS, M, N, NRHS, A, LDA, B, LDB, WORK, LWORK, diff --git a/SRC/sgelsd.f b/SRC/sgelsd.f index 0abd158498..e91f383621 100644 --- a/SRC/sgelsd.f +++ b/SRC/sgelsd.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup gelsd * *> \par Contributors: * ================== diff --git a/SRC/sgelss.f b/SRC/sgelss.f index 5e67afd79e..1337838e0a 100644 --- a/SRC/sgelss.f +++ b/SRC/sgelss.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup gelss * * ===================================================================== SUBROUTINE SGELSS( M, N, NRHS, A, LDA, B, LDB, S, RCOND, RANK, diff --git a/SRC/sgelst.f b/SRC/sgelst.f index 2999ef7da0..f6390ca563 100644 --- a/SRC/sgelst.f +++ b/SRC/sgelst.f @@ -176,7 +176,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup gelst * *> \par Contributors: * ================== diff --git a/SRC/sgelsy.f b/SRC/sgelsy.f index b8d471b7dc..b9a67b930c 100644 --- a/SRC/sgelsy.f +++ b/SRC/sgelsy.f @@ -191,7 +191,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup gelsy * *> \par Contributors: * ================== diff --git a/SRC/sgemlq.f b/SRC/sgemlq.f index 536abf1840..49a53e71ea 100644 --- a/SRC/sgemlq.f +++ b/SRC/sgemlq.f @@ -119,7 +119,7 @@ *> The dimension of the array WORK. *> If LWORK = -1, then a workspace query is assumed. The routine *> only calculates the size of the WORK array, returns this -*> value as WORK(1), and no error message related to WORK +*> value as WORK(1), and no error message related to WORK *> is issued by XERBLA. *> \endverbatim *> @@ -143,7 +143,7 @@ *> *> \verbatim *> -*> These details are particular for this LAPACK implementation. Users should not +*> These details are particular for this LAPACK implementation. Users should not *> take them for granted. These details may change in the future, and are not likely *> true for another LAPACK implementation. These details are relevant if one wants *> to try to understand the code. They are not part of the interface. @@ -159,11 +159,13 @@ *> block sizes MB and NB returned by ILAENV, SGELQ will use either *> SLASWLQ (if the matrix is wide-and-short) or SGELQT to compute *> the LQ factorization. -*> This version of SGEMLQ will use either SLAMSWLQ or SGEMLQT to +*> This version of SGEMLQ will use either SLAMSWLQ or SGEMLQT to *> multiply matrix Q by another matrix. *> Further Details in SLAMSWLQ or SGEMLQT. *> \endverbatim *> +*> \ingroup gemlq +*> * ===================================================================== SUBROUTINE SGEMLQ( SIDE, TRANS, M, N, K, A, LDA, T, TSIZE, $ C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/sgemlqt.f b/SRC/sgemlqt.f index bb128c824d..7917f6b9c1 100644 --- a/SRC/sgemlqt.f +++ b/SRC/sgemlqt.f @@ -145,7 +145,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gemlqt * * ===================================================================== SUBROUTINE SGEMLQT( SIDE, TRANS, M, N, K, MB, V, LDV, T, LDT, diff --git a/SRC/sgemqr.f b/SRC/sgemqr.f index 2a92574591..f2714d7f54 100644 --- a/SRC/sgemqr.f +++ b/SRC/sgemqr.f @@ -120,7 +120,7 @@ *> The dimension of the array WORK. *> If LWORK = -1, then a workspace query is assumed. The routine *> only calculates the size of the WORK array, returns this -*> value as WORK(1), and no error message related to WORK +*> value as WORK(1), and no error message related to WORK *> is issued by XERBLA. *> \endverbatim *> @@ -144,7 +144,7 @@ *> *> \verbatim *> -*> These details are particular for this LAPACK implementation. Users should not +*> These details are particular for this LAPACK implementation. Users should not *> take them for granted. These details may change in the future, and are not likely *> true for another LAPACK implementation. These details are relevant if one wants *> to try to understand the code. They are not part of the interface. @@ -160,12 +160,14 @@ *> block sizes MB and NB returned by ILAENV, SGEQR will use either *> SLATSQR (if the matrix is tall-and-skinny) or SGEQRT to compute *> the QR factorization. -*> This version of SGEMQR will use either SLAMTSQR or SGEMQRT to +*> This version of SGEMQR will use either SLAMTSQR or SGEMQRT to *> multiply matrix Q by another matrix. *> Further Details in SLAMTSQR or SGEMQRT. *> *> \endverbatim *> +*> \ingroup gemqr +*> * ===================================================================== SUBROUTINE SGEMQR( SIDE, TRANS, M, N, K, A, LDA, T, TSIZE, $ C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/sgemqrt.f b/SRC/sgemqrt.f index 2dedfb2126..cd141ece5c 100644 --- a/SRC/sgemqrt.f +++ b/SRC/sgemqrt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gemqrt * * ===================================================================== SUBROUTINE SGEMQRT( SIDE, TRANS, M, N, K, NB, V, LDV, T, LDT, diff --git a/SRC/sgeql2.f b/SRC/sgeql2.f index ea5ad6b82d..0948cf4266 100644 --- a/SRC/sgeql2.f +++ b/SRC/sgeql2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geql2 * *> \par Further Details: * ===================== diff --git a/SRC/sgeqlf.f b/SRC/sgeqlf.f index efecfbb3ca..edcadb1e99 100644 --- a/SRC/sgeqlf.f +++ b/SRC/sgeqlf.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqlf * *> \par Further Details: * ===================== diff --git a/SRC/sgeqp3.f b/SRC/sgeqp3.f index 493bdae6af..28405d49e6 100644 --- a/SRC/sgeqp3.f +++ b/SRC/sgeqp3.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqp3 * *> \par Further Details: * ===================== diff --git a/SRC/sgeqr.f b/SRC/sgeqr.f index 6f41a92ead..3bd77683d5 100644 --- a/SRC/sgeqr.f +++ b/SRC/sgeqr.f @@ -168,6 +168,8 @@ *> *> \endverbatim *> +*> \ingroup geqr +*> * ===================================================================== SUBROUTINE SGEQR( M, N, A, LDA, T, TSIZE, WORK, LWORK, $ INFO ) diff --git a/SRC/sgeqr2.f b/SRC/sgeqr2.f index 5eef521f27..3a78733b7d 100644 --- a/SRC/sgeqr2.f +++ b/SRC/sgeqr2.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqr2 * *> \par Further Details: * ===================== diff --git a/SRC/sgeqr2p.f b/SRC/sgeqr2p.f index 0d270e9aa8..9f3693a631 100644 --- a/SRC/sgeqr2p.f +++ b/SRC/sgeqr2p.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqr2p * *> \par Further Details: * ===================== diff --git a/SRC/sgeqrf.f b/SRC/sgeqrf.f index b24615f7a1..2b9f989a8e 100644 --- a/SRC/sgeqrf.f +++ b/SRC/sgeqrf.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqrf * *> \par Further Details: * ===================== diff --git a/SRC/sgeqrfp.f b/SRC/sgeqrfp.f index 03d33654ba..4838a1481d 100644 --- a/SRC/sgeqrfp.f +++ b/SRC/sgeqrfp.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqrfp * *> \par Further Details: * ===================== diff --git a/SRC/sgeqrt.f b/SRC/sgeqrt.f index 926e4a6541..18a17a02b2 100644 --- a/SRC/sgeqrt.f +++ b/SRC/sgeqrt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqrt * *> \par Further Details: * ===================== diff --git a/SRC/sgeqrt2.f b/SRC/sgeqrt2.f index f6532f8126..374850531f 100644 --- a/SRC/sgeqrt2.f +++ b/SRC/sgeqrt2.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqrt2 * *> \par Further Details: * ===================== diff --git a/SRC/sgeqrt3.f b/SRC/sgeqrt3.f index 301bad2148..cf965353de 100644 --- a/SRC/sgeqrt3.f +++ b/SRC/sgeqrt3.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup geqrt3 * *> \par Further Details: * ===================== diff --git a/SRC/sgerfs.f b/SRC/sgerfs.f index c31ea1bd64..d3129eb58f 100644 --- a/SRC/sgerfs.f +++ b/SRC/sgerfs.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gerfs * * ===================================================================== SUBROUTINE SGERFS( TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/sgerfsx.f b/SRC/sgerfsx.f index b5d044872a..c7e0a4b100 100644 --- a/SRC/sgerfsx.f +++ b/SRC/sgerfsx.f @@ -404,7 +404,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gerfsx * * ===================================================================== SUBROUTINE SGERFSX( TRANS, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/sgerq2.f b/SRC/sgerq2.f index d86905c033..1c612f8f27 100644 --- a/SRC/sgerq2.f +++ b/SRC/sgerq2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gerq2 * *> \par Further Details: * ===================== diff --git a/SRC/sgerqf.f b/SRC/sgerqf.f index 037cd5345b..0f9205b2b6 100644 --- a/SRC/sgerqf.f +++ b/SRC/sgerqf.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gerqf * *> \par Further Details: * ===================== diff --git a/SRC/sgesc2.f b/SRC/sgesc2.f index 549327bc84..dc0c4ff6e1 100644 --- a/SRC/sgesc2.f +++ b/SRC/sgesc2.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEauxiliary +*> \ingroup gesc2 * *> \par Contributors: * ================== diff --git a/SRC/sgesdd.f b/SRC/sgesdd.f index 71af7b3720..3156b59254 100644 --- a/SRC/sgesdd.f +++ b/SRC/sgesdd.f @@ -199,7 +199,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsing +*> \ingroup gesdd * *> \par Contributors: * ================== diff --git a/SRC/sgesv.f b/SRC/sgesv.f index 4f4fe5215f..cf17675eb1 100644 --- a/SRC/sgesv.f +++ b/SRC/sgesv.f @@ -1,3 +1,5 @@ +*> \addtogroup gesv +*> *> \brief SGESV computes the solution to system of linear equations A * X = B for GE matrices (simple driver) * * =========== DOCUMENTATION =========== @@ -115,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup gesv * * ===================================================================== SUBROUTINE SGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/sgesvd.f b/SRC/sgesvd.f index 83321ffaa1..d72ad48f09 100644 --- a/SRC/sgesvd.f +++ b/SRC/sgesvd.f @@ -203,7 +203,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsing +*> \ingroup gesvd * * ===================================================================== SUBROUTINE SGESVD( JOBU, JOBVT, M, N, A, LDA, S, U, LDU, VT, LDVT, diff --git a/SRC/sgesvdq.f b/SRC/sgesvdq.f index 6fb328b8cf..a28cffad24 100644 --- a/SRC/sgesvdq.f +++ b/SRC/sgesvdq.f @@ -406,7 +406,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsing +*> \ingroup gesvdq * * ===================================================================== SUBROUTINE SGESVDQ( JOBA, JOBP, JOBR, JOBU, JOBV, M, N, A, LDA, diff --git a/SRC/sgesvdx.f b/SRC/sgesvdx.f index b6495dbd4b..475c479d42 100644 --- a/SRC/sgesvdx.f +++ b/SRC/sgesvdx.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsing +*> \ingroup gesvdx * * ===================================================================== SUBROUTINE SGESVDX( JOBU, JOBVT, RANGE, M, N, A, LDA, VL, VU, diff --git a/SRC/sgesvj.f b/SRC/sgesvj.f index 3f53a5a152..391cb0711d 100644 --- a/SRC/sgesvj.f +++ b/SRC/sgesvj.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup gesvj * *> \par Further Details: * ===================== diff --git a/SRC/sgesvx.f b/SRC/sgesvx.f index 385e626cfd..ff9d294f98 100644 --- a/SRC/sgesvx.f +++ b/SRC/sgesvx.f @@ -340,7 +340,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup gesvx * * ===================================================================== SUBROUTINE SGESVX( FACT, TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/sgesvxx.f b/SRC/sgesvxx.f index 35eff717aa..ab79ca0ded 100644 --- a/SRC/sgesvxx.f +++ b/SRC/sgesvxx.f @@ -532,7 +532,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup gesvxx * * ===================================================================== SUBROUTINE SGESVXX( FACT, TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/sgetc2.f b/SRC/sgetc2.f index 18c8f8b7ac..498bc79d03 100644 --- a/SRC/sgetc2.f +++ b/SRC/sgetc2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEauxiliary +*> \ingroup getc2 * *> \par Contributors: * ================== diff --git a/SRC/sgetf2.f b/SRC/sgetf2.f index d38c124c7a..f5bc6f9eb4 100644 --- a/SRC/sgetf2.f +++ b/SRC/sgetf2.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup getf2 * * ===================================================================== SUBROUTINE SGETF2( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/sgetrf.f b/SRC/sgetrf.f index 7a4a2aa5a7..379d7099bf 100644 --- a/SRC/sgetrf.f +++ b/SRC/sgetrf.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup getrf * * ===================================================================== SUBROUTINE SGETRF( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/sgetrf2.f b/SRC/sgetrf2.f index 68ebfac46c..22d82e4fc7 100644 --- a/SRC/sgetrf2.f +++ b/SRC/sgetrf2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup getrf2 * * ===================================================================== RECURSIVE SUBROUTINE SGETRF2( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/sgetri.f b/SRC/sgetri.f index 749ede9a77..123bb95f20 100644 --- a/SRC/sgetri.f +++ b/SRC/sgetri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup getri * * ===================================================================== SUBROUTINE SGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/sgetrs.f b/SRC/sgetrs.f index e5f3e3a90f..fe47acbec7 100644 --- a/SRC/sgetrs.f +++ b/SRC/sgetrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup getrs * * ===================================================================== SUBROUTINE SGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/sgetsls.f b/SRC/sgetsls.f index 0a4a835b4f..35e82e760c 100644 --- a/SRC/sgetsls.f +++ b/SRC/sgetsls.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsolve +*> \ingroup getsls * * ===================================================================== SUBROUTINE SGETSLS( TRANS, M, N, NRHS, A, LDA, B, LDB, diff --git a/SRC/sgetsqrhrt.f b/SRC/sgetsqrhrt.f index f9580da7b4..dcd8f11159 100644 --- a/SRC/sgetsqrhrt.f +++ b/SRC/sgetsqrhrt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleOTHERcomputational +*> \ingroup getsqrhrt * *> \par Contributors: * ================== diff --git a/SRC/sggbak.f b/SRC/sggbak.f index 8a796fdb1b..c1fbb6d7e4 100644 --- a/SRC/sggbak.f +++ b/SRC/sggbak.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup ggbak * *> \par Further Details: * ===================== diff --git a/SRC/sggbal.f b/SRC/sggbal.f index d7a8ef16cf..13d10a50e1 100644 --- a/SRC/sggbal.f +++ b/SRC/sggbal.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup ggbal * *> \par Further Details: * ===================== diff --git a/SRC/sgges.f b/SRC/sgges.f index 5aeaf2a14a..fde3892f7b 100644 --- a/SRC/sgges.f +++ b/SRC/sgges.f @@ -275,7 +275,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEeigen +*> \ingroup gges * * ===================================================================== SUBROUTINE SGGES( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B, LDB, diff --git a/SRC/sgges3.f b/SRC/sgges3.f index 9beafbbe7e..c8f7d8f635 100644 --- a/SRC/sgges3.f +++ b/SRC/sgges3.f @@ -273,7 +273,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEeigen +*> \ingroup gges3 * * ===================================================================== SUBROUTINE SGGES3( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B, diff --git a/SRC/sggesx.f b/SRC/sggesx.f index cdd22fd196..4de32fbd9c 100644 --- a/SRC/sggesx.f +++ b/SRC/sggesx.f @@ -337,7 +337,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEeigen +*> \ingroup ggesx * *> \par Further Details: * ===================== diff --git a/SRC/sggev.f b/SRC/sggev.f index acbd0baeeb..e11dfb8e7a 100644 --- a/SRC/sggev.f +++ b/SRC/sggev.f @@ -218,7 +218,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEeigen +*> \ingroup ggev * * ===================================================================== SUBROUTINE SGGEV( JOBVL, JOBVR, N, A, LDA, B, LDB, ALPHAR, ALPHAI, diff --git a/SRC/sggev3.f b/SRC/sggev3.f index d79bd45959..6e62cb824e 100644 --- a/SRC/sggev3.f +++ b/SRC/sggev3.f @@ -217,7 +217,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEeigen +*> \ingroup ggev3 * * ===================================================================== SUBROUTINE SGGEV3( JOBVL, JOBVR, N, A, LDA, B, LDB, ALPHAR, diff --git a/SRC/sggevx.f b/SRC/sggevx.f index f656d2eebf..76f8a34599 100644 --- a/SRC/sggevx.f +++ b/SRC/sggevx.f @@ -352,7 +352,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEeigen +*> \ingroup ggevx * *> \par Further Details: * ===================== diff --git a/SRC/sggglm.f b/SRC/sggglm.f index 56b4dba526..85173d64e4 100644 --- a/SRC/sggglm.f +++ b/SRC/sggglm.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup ggglm * * ===================================================================== SUBROUTINE SGGGLM( N, M, P, A, LDA, B, LDB, D, X, Y, WORK, LWORK, diff --git a/SRC/sgghd3.f b/SRC/sgghd3.f index 23acf6ec5c..2be3b29e8d 100644 --- a/SRC/sgghd3.f +++ b/SRC/sgghd3.f @@ -211,7 +211,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup gghd3 * *> \par Further Details: * ===================== diff --git a/SRC/sgghrd.f b/SRC/sgghrd.f index 210b4dae33..c4712a031b 100644 --- a/SRC/sgghrd.f +++ b/SRC/sgghrd.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup gghrd * *> \par Further Details: * ===================== diff --git a/SRC/sgglse.f b/SRC/sgglse.f index 59addc3f47..782fe2509f 100644 --- a/SRC/sgglse.f +++ b/SRC/sgglse.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERsolve +*> \ingroup gglse * * ===================================================================== SUBROUTINE SGGLSE( M, N, P, A, LDA, B, LDB, C, D, X, WORK, LWORK, diff --git a/SRC/sggqrf.f b/SRC/sggqrf.f index 59b498da56..df4d0d4f74 100644 --- a/SRC/sggqrf.f +++ b/SRC/sggqrf.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ggqrf * *> \par Further Details: * ===================== diff --git a/SRC/sggrqf.f b/SRC/sggrqf.f index 8b7d4786aa..5cd8d44df1 100644 --- a/SRC/sggrqf.f +++ b/SRC/sggrqf.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ggrqf * *> \par Further Details: * ===================== diff --git a/SRC/sggsvd3.f b/SRC/sggsvd3.f index 9077f2ea81..af68f932a3 100644 --- a/SRC/sggsvd3.f +++ b/SRC/sggsvd3.f @@ -328,7 +328,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEsing +*> \ingroup ggsvd3 * *> \par Contributors: * ================== diff --git a/SRC/sggsvp3.f b/SRC/sggsvp3.f index 4f76b32bc0..77aac2eaf1 100644 --- a/SRC/sggsvp3.f +++ b/SRC/sggsvp3.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ggsvp3 * *> \par Further Details: * ===================== diff --git a/SRC/sgsvj0.f b/SRC/sgsvj0.f index 7e5fddeb0b..a987e1d366 100644 --- a/SRC/sgsvj0.f +++ b/SRC/sgsvj0.f @@ -193,7 +193,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup gsvj0 * *> \par Further Details: * ===================== diff --git a/SRC/sgsvj1.f b/SRC/sgsvj1.f index f1d1f72392..e8da21c953 100644 --- a/SRC/sgsvj1.f +++ b/SRC/sgsvj1.f @@ -223,7 +223,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup gsvj1 * *> \par Contributors: * ================== diff --git a/SRC/sgtcon.f b/SRC/sgtcon.f index 65accb1221..c45965fc3b 100644 --- a/SRC/sgtcon.f +++ b/SRC/sgtcon.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGTcomputational +*> \ingroup gtcon * * ===================================================================== SUBROUTINE SGTCON( NORM, N, DL, D, DU, DU2, IPIV, ANORM, RCOND, diff --git a/SRC/sgtrfs.f b/SRC/sgtrfs.f index 29c0be89d4..2668e3e76c 100644 --- a/SRC/sgtrfs.f +++ b/SRC/sgtrfs.f @@ -200,7 +200,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGTcomputational +*> \ingroup gtrfs * * ===================================================================== SUBROUTINE SGTRFS( TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, DU2, diff --git a/SRC/sgtsv.f b/SRC/sgtsv.f index ac903ab3dd..bbb65c870f 100644 --- a/SRC/sgtsv.f +++ b/SRC/sgtsv.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGTsolve +*> \ingroup gtsv * * ===================================================================== SUBROUTINE SGTSV( N, NRHS, DL, D, DU, B, LDB, INFO ) diff --git a/SRC/sgtsvx.f b/SRC/sgtsvx.f index a251302ca8..ded93bf4de 100644 --- a/SRC/sgtsvx.f +++ b/SRC/sgtsvx.f @@ -284,7 +284,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGTsolve +*> \ingroup gtsvx * * ===================================================================== SUBROUTINE SGTSVX( FACT, TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, diff --git a/SRC/sgttrf.f b/SRC/sgttrf.f index 5df0367fe0..ccdf145141 100644 --- a/SRC/sgttrf.f +++ b/SRC/sgttrf.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGTcomputational +*> \ingroup gttrf * * ===================================================================== SUBROUTINE SGTTRF( N, DL, D, DU, DU2, IPIV, INFO ) diff --git a/SRC/sgttrs.f b/SRC/sgttrs.f index f1e47a7941..dbfe5e7397 100644 --- a/SRC/sgttrs.f +++ b/SRC/sgttrs.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGTcomputational +*> \ingroup gttrs * * ===================================================================== SUBROUTINE SGTTRS( TRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB, diff --git a/SRC/sgtts2.f b/SRC/sgtts2.f index 4820487de3..56cda79c57 100644 --- a/SRC/sgtts2.f +++ b/SRC/sgtts2.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGTcomputational +*> \ingroup gtts2 * * ===================================================================== SUBROUTINE SGTTS2( ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB ) diff --git a/SRC/shgeqz.f b/SRC/shgeqz.f index 6543f8cb18..49b13ddb4a 100644 --- a/SRC/shgeqz.f +++ b/SRC/shgeqz.f @@ -282,7 +282,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup hgeqz * *> \par Further Details: * ===================== diff --git a/SRC/shsein.f b/SRC/shsein.f index f1983d541a..76c0bb5566 100644 --- a/SRC/shsein.f +++ b/SRC/shsein.f @@ -244,7 +244,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hsein * *> \par Further Details: * ===================== diff --git a/SRC/shseqr.f b/SRC/shseqr.f index 3b8d4c4d8b..ab95fd610d 100644 --- a/SRC/shseqr.f +++ b/SRC/shseqr.f @@ -233,7 +233,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hseqr * *> \par Contributors: * ================== diff --git a/SRC/sisnan.f b/SRC/sisnan.f index edde0651e9..510a9ff9d0 100644 --- a/SRC/sisnan.f +++ b/SRC/sisnan.f @@ -52,7 +52,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup isnan * * ===================================================================== LOGICAL FUNCTION SISNAN( SIN ) diff --git a/SRC/sla_gbamv.f b/SRC/sla_gbamv.f index c584466121..010debb568 100644 --- a/SRC/sla_gbamv.f +++ b/SRC/sla_gbamv.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup la_gbamv * * ===================================================================== SUBROUTINE SLA_GBAMV( TRANS, M, N, KL, KU, ALPHA, AB, LDAB, X, diff --git a/SRC/sla_gbrcond.f b/SRC/sla_gbrcond.f index 5e1e5ef601..659c9ba709 100644 --- a/SRC/sla_gbrcond.f +++ b/SRC/sla_gbrcond.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup la_gbrcond * * ===================================================================== REAL FUNCTION SLA_GBRCOND( TRANS, N, KL, KU, AB, LDAB, AFB, LDAFB, diff --git a/SRC/sla_gbrfsx_extended.f b/SRC/sla_gbrfsx_extended.f index c79330cb50..b0d8a301c8 100644 --- a/SRC/sla_gbrfsx_extended.f +++ b/SRC/sla_gbrfsx_extended.f @@ -397,7 +397,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup la_gbrfsx_extended * * ===================================================================== SUBROUTINE SLA_GBRFSX_EXTENDED( PREC_TYPE, TRANS_TYPE, N, KL, KU, diff --git a/SRC/sla_gbrpvgrw.f b/SRC/sla_gbrpvgrw.f index 5c8af01723..cbc43d2301 100644 --- a/SRC/sla_gbrpvgrw.f +++ b/SRC/sla_gbrpvgrw.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup la_gbrpvgrw * * ===================================================================== REAL FUNCTION SLA_GBRPVGRW( N, KL, KU, NCOLS, AB, LDAB, AFB, diff --git a/SRC/sla_geamv.f b/SRC/sla_geamv.f index 0fcb80241d..a61c6062e1 100644 --- a/SRC/sla_geamv.f +++ b/SRC/sla_geamv.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup la_geamv * * ===================================================================== SUBROUTINE SLA_GEAMV( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, diff --git a/SRC/sla_gercond.f b/SRC/sla_gercond.f index 44dba01c60..7870233713 100644 --- a/SRC/sla_gercond.f +++ b/SRC/sla_gercond.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup la_gercond * * ===================================================================== REAL FUNCTION SLA_GERCOND( TRANS, N, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/sla_gerfsx_extended.f b/SRC/sla_gerfsx_extended.f index 1a19a50714..16a277e351 100644 --- a/SRC/sla_gerfsx_extended.f +++ b/SRC/sla_gerfsx_extended.f @@ -385,7 +385,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup la_gerfsx_extended * * ===================================================================== SUBROUTINE SLA_GERFSX_EXTENDED( PREC_TYPE, TRANS_TYPE, N, NRHS, A, diff --git a/SRC/sla_gerpvgrw.f b/SRC/sla_gerpvgrw.f index 05a61dc701..f041c5dd2c 100644 --- a/SRC/sla_gerpvgrw.f +++ b/SRC/sla_gerpvgrw.f @@ -90,7 +90,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup la_gerpvgrw * * ===================================================================== REAL FUNCTION SLA_GERPVGRW( N, NCOLS, A, LDA, AF, LDAF ) diff --git a/SRC/sla_lin_berr.f b/SRC/sla_lin_berr.f index befc1fc143..bc876eac39 100644 --- a/SRC/sla_lin_berr.f +++ b/SRC/sla_lin_berr.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup la_lin_berr * * ===================================================================== SUBROUTINE SLA_LIN_BERR( N, NZ, NRHS, RES, AYB, BERR ) diff --git a/SRC/sla_porcond.f b/SRC/sla_porcond.f index 2506401166..53dc5a8bde 100644 --- a/SRC/sla_porcond.f +++ b/SRC/sla_porcond.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup la_porcond * * ===================================================================== REAL FUNCTION SLA_PORCOND( UPLO, N, A, LDA, AF, LDAF, CMODE, C, diff --git a/SRC/sla_porfsx_extended.f b/SRC/sla_porfsx_extended.f index 9f33b14dde..d67f9706db 100644 --- a/SRC/sla_porfsx_extended.f +++ b/SRC/sla_porfsx_extended.f @@ -374,7 +374,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup la_porfsx_extended * * ===================================================================== SUBROUTINE SLA_PORFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/sla_porpvgrw.f b/SRC/sla_porpvgrw.f index 8064bf7fa1..c829bc6b57 100644 --- a/SRC/sla_porpvgrw.f +++ b/SRC/sla_porpvgrw.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup la_porpvgrw * * ===================================================================== REAL FUNCTION SLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, LDAF, WORK ) diff --git a/SRC/sla_syamv.f b/SRC/sla_syamv.f index a44cc6e0d2..1a2ac1394f 100644 --- a/SRC/sla_syamv.f +++ b/SRC/sla_syamv.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup la_heamv * *> \par Further Details: * ===================== diff --git a/SRC/sla_syrcond.f b/SRC/sla_syrcond.f index 95dd9a81f9..e2147029a7 100644 --- a/SRC/sla_syrcond.f +++ b/SRC/sla_syrcond.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup la_hercond * * ===================================================================== REAL FUNCTION SLA_SYRCOND( UPLO, N, A, LDA, AF, LDAF, IPIV, CMODE, diff --git a/SRC/sla_syrfsx_extended.f b/SRC/sla_syrfsx_extended.f index 2fa3b1c50f..2f18ade88a 100644 --- a/SRC/sla_syrfsx_extended.f +++ b/SRC/sla_syrfsx_extended.f @@ -383,7 +383,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup la_herfsx_extended * * ===================================================================== SUBROUTINE SLA_SYRFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/sla_syrpvgrw.f b/SRC/sla_syrpvgrw.f index 88c61ec56c..f279ad2fbd 100644 --- a/SRC/sla_syrpvgrw.f +++ b/SRC/sla_syrpvgrw.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup la_herpvgrw * * ===================================================================== REAL FUNCTION SLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/sla_wwaddw.f b/SRC/sla_wwaddw.f index 925dae8649..480c7d5eef 100644 --- a/SRC/sla_wwaddw.f +++ b/SRC/sla_wwaddw.f @@ -74,7 +74,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup la_wwaddw * * ===================================================================== SUBROUTINE SLA_WWADDW( N, X, Y, W ) diff --git a/SRC/slabad.f b/SRC/slabad.f index 11604e784e..896fe6fef9 100644 --- a/SRC/slabad.f +++ b/SRC/slabad.f @@ -60,7 +60,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup labad * * ===================================================================== SUBROUTINE SLABAD( SMALL, LARGE ) diff --git a/SRC/slabrd.f b/SRC/slabrd.f index 808d45cc12..1a408bc0e3 100644 --- a/SRC/slabrd.f +++ b/SRC/slabrd.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup labrd * *> \par Further Details: * ===================== diff --git a/SRC/slacn2.f b/SRC/slacn2.f index 1d6217a7cb..07682f8216 100644 --- a/SRC/slacn2.f +++ b/SRC/slacn2.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lacn2 * *> \par Further Details: * ===================== diff --git a/SRC/slacon.f b/SRC/slacon.f index 8e3cc73553..025c9fc674 100644 --- a/SRC/slacon.f +++ b/SRC/slacon.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lacon * *> \par Contributors: * ================== diff --git a/SRC/slacpy.f b/SRC/slacpy.f index a33a3c67b7..2ae16e608b 100644 --- a/SRC/slacpy.f +++ b/SRC/slacpy.f @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lacpy * * ===================================================================== SUBROUTINE SLACPY( UPLO, M, N, A, LDA, B, LDB ) diff --git a/SRC/sladiv.f b/SRC/sladiv.f index ff60432fed..fbea4626e3 100644 --- a/SRC/sladiv.f +++ b/SRC/sladiv.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup ladiv * * ===================================================================== SUBROUTINE SLADIV( A, B, C, D, P, Q ) @@ -170,7 +170,7 @@ SUBROUTINE SLADIV( A, B, C, D, P, Q ) * END -*> \ingroup realOTHERauxiliary +*> \ingroup ladiv SUBROUTINE SLADIV1( A, B, C, D, P, Q ) @@ -210,7 +210,7 @@ SUBROUTINE SLADIV1( A, B, C, D, P, Q ) * END -*> \ingroup realOTHERauxiliary +*> \ingroup ladiv REAL FUNCTION SLADIV2( A, B, C, D, R, T ) * diff --git a/SRC/slae2.f b/SRC/slae2.f index c6a4f12b29..2bbc1da887 100644 --- a/SRC/slae2.f +++ b/SRC/slae2.f @@ -78,7 +78,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lae2 * *> \par Further Details: * ===================== diff --git a/SRC/slaebz.f b/SRC/slaebz.f index 4eb8e8b7dc..c764b09a2d 100644 --- a/SRC/slaebz.f +++ b/SRC/slaebz.f @@ -273,7 +273,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laebz * *> \par Further Details: * ===================== diff --git a/SRC/slaed0.f b/SRC/slaed0.f index 42cdd2ceb5..915b7ecc0f 100644 --- a/SRC/slaed0.f +++ b/SRC/slaed0.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed0 * *> \par Contributors: * ================== diff --git a/SRC/slaed1.f b/SRC/slaed1.f index 1f13c1fd1e..4cf149264d 100644 --- a/SRC/slaed1.f +++ b/SRC/slaed1.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed1 * *> \par Contributors: * ================== diff --git a/SRC/slaed2.f b/SRC/slaed2.f index cadf535555..3c7f9f6854 100644 --- a/SRC/slaed2.f +++ b/SRC/slaed2.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed2 * *> \par Contributors: * ================== diff --git a/SRC/slaed3.f b/SRC/slaed3.f index 44c601f91b..a66b2f4f56 100644 --- a/SRC/slaed3.f +++ b/SRC/slaed3.f @@ -162,7 +162,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed3 * *> \par Contributors: * ================== diff --git a/SRC/slaed4.f b/SRC/slaed4.f index 339c5029cc..f2a09beb8d 100644 --- a/SRC/slaed4.f +++ b/SRC/slaed4.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed4 * *> \par Contributors: * ================== diff --git a/SRC/slaed5.f b/SRC/slaed5.f index ddf9fb72e7..cb435ae714 100644 --- a/SRC/slaed5.f +++ b/SRC/slaed5.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed5 * *> \par Contributors: * ================== diff --git a/SRC/slaed6.f b/SRC/slaed6.f index ec715518eb..9072e5b155 100644 --- a/SRC/slaed6.f +++ b/SRC/slaed6.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed6 * *> \par Further Details: * ===================== diff --git a/SRC/slaed7.f b/SRC/slaed7.f index 3572342c0e..b83604a322 100644 --- a/SRC/slaed7.f +++ b/SRC/slaed7.f @@ -244,7 +244,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed7 * *> \par Contributors: * ================== diff --git a/SRC/slaed8.f b/SRC/slaed8.f index 9dd8a15f60..8b83757402 100644 --- a/SRC/slaed8.f +++ b/SRC/slaed8.f @@ -228,7 +228,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed8 * *> \par Contributors: * ================== diff --git a/SRC/slaed9.f b/SRC/slaed9.f index d1b7b29fd3..03cf5400a9 100644 --- a/SRC/slaed9.f +++ b/SRC/slaed9.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laed9 * *> \par Contributors: * ================== diff --git a/SRC/slaeda.f b/SRC/slaeda.f index f7ed96a12b..699db278b1 100644 --- a/SRC/slaeda.f +++ b/SRC/slaeda.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup laeda * *> \par Contributors: * ================== diff --git a/SRC/slaein.f b/SRC/slaein.f index caee5aa1b3..6a257fd74b 100644 --- a/SRC/slaein.f +++ b/SRC/slaein.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laein * * ===================================================================== SUBROUTINE SLAEIN( RIGHTV, NOINIT, N, H, LDH, WR, WI, VR, VI, B, diff --git a/SRC/slaev2.f b/SRC/slaev2.f index 442779a44e..99fa18e4ad 100644 --- a/SRC/slaev2.f +++ b/SRC/slaev2.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laev2 * *> \par Further Details: * ===================== diff --git a/SRC/slaexc.f b/SRC/slaexc.f index 49b0329601..ff7e587cb8 100644 --- a/SRC/slaexc.f +++ b/SRC/slaexc.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laexc * * ===================================================================== SUBROUTINE SLAEXC( WANTQ, N, T, LDT, Q, LDQ, J1, N1, N2, WORK, diff --git a/SRC/slag2.f b/SRC/slag2.f index eddf669133..443ed10906 100644 --- a/SRC/slag2.f +++ b/SRC/slag2.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lag2 * * ===================================================================== SUBROUTINE SLAG2( A, LDA, B, LDB, SAFMIN, SCALE1, SCALE2, WR1, diff --git a/SRC/slag2d.f b/SRC/slag2d.f index dbd8ee1abf..0edfa1ae26 100644 --- a/SRC/slag2d.f +++ b/SRC/slag2d.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup _lag2_ * * ===================================================================== SUBROUTINE SLAG2D( M, N, SA, LDSA, A, LDA, INFO ) diff --git a/SRC/slags2.f b/SRC/slags2.f index 67e33f6370..a603fc58c2 100644 --- a/SRC/slags2.f +++ b/SRC/slags2.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lags2 * * ===================================================================== SUBROUTINE SLAGS2( UPPER, A1, A2, A3, B1, B2, B3, CSU, SNU, CSV, diff --git a/SRC/slagtf.f b/SRC/slagtf.f index ecc02eeb34..28c6081bcc 100644 --- a/SRC/slagtf.f +++ b/SRC/slagtf.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lagtf * * ===================================================================== SUBROUTINE SLAGTF( N, A, LAMBDA, B, C, TOL, D, IN, INFO ) diff --git a/SRC/slagtm.f b/SRC/slagtm.f index 2beae90787..0337c7da87 100644 --- a/SRC/slagtm.f +++ b/SRC/slagtm.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lagtm * * ===================================================================== SUBROUTINE SLAGTM( TRANS, N, NRHS, ALPHA, DL, D, DU, X, LDX, BETA, diff --git a/SRC/slagts.f b/SRC/slagts.f index 255f5aa488..236d7af69d 100644 --- a/SRC/slagts.f +++ b/SRC/slagts.f @@ -1,4 +1,6 @@ -*> \brief \b SLAGTS solves the system of equations (T-λI)x = y or (T-λI)Tx = y,where T is a general tridiagonal matrix and λ a scalar, using the LU factorization computed by slagtf. +*> \brief \b SLAGTS solves the system of equations (T-λI)x = y +*> or (T-λI)^Tx = y, where T is a general tridiagonal matrix +*> and λ a scalar, using the LU factorization computed by slagtf. * * =========== DOCUMENTATION =========== * @@ -154,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lagts * * ===================================================================== SUBROUTINE SLAGTS( JOB, N, A, B, C, D, IN, Y, TOL, INFO ) diff --git a/SRC/slagv2.f b/SRC/slagv2.f index 410cbf4c02..786b67bc5e 100644 --- a/SRC/slagv2.f +++ b/SRC/slagv2.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lagv2 * *> \par Contributors: * ================== diff --git a/SRC/slahqr.f b/SRC/slahqr.f index f137f8e0ec..8dc3f9601b 100644 --- a/SRC/slahqr.f +++ b/SRC/slahqr.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lahqr * *> \par Further Details: * ===================== diff --git a/SRC/slahr2.f b/SRC/slahr2.f index 458da48e4e..aed178882f 100644 --- a/SRC/slahr2.f +++ b/SRC/slahr2.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lahr2 * *> \par Further Details: * ===================== diff --git a/SRC/slaic1.f b/SRC/slaic1.f index 65107002cc..cf1c421912 100644 --- a/SRC/slaic1.f +++ b/SRC/slaic1.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laic1 * * ===================================================================== SUBROUTINE SLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C ) diff --git a/SRC/slaisnan.f b/SRC/slaisnan.f index 76c2a59964..01a7f17aef 100644 --- a/SRC/slaisnan.f +++ b/SRC/slaisnan.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laisnan * * ===================================================================== LOGICAL FUNCTION SLAISNAN( SIN1, SIN2 ) diff --git a/SRC/slaln2.f b/SRC/slaln2.f index 826eb1fc1e..b849895f73 100644 --- a/SRC/slaln2.f +++ b/SRC/slaln2.f @@ -210,7 +210,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laln2 * * ===================================================================== SUBROUTINE SLALN2( LTRANS, NA, NW, SMIN, CA, A, LDA, D1, D2, B, diff --git a/SRC/slals0.f b/SRC/slals0.f index f168dc6532..5d6a943e03 100644 --- a/SRC/slals0.f +++ b/SRC/slals0.f @@ -252,7 +252,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup lals0 * *> \par Contributors: * ================== diff --git a/SRC/slalsa.f b/SRC/slalsa.f index 95becc76e9..34e5782cac 100644 --- a/SRC/slalsa.f +++ b/SRC/slalsa.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup lalsa * *> \par Contributors: * ================== diff --git a/SRC/slalsd.f b/SRC/slalsd.f index 9943a52d9e..39adc57fde 100644 --- a/SRC/slalsd.f +++ b/SRC/slalsd.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup lalsd * *> \par Contributors: * ================== diff --git a/SRC/slamrg.f b/SRC/slamrg.f index a29802e220..9672fee916 100644 --- a/SRC/slamrg.f +++ b/SRC/slamrg.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lamrg * * ===================================================================== SUBROUTINE SLAMRG( N1, N2, A, STRD1, STRD2, INDEX ) diff --git a/SRC/slamswlq.f b/SRC/slamswlq.f index d4996b1f20..88b2f4642c 100644 --- a/SRC/slamswlq.f +++ b/SRC/slamswlq.f @@ -189,6 +189,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup lamswlq +*> * ===================================================================== SUBROUTINE SLAMSWLQ( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/slamtsqr.f b/SRC/slamtsqr.f index 960b794de8..41684cfec2 100644 --- a/SRC/slamtsqr.f +++ b/SRC/slamtsqr.f @@ -191,6 +191,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup lamtsqr +*> * ===================================================================== SUBROUTINE SLAMTSQR( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/slaneg.f b/SRC/slaneg.f index 26e7a78ac0..76017d72d5 100644 --- a/SRC/slaneg.f +++ b/SRC/slaneg.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laneg * *> \par Contributors: * ================== diff --git a/SRC/slangb.f b/SRC/slangb.f index a240092854..1af2037be7 100644 --- a/SRC/slangb.f +++ b/SRC/slangb.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBauxiliary +*> \ingroup langb * * ===================================================================== REAL FUNCTION SLANGB( NORM, N, KL, KU, AB, LDAB, diff --git a/SRC/slange.f b/SRC/slange.f index 79eef87261..32e8bbab49 100644 --- a/SRC/slange.f +++ b/SRC/slange.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEauxiliary +*> \ingroup lange * * ===================================================================== REAL FUNCTION SLANGE( NORM, M, N, A, LDA, WORK ) diff --git a/SRC/slangt.f b/SRC/slangt.f index 65957f8ec7..5288508a3b 100644 --- a/SRC/slangt.f +++ b/SRC/slangt.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup langt * * ===================================================================== REAL FUNCTION SLANGT( NORM, N, DL, D, DU ) diff --git a/SRC/slanhs.f b/SRC/slanhs.f index e913806918..68a5d70787 100644 --- a/SRC/slanhs.f +++ b/SRC/slanhs.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lanhs * * ===================================================================== REAL FUNCTION SLANHS( NORM, N, A, LDA, WORK ) diff --git a/SRC/slansb.f b/SRC/slansb.f index eb89d94cb6..beeb06904f 100644 --- a/SRC/slansb.f +++ b/SRC/slansb.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lanhb * * ===================================================================== REAL FUNCTION SLANSB( NORM, UPLO, N, K, AB, LDAB, diff --git a/SRC/slansf.f b/SRC/slansf.f index 5d480958f5..82b5ae93e7 100644 --- a/SRC/slansf.f +++ b/SRC/slansf.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup lanhf * *> \par Further Details: * ===================== diff --git a/SRC/slansp.f b/SRC/slansp.f index 2189510a6e..f78d7872a8 100644 --- a/SRC/slansp.f +++ b/SRC/slansp.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lanhp * * ===================================================================== REAL FUNCTION SLANSP( NORM, UPLO, N, AP, WORK ) diff --git a/SRC/slanst.f b/SRC/slanst.f index dfe12a5f70..fca0b395c9 100644 --- a/SRC/slanst.f +++ b/SRC/slanst.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lanht * * ===================================================================== REAL FUNCTION SLANST( NORM, N, D, E ) diff --git a/SRC/slansy.f b/SRC/slansy.f index 4a23a42f2c..fb1ef1216d 100644 --- a/SRC/slansy.f +++ b/SRC/slansy.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYauxiliary +*> \ingroup lanhe * * ===================================================================== REAL FUNCTION SLANSY( NORM, UPLO, N, A, LDA, WORK ) diff --git a/SRC/slantb.f b/SRC/slantb.f index c29db2416b..765ac5b6e6 100644 --- a/SRC/slantb.f +++ b/SRC/slantb.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lantb * * ===================================================================== REAL FUNCTION SLANTB( NORM, UPLO, DIAG, N, K, AB, diff --git a/SRC/slantp.f b/SRC/slantp.f index 00fe42a53f..a91259fc8a 100644 --- a/SRC/slantp.f +++ b/SRC/slantp.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lantp * * ===================================================================== REAL FUNCTION SLANTP( NORM, UPLO, DIAG, N, AP, WORK ) diff --git a/SRC/slantr.f b/SRC/slantr.f index 384f58550b..cb9719099c 100644 --- a/SRC/slantr.f +++ b/SRC/slantr.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lantr * * ===================================================================== REAL FUNCTION SLANTR( NORM, UPLO, DIAG, M, N, A, LDA, diff --git a/SRC/slanv2.f b/SRC/slanv2.f index 6753012e75..ac1a197822 100644 --- a/SRC/slanv2.f +++ b/SRC/slanv2.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lanv2 * *> \par Further Details: * ===================== diff --git a/SRC/slaorhr_col_getrfnp.f b/SRC/slaorhr_col_getrfnp.f index ff890beece..fc373e8c66 100644 --- a/SRC/slaorhr_col_getrfnp.f +++ b/SRC/slaorhr_col_getrfnp.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup launhr_col_getrfnp * *> \par Contributors: * ================== diff --git a/SRC/slaorhr_col_getrfnp2.f b/SRC/slaorhr_col_getrfnp2.f index 621e9a3148..53f4300d7f 100644 --- a/SRC/slaorhr_col_getrfnp2.f +++ b/SRC/slaorhr_col_getrfnp2.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup launhr_col_getrfnp2 * *> \par Contributors: * ================== diff --git a/SRC/slapll.f b/SRC/slapll.f index a71c9f3910..e260e3d766 100644 --- a/SRC/slapll.f +++ b/SRC/slapll.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lapll * * ===================================================================== SUBROUTINE SLAPLL( N, X, INCX, Y, INCY, SSMIN ) diff --git a/SRC/slapmr.f b/SRC/slapmr.f index c91a23ba00..566dc04923 100644 --- a/SRC/slapmr.f +++ b/SRC/slapmr.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lapmr * * ===================================================================== SUBROUTINE SLAPMR( FORWRD, M, N, X, LDX, K ) diff --git a/SRC/slapmt.f b/SRC/slapmt.f index 8c71dfcfb1..ebd5b0b93d 100644 --- a/SRC/slapmt.f +++ b/SRC/slapmt.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lapmt * * ===================================================================== SUBROUTINE SLAPMT( FORWRD, M, N, X, LDX, K ) diff --git a/SRC/slapy2.f b/SRC/slapy2.f index e1364f6980..51d5155f69 100644 --- a/SRC/slapy2.f +++ b/SRC/slapy2.f @@ -56,7 +56,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lapy2 * * ===================================================================== REAL FUNCTION SLAPY2( X, Y ) diff --git a/SRC/slapy3.f b/SRC/slapy3.f index 5a3999f9d9..b1ea75ceef 100644 --- a/SRC/slapy3.f +++ b/SRC/slapy3.f @@ -61,7 +61,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lapy3 * * ===================================================================== REAL FUNCTION SLAPY3( X, Y, Z ) diff --git a/SRC/slaqgb.f b/SRC/slaqgb.f index 5527c73679..6cc3a0c6c0 100644 --- a/SRC/slaqgb.f +++ b/SRC/slaqgb.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBauxiliary +*> \ingroup laqgb * * ===================================================================== SUBROUTINE SLAQGB( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/slaqge.f b/SRC/slaqge.f index 134035707a..50182fbf36 100644 --- a/SRC/slaqge.f +++ b/SRC/slaqge.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEauxiliary +*> \ingroup laqge * * ===================================================================== SUBROUTINE SLAQGE( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/slaqp2.f b/SRC/slaqp2.f index 595fb8c340..d4d1a80c01 100644 --- a/SRC/slaqp2.f +++ b/SRC/slaqp2.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqp2 * *> \par Contributors: * ================== diff --git a/SRC/slaqps.f b/SRC/slaqps.f index 0de94ced33..8605b3400d 100644 --- a/SRC/slaqps.f +++ b/SRC/slaqps.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqps * *> \par Contributors: * ================== diff --git a/SRC/slaqr0.f b/SRC/slaqr0.f index ea533b3bd3..7ffaf9056f 100644 --- a/SRC/slaqr0.f +++ b/SRC/slaqr0.f @@ -230,7 +230,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqr0 * *> \par Contributors: * ================== diff --git a/SRC/slaqr1.f b/SRC/slaqr1.f index 59f317b2b2..c2950609c4 100644 --- a/SRC/slaqr1.f +++ b/SRC/slaqr1.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqr1 * *> \par Contributors: * ================== diff --git a/SRC/slaqr2.f b/SRC/slaqr2.f index 6e0da98020..57ead52143 100644 --- a/SRC/slaqr2.f +++ b/SRC/slaqr2.f @@ -263,7 +263,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqr2 * *> \par Contributors: * ================== diff --git a/SRC/slaqr3.f b/SRC/slaqr3.f index 1f80a1685e..8c17e7ec7d 100644 --- a/SRC/slaqr3.f +++ b/SRC/slaqr3.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqr3 * *> \par Contributors: * ================== diff --git a/SRC/slaqr4.f b/SRC/slaqr4.f index 1f0a51c85f..f9e010fee4 100644 --- a/SRC/slaqr4.f +++ b/SRC/slaqr4.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqr4 * *> \par Contributors: * ================== diff --git a/SRC/slaqr5.f b/SRC/slaqr5.f index 75a8473f6c..c27cc46aae 100644 --- a/SRC/slaqr5.f +++ b/SRC/slaqr5.f @@ -233,7 +233,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqr5 * *> \par Contributors: * ================== diff --git a/SRC/slaqsb.f b/SRC/slaqsb.f index 32c93911d6..df714c8416 100644 --- a/SRC/slaqsb.f +++ b/SRC/slaqsb.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqhb * * ===================================================================== SUBROUTINE SLAQSB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) diff --git a/SRC/slaqsp.f b/SRC/slaqsp.f index 604d4b248d..dd599545bf 100644 --- a/SRC/slaqsp.f +++ b/SRC/slaqsp.f @@ -118,7 +118,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqhp * * ===================================================================== SUBROUTINE SLAQSP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) diff --git a/SRC/slaqsy.f b/SRC/slaqsy.f index c592a4c33d..9478144b90 100644 --- a/SRC/slaqsy.f +++ b/SRC/slaqsy.f @@ -126,7 +126,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYauxiliary +*> \ingroup laqhe * * ===================================================================== SUBROUTINE SLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) diff --git a/SRC/slaqtr.f b/SRC/slaqtr.f index 5720cf2bb1..436724b81a 100644 --- a/SRC/slaqtr.f +++ b/SRC/slaqtr.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laqtr * * ===================================================================== SUBROUTINE SLAQTR( LTRAN, LREAL, N, T, LDT, B, W, SCALE, X, WORK, diff --git a/SRC/slaqz0.f b/SRC/slaqz0.f index 8b2d3286e4..4c92393518 100644 --- a/SRC/slaqz0.f +++ b/SRC/slaqz0.f @@ -294,7 +294,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz0 *> * ===================================================================== RECURSIVE SUBROUTINE SLAQZ0( WANTS, WANTQ, WANTZ, N, ILO, IHI, A, diff --git a/SRC/slaqz1.f b/SRC/slaqz1.f index 9141d360b6..38991e9866 100644 --- a/SRC/slaqz1.f +++ b/SRC/slaqz1.f @@ -119,7 +119,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz1 *> * ===================================================================== SUBROUTINE SLAQZ1( A, LDA, B, LDB, SR1, SR2, SI, BETA1, BETA2, diff --git a/SRC/slaqz2.f b/SRC/slaqz2.f index 48b74432f5..d1205390b1 100644 --- a/SRC/slaqz2.f +++ b/SRC/slaqz2.f @@ -165,7 +165,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz2 *> * ===================================================================== SUBROUTINE SLAQZ2( ILQ, ILZ, K, ISTARTM, ISTOPM, IHI, A, LDA, B, diff --git a/SRC/slaqz3.f b/SRC/slaqz3.f index 7a2672cce5..df27382d4c 100644 --- a/SRC/slaqz3.f +++ b/SRC/slaqz3.f @@ -228,7 +228,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz3 *> * ===================================================================== RECURSIVE SUBROUTINE SLAQZ3( ILSCHUR, ILQ, ILZ, N, ILO, IHI, NW, diff --git a/SRC/slaqz4.f b/SRC/slaqz4.f index 3c307dd474..8a3f37c62a 100644 --- a/SRC/slaqz4.f +++ b/SRC/slaqz4.f @@ -204,7 +204,7 @@ * *> \date May 2020 * -*> \ingroup doubleGEcomputational +*> \ingroup laqz4 *> * ===================================================================== SUBROUTINE SLAQZ4( ILSCHUR, ILQ, ILZ, N, ILO, IHI, NSHIFTS, diff --git a/SRC/slar1v.f b/SRC/slar1v.f index 36c2d8e9d5..970fe5190a 100644 --- a/SRC/slar1v.f +++ b/SRC/slar1v.f @@ -212,7 +212,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lar1v * *> \par Contributors: * ================== diff --git a/SRC/slar2v.f b/SRC/slar2v.f index ae5eb2e252..5067ae644d 100644 --- a/SRC/slar2v.f +++ b/SRC/slar2v.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lar2v * * ===================================================================== SUBROUTINE SLAR2V( N, X, Y, Z, INCX, C, S, INCC ) diff --git a/SRC/slarf.f b/SRC/slarf.f index 497dad7602..519666e47d 100644 --- a/SRC/slarf.f +++ b/SRC/slarf.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup larf * * ===================================================================== SUBROUTINE SLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK ) diff --git a/SRC/slarfb.f b/SRC/slarfb.f index a065e4e259..879bb1c705 100644 --- a/SRC/slarfb.f +++ b/SRC/slarfb.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup larfb * *> \par Further Details: * ===================== diff --git a/SRC/slarfb_gett.f b/SRC/slarfb_gett.f index f1fdef7900..72252a5a2c 100644 --- a/SRC/slarfb_gett.f +++ b/SRC/slarfb_gett.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleOTHERauxiliary +*> \ingroup larfb_gett * *> \par Contributors: * ================== diff --git a/SRC/slarfg.f b/SRC/slarfg.f index 35d72389d7..6cd9103386 100644 --- a/SRC/slarfg.f +++ b/SRC/slarfg.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup larfg * * ===================================================================== SUBROUTINE SLARFG( N, ALPHA, X, INCX, TAU ) diff --git a/SRC/slarfgp.f b/SRC/slarfgp.f index df42980c4e..4069f122a9 100644 --- a/SRC/slarfgp.f +++ b/SRC/slarfgp.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup larfgp * * ===================================================================== SUBROUTINE SLARFGP( N, ALPHA, X, INCX, TAU ) diff --git a/SRC/slarft.f b/SRC/slarft.f index 9cfe0ad3f9..24e2b8c33c 100644 --- a/SRC/slarft.f +++ b/SRC/slarft.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup larft * *> \par Further Details: * ===================== diff --git a/SRC/slarfx.f b/SRC/slarfx.f index 4f820331db..43e4a66667 100644 --- a/SRC/slarfx.f +++ b/SRC/slarfx.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup larfx * * ===================================================================== SUBROUTINE SLARFX( SIDE, M, N, V, TAU, C, LDC, WORK ) diff --git a/SRC/slarfy.f b/SRC/slarfy.f index 39ba4d977f..060f81a032 100644 --- a/SRC/slarfy.f +++ b/SRC/slarfy.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup larfy * * ===================================================================== SUBROUTINE SLARFY( UPLO, N, V, INCV, TAU, C, LDC, WORK ) diff --git a/SRC/slargv.f b/SRC/slargv.f index e2572126eb..019317d3de 100644 --- a/SRC/slargv.f +++ b/SRC/slargv.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup largv * * ===================================================================== SUBROUTINE SLARGV( N, X, INCX, Y, INCY, C, INCC ) diff --git a/SRC/slarmm.f b/SRC/slarmm.f index 643dd67487..1f454d7fb0 100644 --- a/SRC/slarmm.f +++ b/SRC/slarmm.f @@ -54,7 +54,7 @@ *> Conference on Parallel Processing and Applied Mathematics, pages *> 68--78. Springer, 2017. *> -*> \ingroup OTHERauxiliary +*> \ingroup larmm * ===================================================================== REAL FUNCTION SLARMM( ANORM, BNORM, CNORM ) diff --git a/SRC/slarnv.f b/SRC/slarnv.f index 8b927fbdba..dac8ea8285 100644 --- a/SRC/slarnv.f +++ b/SRC/slarnv.f @@ -79,7 +79,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larnv * *> \par Further Details: * ===================== diff --git a/SRC/slarra.f b/SRC/slarra.f index 2e27383e13..d7f00ca0fa 100644 --- a/SRC/slarra.f +++ b/SRC/slarra.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larra * *> \par Contributors: * ================== diff --git a/SRC/slarrb.f b/SRC/slarrb.f index cf670dad9a..8781664281 100644 --- a/SRC/slarrb.f +++ b/SRC/slarrb.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrb * *> \par Contributors: * ================== diff --git a/SRC/slarrc.f b/SRC/slarrc.f index 2100d1b3dc..c1d625030a 100644 --- a/SRC/slarrc.f +++ b/SRC/slarrc.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrc * *> \par Contributors: * ================== diff --git a/SRC/slarrd.f b/SRC/slarrd.f index 21405baa6a..4fe72f934e 100644 --- a/SRC/slarrd.f +++ b/SRC/slarrd.f @@ -319,7 +319,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrd * * ===================================================================== SUBROUTINE SLARRD( RANGE, ORDER, N, VL, VU, IL, IU, GERS, diff --git a/SRC/slarre.f b/SRC/slarre.f index e1b52c3858..83eea9f77f 100644 --- a/SRC/slarre.f +++ b/SRC/slarre.f @@ -276,7 +276,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larre * *> \par Further Details: * ===================== diff --git a/SRC/slarrf.f b/SRC/slarrf.f index 3a6bea32d5..ff83c80cbe 100644 --- a/SRC/slarrf.f +++ b/SRC/slarrf.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrf * *> \par Contributors: * ================== diff --git a/SRC/slarrj.f b/SRC/slarrj.f index d56e62c1d6..3daedfd078 100644 --- a/SRC/slarrj.f +++ b/SRC/slarrj.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrj * *> \par Contributors: * ================== diff --git a/SRC/slarrk.f b/SRC/slarrk.f index e553d84524..17c8d8d84d 100644 --- a/SRC/slarrk.f +++ b/SRC/slarrk.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrk * * ===================================================================== SUBROUTINE SLARRK( N, IW, GL, GU, diff --git a/SRC/slarrr.f b/SRC/slarrr.f index d18465bc8b..a36644b9dd 100644 --- a/SRC/slarrr.f +++ b/SRC/slarrr.f @@ -78,7 +78,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup larrr * *> \par Contributors: * ================== diff --git a/SRC/slarrv.f b/SRC/slarrv.f index 95f94fd1bd..205af0fc07 100644 --- a/SRC/slarrv.f +++ b/SRC/slarrv.f @@ -272,7 +272,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup larrv * *> \par Contributors: * ================== diff --git a/SRC/slarscl2.f b/SRC/slarscl2.f index c7b77c9083..dce4b78e6c 100644 --- a/SRC/slarscl2.f +++ b/SRC/slarscl2.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup larscl2 * * ===================================================================== SUBROUTINE SLARSCL2 ( M, N, D, X, LDX ) diff --git a/SRC/slartg.f90 b/SRC/slartg.f90 index 8a5a8f26a3..fdf4099039 100644 --- a/SRC/slartg.f90 +++ b/SRC/slartg.f90 @@ -88,7 +88,7 @@ ! !> \date July 2016 ! -!> \ingroup OTHERauxiliary +!> \ingroup lartg ! !> \par Contributors: ! ================== diff --git a/SRC/slartgp.f b/SRC/slartgp.f index 8d98db4199..e8e8523720 100644 --- a/SRC/slartgp.f +++ b/SRC/slartgp.f @@ -88,7 +88,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lartgp * * ===================================================================== SUBROUTINE SLARTGP( F, G, CS, SN, R ) diff --git a/SRC/slartgs.f b/SRC/slartgs.f index dfc1a25c88..3985fb497f 100644 --- a/SRC/slartgs.f +++ b/SRC/slartgs.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lartgs * * ===================================================================== SUBROUTINE SLARTGS( X, Y, SIGMA, CS, SN ) diff --git a/SRC/slartv.f b/SRC/slartv.f index 200e608805..c43750f5a0 100644 --- a/SRC/slartv.f +++ b/SRC/slartv.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lartv * * ===================================================================== SUBROUTINE SLARTV( N, X, INCX, Y, INCY, C, S, INCC ) diff --git a/SRC/slaruv.f b/SRC/slaruv.f index cd37a1c474..3cda4b714d 100644 --- a/SRC/slaruv.f +++ b/SRC/slaruv.f @@ -72,7 +72,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laruv * *> \par Further Details: * ===================== diff --git a/SRC/slarz.f b/SRC/slarz.f index 549a10fb17..e6607d5c4c 100644 --- a/SRC/slarz.f +++ b/SRC/slarz.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup larz * *> \par Contributors: * ================== diff --git a/SRC/slarzb.f b/SRC/slarzb.f index 93154c4c98..d9d54d5bf9 100644 --- a/SRC/slarzb.f +++ b/SRC/slarzb.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup larzb * *> \par Contributors: * ================== diff --git a/SRC/slarzt.f b/SRC/slarzt.f index fc3e8175ca..a248235593 100644 --- a/SRC/slarzt.f +++ b/SRC/slarzt.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup larzt * *> \par Contributors: * ================== diff --git a/SRC/slas2.f b/SRC/slas2.f index 02ecbf4347..c68ca75959 100644 --- a/SRC/slas2.f +++ b/SRC/slas2.f @@ -78,7 +78,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup las2 * *> \par Further Details: * ===================== diff --git a/SRC/slascl.f b/SRC/slascl.f index 28cbd6514b..48b8315d9f 100644 --- a/SRC/slascl.f +++ b/SRC/slascl.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lascl * * ===================================================================== SUBROUTINE SLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO ) diff --git a/SRC/slascl2.f b/SRC/slascl2.f index 5efc1cfcd2..03e9cb5cf8 100644 --- a/SRC/slascl2.f +++ b/SRC/slascl2.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup lascl2 * * ===================================================================== SUBROUTINE SLASCL2 ( M, N, D, X, LDX ) diff --git a/SRC/slasd0.f b/SRC/slasd0.f index c8a5c7838b..68d3ccd20e 100644 --- a/SRC/slasd0.f +++ b/SRC/slasd0.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd0 * *> \par Contributors: * ================== diff --git a/SRC/slasd1.f b/SRC/slasd1.f index 8e4460aaa0..0ec9782011 100644 --- a/SRC/slasd1.f +++ b/SRC/slasd1.f @@ -190,7 +190,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd1 * *> \par Contributors: * ================== diff --git a/SRC/slasd2.f b/SRC/slasd2.f index 1902242c77..9570f7c2fb 100644 --- a/SRC/slasd2.f +++ b/SRC/slasd2.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd2 * *> \par Contributors: * ================== diff --git a/SRC/slasd3.f b/SRC/slasd3.f index 8f74743c2e..474b0d8afa 100644 --- a/SRC/slasd3.f +++ b/SRC/slasd3.f @@ -202,7 +202,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd3 * *> \par Contributors: * ================== diff --git a/SRC/slasd4.f b/SRC/slasd4.f index f949094f5c..d8374c30b7 100644 --- a/SRC/slasd4.f +++ b/SRC/slasd4.f @@ -140,7 +140,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd4 * *> \par Contributors: * ================== diff --git a/SRC/slasd5.f b/SRC/slasd5.f index 9a0a077102..0eecf1df2b 100644 --- a/SRC/slasd5.f +++ b/SRC/slasd5.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd5 * *> \par Contributors: * ================== diff --git a/SRC/slasd6.f b/SRC/slasd6.f index f4cbeb25d4..67b33a48f2 100644 --- a/SRC/slasd6.f +++ b/SRC/slasd6.f @@ -297,7 +297,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd6 * *> \par Contributors: * ================== diff --git a/SRC/slasd7.f b/SRC/slasd7.f index efd1f59d08..a0e2a84fb2 100644 --- a/SRC/slasd7.f +++ b/SRC/slasd7.f @@ -264,7 +264,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd7 * *> \par Contributors: * ================== diff --git a/SRC/slasd8.f b/SRC/slasd8.f index df50023673..bf653a5d0c 100644 --- a/SRC/slasd8.f +++ b/SRC/slasd8.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasd8 * *> \par Contributors: * ================== diff --git a/SRC/slasda.f b/SRC/slasda.f index 20f01ee486..743da05ad1 100644 --- a/SRC/slasda.f +++ b/SRC/slasda.f @@ -258,7 +258,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasda * *> \par Contributors: * ================== diff --git a/SRC/slasdq.f b/SRC/slasdq.f index 8561422009..2734197f71 100644 --- a/SRC/slasdq.f +++ b/SRC/slasdq.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasdq * *> \par Contributors: * ================== diff --git a/SRC/slasdt.f b/SRC/slasdt.f index 4125472683..f5192cfdaa 100644 --- a/SRC/slasdt.f +++ b/SRC/slasdt.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasdt * *> \par Contributors: * ================== diff --git a/SRC/slaset.f b/SRC/slaset.f index c43757e010..1f9754366a 100644 --- a/SRC/slaset.f +++ b/SRC/slaset.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup laset * * ===================================================================== SUBROUTINE SLASET( UPLO, M, N, ALPHA, BETA, A, LDA ) diff --git a/SRC/slasq1.f b/SRC/slasq1.f index 1ba7a8aaeb..42aef6e838 100644 --- a/SRC/slasq1.f +++ b/SRC/slasq1.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq1 * * ===================================================================== SUBROUTINE SLASQ1( N, D, E, WORK, INFO ) diff --git a/SRC/slasq2.f b/SRC/slasq2.f index c7909d83bd..574ade37dc 100644 --- a/SRC/slasq2.f +++ b/SRC/slasq2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq2 * *> \par Further Details: * ===================== diff --git a/SRC/slasq3.f b/SRC/slasq3.f index cd86ce8962..695235e7fe 100644 --- a/SRC/slasq3.f +++ b/SRC/slasq3.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq3 * * ===================================================================== SUBROUTINE SLASQ3( I0, N0, Z, PP, DMIN, SIGMA, DESIG, QMAX, NFAIL, diff --git a/SRC/slasq4.f b/SRC/slasq4.f index 68a840fccc..941b17a77f 100644 --- a/SRC/slasq4.f +++ b/SRC/slasq4.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq4 * *> \par Further Details: * ===================== diff --git a/SRC/slasq5.f b/SRC/slasq5.f index d94b3cd8a2..4af9d60d59 100644 --- a/SRC/slasq5.f +++ b/SRC/slasq5.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq5 * * ===================================================================== SUBROUTINE SLASQ5( I0, N0, Z, PP, TAU, SIGMA, DMIN, DMIN1, DMIN2, diff --git a/SRC/slasq6.f b/SRC/slasq6.f index 5e3df7b143..dbf967a39f 100644 --- a/SRC/slasq6.f +++ b/SRC/slasq6.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasq6 * * ===================================================================== SUBROUTINE SLASQ6( I0, N0, Z, PP, DMIN, DMIN1, DMIN2, DN, diff --git a/SRC/slasr.f b/SRC/slasr.f index adcea12c99..c3a9fd4005 100644 --- a/SRC/slasr.f +++ b/SRC/slasr.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasr * * ===================================================================== SUBROUTINE SLASR( SIDE, PIVOT, DIRECT, M, N, C, S, A, LDA ) diff --git a/SRC/slasrt.f b/SRC/slasrt.f index 132e03db61..925e138c3c 100644 --- a/SRC/slasrt.f +++ b/SRC/slasrt.f @@ -81,7 +81,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup lasrt * * ===================================================================== SUBROUTINE SLASRT( ID, N, D, INFO ) diff --git a/SRC/slasv2.f b/SRC/slasv2.f index bf5d3ea0e0..5832e801dc 100644 --- a/SRC/slasv2.f +++ b/SRC/slasv2.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup lasv2 * *> \par Further Details: * ===================== diff --git a/SRC/slaswlq.f b/SRC/slaswlq.f index 95e0ddccee..fac5650bc6 100644 --- a/SRC/slaswlq.f +++ b/SRC/slaswlq.f @@ -159,6 +159,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup laswlq +*> * ===================================================================== SUBROUTINE SLASWLQ( M, N, MB, NB, A, LDA, T, LDT, WORK, LWORK, $ INFO) diff --git a/SRC/slaswp.f b/SRC/slaswp.f index 20e29d62ac..9ac0b731c3 100644 --- a/SRC/slaswp.f +++ b/SRC/slaswp.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup laswp * *> \par Further Details: * ===================== diff --git a/SRC/slasy2.f b/SRC/slasy2.f index 2a458ba70b..42b08cde2e 100644 --- a/SRC/slasy2.f +++ b/SRC/slasy2.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYauxiliary +*> \ingroup lasy2 * * ===================================================================== SUBROUTINE SLASY2( LTRANL, LTRANR, ISGN, N1, N2, TL, LDTL, TR, diff --git a/SRC/slasyf.f b/SRC/slasyf.f index c551c1460f..8ea539c1f7 100644 --- a/SRC/slasyf.f +++ b/SRC/slasyf.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup lahef * *> \par Contributors: * ================== diff --git a/SRC/slasyf_aa.f b/SRC/slasyf_aa.f index 8c8bdf7d1d..f2514dbfe5 100644 --- a/SRC/slasyf_aa.f +++ b/SRC/slasyf_aa.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup lahef_aa * * ===================================================================== SUBROUTINE SLASYF_AA( UPLO, J1, M, NB, A, LDA, IPIV, diff --git a/SRC/slasyf_rk.f b/SRC/slasyf_rk.f index 1960bd1108..0db08b0476 100644 --- a/SRC/slasyf_rk.f +++ b/SRC/slasyf_rk.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup lahef_rk * *> \par Contributors: * ================== diff --git a/SRC/slasyf_rook.f b/SRC/slasyf_rook.f index 7764f69350..e88961853e 100644 --- a/SRC/slasyf_rook.f +++ b/SRC/slasyf_rook.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup lahef_rook * *> \par Contributors: * ================== diff --git a/SRC/slatbs.f b/SRC/slatbs.f index 77940f8cd9..b27e5d28fd 100644 --- a/SRC/slatbs.f +++ b/SRC/slatbs.f @@ -162,7 +162,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup latbs * *> \par Further Details: * ===================== diff --git a/SRC/slatdf.f b/SRC/slatdf.f index 2eaacbd9cc..c5122811ae 100644 --- a/SRC/slatdf.f +++ b/SRC/slatdf.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup latdf * *> \par Further Details: * ===================== diff --git a/SRC/slatps.f b/SRC/slatps.f index 2bce76f065..78231070b9 100644 --- a/SRC/slatps.f +++ b/SRC/slatps.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup latps * *> \par Further Details: * ===================== diff --git a/SRC/slatrd.f b/SRC/slatrd.f index 1cdb13c394..e0d2b663ad 100644 --- a/SRC/slatrd.f +++ b/SRC/slatrd.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latrd * *> \par Further Details: * ===================== diff --git a/SRC/slatrs.f b/SRC/slatrs.f index 0761d656f2..be434628fc 100644 --- a/SRC/slatrs.f +++ b/SRC/slatrs.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup latrs * *> \par Further Details: * ===================== diff --git a/SRC/slatrs3.f b/SRC/slatrs3.f index 8f0c4bf163..542d9d7b80 100644 --- a/SRC/slatrs3.f +++ b/SRC/slatrs3.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latrs3 *> \par Further Details: * ===================== * \verbatim diff --git a/SRC/slatrz.f b/SRC/slatrz.f index 6f5fe08912..4d058cb8a9 100644 --- a/SRC/slatrz.f +++ b/SRC/slatrz.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup latrz * *> \par Contributors: * ================== diff --git a/SRC/slatsqr.f b/SRC/slatsqr.f index 86733bb159..75e7e749b6 100644 --- a/SRC/slatsqr.f +++ b/SRC/slatsqr.f @@ -161,6 +161,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup latsqr +*> * ===================================================================== SUBROUTINE SLATSQR( M, N, MB, NB, A, LDA, T, LDT, WORK, $ LWORK, INFO) diff --git a/SRC/slauu2.f b/SRC/slauu2.f index efe5e47efb..ca7a853403 100644 --- a/SRC/slauu2.f +++ b/SRC/slauu2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lauu2 * * ===================================================================== SUBROUTINE SLAUU2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/slauum.f b/SRC/slauum.f index a7b69432df..531f7d5074 100644 --- a/SRC/slauum.f +++ b/SRC/slauum.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup lauum * * ===================================================================== SUBROUTINE SLAUUM( UPLO, N, A, LDA, INFO ) diff --git a/SRC/sopgtr.f b/SRC/sopgtr.f index 1ab657acce..c61a5c329f 100644 --- a/SRC/sopgtr.f +++ b/SRC/sopgtr.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup upgtr * * ===================================================================== SUBROUTINE SOPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO ) diff --git a/SRC/sopmtr.f b/SRC/sopmtr.f index c1148e01f4..d140130ba8 100644 --- a/SRC/sopmtr.f +++ b/SRC/sopmtr.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup upmtr * * ===================================================================== SUBROUTINE SOPMTR( SIDE, UPLO, TRANS, M, N, AP, TAU, C, LDC, WORK, diff --git a/SRC/sorbdb.f b/SRC/sorbdb.f index 351172ff16..fc0dc97cf6 100644 --- a/SRC/sorbdb.f +++ b/SRC/sorbdb.f @@ -255,7 +255,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unbdb * *> \par Further Details: * ===================== diff --git a/SRC/sorbdb1.f b/SRC/sorbdb1.f index 191e5742a4..5b56f4dd6d 100644 --- a/SRC/sorbdb1.f +++ b/SRC/sorbdb1.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unbdb1 * *> \par Further Details: * ===================== diff --git a/SRC/sorbdb2.f b/SRC/sorbdb2.f index b2ff34bb1e..322b4923b3 100644 --- a/SRC/sorbdb2.f +++ b/SRC/sorbdb2.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unbdb2 * *> \par Further Details: * ===================== diff --git a/SRC/sorbdb3.f b/SRC/sorbdb3.f index 99478c5d0d..9533468f84 100644 --- a/SRC/sorbdb3.f +++ b/SRC/sorbdb3.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unbdb3 * *> \par Further Details: * ===================== diff --git a/SRC/sorbdb4.f b/SRC/sorbdb4.f index 0fef5b759b..507e1b76d5 100644 --- a/SRC/sorbdb4.f +++ b/SRC/sorbdb4.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unbdb4 * *> \par Further Details: * ===================== diff --git a/SRC/sorbdb5.f b/SRC/sorbdb5.f index 8c67aedfb1..50dadbe21a 100644 --- a/SRC/sorbdb5.f +++ b/SRC/sorbdb5.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unbdb5 * * ===================================================================== SUBROUTINE SORBDB5( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, diff --git a/SRC/sorbdb6.f b/SRC/sorbdb6.f index b2449e3bed..7c805057ed 100644 --- a/SRC/sorbdb6.f +++ b/SRC/sorbdb6.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unbdb6 * * ===================================================================== SUBROUTINE SORBDB6( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, diff --git a/SRC/sorcsd.f b/SRC/sorcsd.f index 30bee7a79f..ae918869f0 100644 --- a/SRC/sorcsd.f +++ b/SRC/sorcsd.f @@ -289,7 +289,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup uncsd * * ===================================================================== RECURSIVE SUBROUTINE SORCSD( JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, diff --git a/SRC/sorcsd2by1.f b/SRC/sorcsd2by1.f index 25c317f6f6..04528bb11a 100644 --- a/SRC/sorcsd2by1.f +++ b/SRC/sorcsd2by1.f @@ -224,7 +224,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup uncsd2by1 * * ===================================================================== SUBROUTINE SORCSD2BY1( JOBU1, JOBU2, JOBV1T, M, P, Q, X11, LDX11, diff --git a/SRC/sorg2l.f b/SRC/sorg2l.f index aa0dd0a08e..397ca51d97 100644 --- a/SRC/sorg2l.f +++ b/SRC/sorg2l.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ung2l * * ===================================================================== SUBROUTINE SORG2L( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/sorg2r.f b/SRC/sorg2r.f index 3a8aa33a02..67d35d950e 100644 --- a/SRC/sorg2r.f +++ b/SRC/sorg2r.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ung2r * * ===================================================================== SUBROUTINE SORG2R( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/sorgbr.f b/SRC/sorgbr.f index b1a5c03a26..a82b8fcf8b 100644 --- a/SRC/sorgbr.f +++ b/SRC/sorgbr.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGBcomputational +*> \ingroup ungbr * * ===================================================================== SUBROUTINE SORGBR( VECT, M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/sorghr.f b/SRC/sorghr.f index f65cd898c2..c728e7397c 100644 --- a/SRC/sorghr.f +++ b/SRC/sorghr.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unghr * * ===================================================================== SUBROUTINE SORGHR( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/sorgl2.f b/SRC/sorgl2.f index d85c388749..2f03d32e53 100644 --- a/SRC/sorgl2.f +++ b/SRC/sorgl2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ungl2 * * ===================================================================== SUBROUTINE SORGL2( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/sorglq.f b/SRC/sorglq.f index b1d107964c..82edc06691 100644 --- a/SRC/sorglq.f +++ b/SRC/sorglq.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unglq * * ===================================================================== SUBROUTINE SORGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/sorgql.f b/SRC/sorgql.f index 34ab5edefe..0f32c99e35 100644 --- a/SRC/sorgql.f +++ b/SRC/sorgql.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ungql * * ===================================================================== SUBROUTINE SORGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/sorgqr.f b/SRC/sorgqr.f index 056de54d79..8b874551b1 100644 --- a/SRC/sorgqr.f +++ b/SRC/sorgqr.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ungqr * * ===================================================================== SUBROUTINE SORGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/sorgr2.f b/SRC/sorgr2.f index 12bb90c782..38a3a41b13 100644 --- a/SRC/sorgr2.f +++ b/SRC/sorgr2.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ungr2 * * ===================================================================== SUBROUTINE SORGR2( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/sorgrq.f b/SRC/sorgrq.f index d9b6ccbe6c..99e498a880 100644 --- a/SRC/sorgrq.f +++ b/SRC/sorgrq.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ungrq * * ===================================================================== SUBROUTINE SORGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/sorgtr.f b/SRC/sorgtr.f index 67bde00cbc..255cc87af2 100644 --- a/SRC/sorgtr.f +++ b/SRC/sorgtr.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ungtr * * ===================================================================== SUBROUTINE SORGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/sorgtsqr.f b/SRC/sorgtsqr.f index 692eba1d9d..5efe963286 100644 --- a/SRC/sorgtsqr.f +++ b/SRC/sorgtsqr.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleOTHERcomputational +*> \ingroup ungtsqr * *> \par Contributors: * ================== diff --git a/SRC/sorgtsqr_row.f b/SRC/sorgtsqr_row.f index d2a2150cd9..cbd3b0b986 100644 --- a/SRC/sorgtsqr_row.f +++ b/SRC/sorgtsqr_row.f @@ -169,7 +169,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup sigleOTHERcomputational +*> \ingroup ungtsqr_row * *> \par Contributors: * ================== diff --git a/SRC/sorhr_col.f b/SRC/sorhr_col.f index c4e47b84c8..006503928c 100644 --- a/SRC/sorhr_col.f +++ b/SRC/sorhr_col.f @@ -241,7 +241,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleOTHERcomputational +*> \ingroup unhr_col * *> \par Contributors: * ================== diff --git a/SRC/sorm22.f b/SRC/sorm22.f index 15096870a0..a1a291fbe6 100644 --- a/SRC/sorm22.f +++ b/SRC/sorm22.f @@ -155,7 +155,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unm22 * * ===================================================================== SUBROUTINE SORM22( SIDE, TRANS, M, N, N1, N2, Q, LDQ, C, LDC, diff --git a/SRC/sorm2l.f b/SRC/sorm2l.f index 2f6e3abbc3..bdd883c6c7 100644 --- a/SRC/sorm2l.f +++ b/SRC/sorm2l.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unm2l * * ===================================================================== SUBROUTINE SORM2L( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/sorm2r.f b/SRC/sorm2r.f index 0e0747a005..f1560e016b 100644 --- a/SRC/sorm2r.f +++ b/SRC/sorm2r.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unm2r * * ===================================================================== SUBROUTINE SORM2R( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/sormbr.f b/SRC/sormbr.f index efe5be41a8..2b30fc7cb6 100644 --- a/SRC/sormbr.f +++ b/SRC/sormbr.f @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmbr * * ===================================================================== SUBROUTINE SORMBR( VECT, SIDE, TRANS, M, N, K, A, LDA, TAU, C, diff --git a/SRC/sormhr.f b/SRC/sormhr.f index 2d2053af4c..058ee27507 100644 --- a/SRC/sormhr.f +++ b/SRC/sormhr.f @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmhr * * ===================================================================== SUBROUTINE SORMHR( SIDE, TRANS, M, N, ILO, IHI, A, LDA, TAU, C, diff --git a/SRC/sorml2.f b/SRC/sorml2.f index c5705c799e..27f970fcdb 100644 --- a/SRC/sorml2.f +++ b/SRC/sorml2.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unml2 * * ===================================================================== SUBROUTINE SORML2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/sormlq.f b/SRC/sormlq.f index ee996e5602..c42056623b 100644 --- a/SRC/sormlq.f +++ b/SRC/sormlq.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmlq * * ===================================================================== SUBROUTINE SORMLQ( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/sormql.f b/SRC/sormql.f index 72a8d22eea..f8be5ace0e 100644 --- a/SRC/sormql.f +++ b/SRC/sormql.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmql * * ===================================================================== SUBROUTINE SORMQL( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/sormqr.f b/SRC/sormqr.f index 5d4256f09c..8bdeb3bbc3 100644 --- a/SRC/sormqr.f +++ b/SRC/sormqr.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmqr * * ===================================================================== SUBROUTINE SORMQR( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/sormr2.f b/SRC/sormr2.f index cefe1d3092..5e71a483aa 100644 --- a/SRC/sormr2.f +++ b/SRC/sormr2.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmr2 * * ===================================================================== SUBROUTINE SORMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/sormr3.f b/SRC/sormr3.f index 18d66e3238..4077088edd 100644 --- a/SRC/sormr3.f +++ b/SRC/sormr3.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmr3 * *> \par Contributors: * ================== diff --git a/SRC/sormrq.f b/SRC/sormrq.f index 62fcdacdb9..9f91f823ef 100644 --- a/SRC/sormrq.f +++ b/SRC/sormrq.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmrq * * ===================================================================== SUBROUTINE SORMRQ( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/sormrz.f b/SRC/sormrz.f index cdadd62b51..1de9ec9173 100644 --- a/SRC/sormrz.f +++ b/SRC/sormrz.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmrz * *> \par Contributors: * ================== diff --git a/SRC/sormtr.f b/SRC/sormtr.f index 3ba749fee6..a9f62f4333 100644 --- a/SRC/sormtr.f +++ b/SRC/sormtr.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup unmtr * * ===================================================================== SUBROUTINE SORMTR( SIDE, UPLO, TRANS, M, N, A, LDA, TAU, C, LDC, diff --git a/SRC/spbcon.f b/SRC/spbcon.f index 84c97b1cbc..2bbda00b01 100644 --- a/SRC/spbcon.f +++ b/SRC/spbcon.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pbcon * * ===================================================================== SUBROUTINE SPBCON( UPLO, N, KD, AB, LDAB, ANORM, RCOND, WORK, diff --git a/SRC/spbequ.f b/SRC/spbequ.f index df2c3a19c6..e2ae89d343 100644 --- a/SRC/spbequ.f +++ b/SRC/spbequ.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pbequ * * ===================================================================== SUBROUTINE SPBEQU( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, INFO ) diff --git a/SRC/spbrfs.f b/SRC/spbrfs.f index f13aaee016..744908b299 100644 --- a/SRC/spbrfs.f +++ b/SRC/spbrfs.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pbrfs * * ===================================================================== SUBROUTINE SPBRFS( UPLO, N, KD, NRHS, AB, LDAB, AFB, LDAFB, B, diff --git a/SRC/spbstf.f b/SRC/spbstf.f index 909c165f3c..030652cc5d 100644 --- a/SRC/spbstf.f +++ b/SRC/spbstf.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pbstf * *> \par Further Details: * ===================== diff --git a/SRC/spbsv.f b/SRC/spbsv.f index 8929321eaa..70339b9b25 100644 --- a/SRC/spbsv.f +++ b/SRC/spbsv.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERsolve +*> \ingroup pbsv * *> \par Further Details: * ===================== diff --git a/SRC/spbsvx.f b/SRC/spbsvx.f index 6abb6caae4..342633b3e2 100644 --- a/SRC/spbsvx.f +++ b/SRC/spbsvx.f @@ -302,7 +302,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERsolve +*> \ingroup pbsvx * *> \par Further Details: * ===================== diff --git a/SRC/spbtf2.f b/SRC/spbtf2.f index b5aac1ccd3..1128c7d925 100644 --- a/SRC/spbtf2.f +++ b/SRC/spbtf2.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pbtf2 * *> \par Further Details: * ===================== diff --git a/SRC/spbtrf.f b/SRC/spbtrf.f index d3ae216e5a..0e19fd372a 100644 --- a/SRC/spbtrf.f +++ b/SRC/spbtrf.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pbtrf * *> \par Further Details: * ===================== diff --git a/SRC/spbtrs.f b/SRC/spbtrs.f index bc33819569..eb5886ef8a 100644 --- a/SRC/spbtrs.f +++ b/SRC/spbtrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pbtrs * * ===================================================================== SUBROUTINE SPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) diff --git a/SRC/spftrf.f b/SRC/spftrf.f index 0ed0e3abd7..6e9c071653 100644 --- a/SRC/spftrf.f +++ b/SRC/spftrf.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pftrf * *> \par Further Details: * ===================== diff --git a/SRC/spftri.f b/SRC/spftri.f index 4e82bb183e..3b1ad1207c 100644 --- a/SRC/spftri.f +++ b/SRC/spftri.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pftri * *> \par Further Details: * ===================== diff --git a/SRC/spftrs.f b/SRC/spftrs.f index fec7eff767..55834fcd0c 100644 --- a/SRC/spftrs.f +++ b/SRC/spftrs.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pftrs * *> \par Further Details: * ===================== diff --git a/SRC/spocon.f b/SRC/spocon.f index 8b4e85b3d6..840a44514a 100644 --- a/SRC/spocon.f +++ b/SRC/spocon.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup pocon * * ===================================================================== SUBROUTINE SPOCON( UPLO, N, A, LDA, ANORM, RCOND, WORK, IWORK, diff --git a/SRC/spoequ.f b/SRC/spoequ.f index 45c61d6454..ee88598a41 100644 --- a/SRC/spoequ.f +++ b/SRC/spoequ.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup poequ * * ===================================================================== SUBROUTINE SPOEQU( N, A, LDA, S, SCOND, AMAX, INFO ) diff --git a/SRC/spoequb.f b/SRC/spoequb.f index e221cdb6da..57a6e053bc 100644 --- a/SRC/spoequb.f +++ b/SRC/spoequb.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup poequb * * ===================================================================== SUBROUTINE SPOEQUB( N, A, LDA, S, SCOND, AMAX, INFO ) diff --git a/SRC/sporfs.f b/SRC/sporfs.f index 4390b1d42b..082b2dd036 100644 --- a/SRC/sporfs.f +++ b/SRC/sporfs.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup porfs * * ===================================================================== SUBROUTINE SPORFS( UPLO, N, NRHS, A, LDA, AF, LDAF, B, LDB, X, diff --git a/SRC/sporfsx.f b/SRC/sporfsx.f index 8f69bc77ed..108aac39a0 100644 --- a/SRC/sporfsx.f +++ b/SRC/sporfsx.f @@ -384,7 +384,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup porfsx * * ===================================================================== SUBROUTINE SPORFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, S, B, diff --git a/SRC/sposv.f b/SRC/sposv.f index 336332d2d1..6140f95fb9 100644 --- a/SRC/sposv.f +++ b/SRC/sposv.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOsolve +*> \ingroup posv * * ===================================================================== SUBROUTINE SPOSV( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) diff --git a/SRC/sposvx.f b/SRC/sposvx.f index 0770897d2c..499b5f51a8 100644 --- a/SRC/sposvx.f +++ b/SRC/sposvx.f @@ -298,7 +298,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOsolve +*> \ingroup posvx * * ===================================================================== SUBROUTINE SPOSVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, EQUED, diff --git a/SRC/sposvxx.f b/SRC/sposvxx.f index 19e599f642..40f60c862c 100644 --- a/SRC/sposvxx.f +++ b/SRC/sposvxx.f @@ -487,7 +487,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOsolve +*> \ingroup posvxx * * ===================================================================== SUBROUTINE SPOSVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, EQUED, diff --git a/SRC/spotf2.f b/SRC/spotf2.f index 773b768b29..75e8d19dcf 100644 --- a/SRC/spotf2.f +++ b/SRC/spotf2.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup potf2 * * ===================================================================== SUBROUTINE SPOTF2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/spotrf.f b/SRC/spotrf.f index 12ef58a402..c3019658b5 100644 --- a/SRC/spotrf.f +++ b/SRC/spotrf.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup potrf * * ===================================================================== SUBROUTINE SPOTRF( UPLO, N, A, LDA, INFO ) diff --git a/SRC/spotrf2.f b/SRC/spotrf2.f index ef731ffa20..0f28783334 100644 --- a/SRC/spotrf2.f +++ b/SRC/spotrf2.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup potrf2 * * ===================================================================== RECURSIVE SUBROUTINE SPOTRF2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/spotri.f b/SRC/spotri.f index 5e9944847f..c803560ee8 100644 --- a/SRC/spotri.f +++ b/SRC/spotri.f @@ -88,7 +88,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup potri * * ===================================================================== SUBROUTINE SPOTRI( UPLO, N, A, LDA, INFO ) diff --git a/SRC/spotrs.f b/SRC/spotrs.f index 6bd662a522..f99e86e607 100644 --- a/SRC/spotrs.f +++ b/SRC/spotrs.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPOcomputational +*> \ingroup potrs * * ===================================================================== SUBROUTINE SPOTRS( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) diff --git a/SRC/sppcon.f b/SRC/sppcon.f index 333520ea3d..3b14e43fe8 100644 --- a/SRC/sppcon.f +++ b/SRC/sppcon.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ppcon * * ===================================================================== SUBROUTINE SPPCON( UPLO, N, AP, ANORM, RCOND, WORK, IWORK, INFO ) diff --git a/SRC/sppequ.f b/SRC/sppequ.f index 71ed8c0e74..3cb760bd89 100644 --- a/SRC/sppequ.f +++ b/SRC/sppequ.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup ppequ * * ===================================================================== SUBROUTINE SPPEQU( UPLO, N, AP, S, SCOND, AMAX, INFO ) diff --git a/SRC/spprfs.f b/SRC/spprfs.f index 5fa8fe2af7..fb787466a7 100644 --- a/SRC/spprfs.f +++ b/SRC/spprfs.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pprfs * * ===================================================================== SUBROUTINE SPPRFS( UPLO, N, NRHS, AP, AFP, B, LDB, X, LDX, FERR, diff --git a/SRC/sppsv.f b/SRC/sppsv.f index 1f48dd4db1..41351cfd1d 100644 --- a/SRC/sppsv.f +++ b/SRC/sppsv.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERsolve +*> \ingroup ppsv * *> \par Further Details: * ===================== diff --git a/SRC/sppsvx.f b/SRC/sppsvx.f index bd2da20ee3..b3772da113 100644 --- a/SRC/sppsvx.f +++ b/SRC/sppsvx.f @@ -283,7 +283,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERsolve +*> \ingroup ppsvx * *> \par Further Details: * ===================== diff --git a/SRC/spptrf.f b/SRC/spptrf.f index be51c4824f..1fdbeb48d1 100644 --- a/SRC/spptrf.f +++ b/SRC/spptrf.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pptrf * *> \par Further Details: * ===================== diff --git a/SRC/spptri.f b/SRC/spptri.f index 8d2204baee..c5414c5d4f 100644 --- a/SRC/spptri.f +++ b/SRC/spptri.f @@ -86,7 +86,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pptri * * ===================================================================== SUBROUTINE SPPTRI( UPLO, N, AP, INFO ) diff --git a/SRC/spptrs.f b/SRC/spptrs.f index ac33797312..acd7e1b00e 100644 --- a/SRC/spptrs.f +++ b/SRC/spptrs.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pptrs * * ===================================================================== SUBROUTINE SPPTRS( UPLO, N, NRHS, AP, B, LDB, INFO ) diff --git a/SRC/spstf2.f b/SRC/spstf2.f index efd58a3e6e..ec7be0c638 100644 --- a/SRC/spstf2.f +++ b/SRC/spstf2.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pstf2 * * ===================================================================== SUBROUTINE SPSTF2( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) diff --git a/SRC/spstrf.f b/SRC/spstrf.f index 70ec9484a1..7192d4f5a7 100644 --- a/SRC/spstrf.f +++ b/SRC/spstrf.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup pstrf * * ===================================================================== SUBROUTINE SPSTRF( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) diff --git a/SRC/sptcon.f b/SRC/sptcon.f index 1088e09e75..8ec3b5e519 100644 --- a/SRC/sptcon.f +++ b/SRC/sptcon.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPTcomputational +*> \ingroup ptcon * *> \par Further Details: * ===================== diff --git a/SRC/spteqr.f b/SRC/spteqr.f index 6e6e9aa45c..505d34cf1c 100644 --- a/SRC/spteqr.f +++ b/SRC/spteqr.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPTcomputational +*> \ingroup pteqr * * ===================================================================== SUBROUTINE SPTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/sptrfs.f b/SRC/sptrfs.f index 66d152b3a2..d8e360420f 100644 --- a/SRC/sptrfs.f +++ b/SRC/sptrfs.f @@ -155,7 +155,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPTcomputational +*> \ingroup ptrfs * * ===================================================================== SUBROUTINE SPTRFS( N, NRHS, D, E, DF, EF, B, LDB, X, LDX, FERR, diff --git a/SRC/sptsv.f b/SRC/sptsv.f index f11c225948..cd8e7ed494 100644 --- a/SRC/sptsv.f +++ b/SRC/sptsv.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPTsolve +*> \ingroup ptsv * * ===================================================================== SUBROUTINE SPTSV( N, NRHS, D, E, B, LDB, INFO ) diff --git a/SRC/sptsvx.f b/SRC/sptsvx.f index eaa691cefe..0b2153a517 100644 --- a/SRC/sptsvx.f +++ b/SRC/sptsvx.f @@ -220,7 +220,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPTsolve +*> \ingroup ptsvx * * ===================================================================== SUBROUTINE SPTSVX( FACT, N, NRHS, D, E, DF, EF, B, LDB, X, LDX, diff --git a/SRC/spttrf.f b/SRC/spttrf.f index e083b7456b..87cfd3e2c7 100644 --- a/SRC/spttrf.f +++ b/SRC/spttrf.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup pttrf * * ===================================================================== SUBROUTINE SPTTRF( N, D, E, INFO ) diff --git a/SRC/spttrs.f b/SRC/spttrs.f index 3b5340104a..73e5a5be6b 100644 --- a/SRC/spttrs.f +++ b/SRC/spttrs.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPTcomputational +*> \ingroup pttrs * * ===================================================================== SUBROUTINE SPTTRS( N, NRHS, D, E, B, LDB, INFO ) diff --git a/SRC/sptts2.f b/SRC/sptts2.f index 93f41d1b12..0a7b2626b0 100644 --- a/SRC/sptts2.f +++ b/SRC/sptts2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realPTcomputational +*> \ingroup ptts2 * * ===================================================================== SUBROUTINE SPTTS2( N, NRHS, D, E, B, LDB ) diff --git a/SRC/srscl.f b/SRC/srscl.f index b4538d21e5..786c72e79c 100644 --- a/SRC/srscl.f +++ b/SRC/srscl.f @@ -77,7 +77,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup rscl * * ===================================================================== SUBROUTINE SRSCL( N, SA, SX, INCX ) diff --git a/SRC/ssb2st_kernels.f b/SRC/ssb2st_kernels.f index 23f77d0dae..8fb4ea3c10 100644 --- a/SRC/ssb2st_kernels.f +++ b/SRC/ssb2st_kernels.f @@ -164,6 +164,8 @@ *> *> \endverbatim *> +*> \ingroup hb2st_kernels +*> * ===================================================================== SUBROUTINE SSB2ST_KERNELS( UPLO, WANTZ, TTYPE, $ ST, ED, SWEEP, N, NB, IB, diff --git a/SRC/ssbev.f b/SRC/ssbev.f index d4cf6c08fb..e63234a398 100644 --- a/SRC/ssbev.f +++ b/SRC/ssbev.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbev * * ===================================================================== SUBROUTINE SSBEV( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, WORK, diff --git a/SRC/ssbev_2stage.f b/SRC/ssbev_2stage.f index 5752c1ecc0..504924d425 100644 --- a/SRC/ssbev_2stage.f +++ b/SRC/ssbev_2stage.f @@ -131,7 +131,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS + N @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbev_2stage * *> \par Further Details: * ===================== @@ -182,7 +182,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -190,11 +190,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -237,7 +237,7 @@ SUBROUTINE SSBEV_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, * .. * .. External Subroutines .. EXTERNAL SLASCL, SSCAL, SSTEQR, SSTERF, XERBLA, - $ SSYTRD_SB2ST + $ SSYTRD_SB2ST * .. * .. Intrinsic Functions .. INTRINSIC SQRT @@ -343,7 +343,7 @@ SUBROUTINE SSBEV_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, LLWORK = LWORK - INDWRK + 1 * CALL SSYTRD_SB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, W, - $ WORK( INDE ), WORK( INDHOUS ), LHTRD, + $ WORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call SSTERF. For eigenvectors, call SSTEQR. diff --git a/SRC/ssbevd.f b/SRC/ssbevd.f index e87f9a0304..de8606b8be 100644 --- a/SRC/ssbevd.f +++ b/SRC/ssbevd.f @@ -179,7 +179,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbevd * * ===================================================================== SUBROUTINE SSBEVD( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, WORK, diff --git a/SRC/ssbevd_2stage.f b/SRC/ssbevd_2stage.f index 014bade48c..b4e88ae017 100644 --- a/SRC/ssbevd_2stage.f +++ b/SRC/ssbevd_2stage.f @@ -134,7 +134,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS + N @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbevd_2stage * *> \par Further Details: * ===================== @@ -206,7 +206,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -214,11 +214,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -374,7 +374,7 @@ SUBROUTINE SSBEVD_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, LLWRK2 = LWORK - INDWK2 + 1 * CALL SSYTRD_SB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, W, - $ WORK( INDE ), WORK( INDHOUS ), LHTRD, + $ WORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call SSTERF. For eigenvectors, call SSTEDC. diff --git a/SRC/ssbevx.f b/SRC/ssbevx.f index 313d29e12a..32030d2744 100644 --- a/SRC/ssbevx.f +++ b/SRC/ssbevx.f @@ -256,7 +256,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbevx * * ===================================================================== SUBROUTINE SSBEVX( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, Q, LDQ, VL, diff --git a/SRC/ssbevx_2stage.f b/SRC/ssbevx_2stage.f index 224b676b74..c5d3e77637 100644 --- a/SRC/ssbevx_2stage.f +++ b/SRC/ssbevx_2stage.f @@ -235,7 +235,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 7*N, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS + 2*N @@ -281,7 +281,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbevx_2stage * *> \par Further Details: * ===================== @@ -299,7 +299,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -307,11 +307,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -513,7 +513,7 @@ SUBROUTINE SSBEVX_2STAGE( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, Q, LLWORK = LWORK - INDWRK + 1 * CALL SSYTRD_SB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, WORK( INDD ), - $ WORK( INDE ), WORK( INDHOUS ), LHTRD, + $ WORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * If all eigenvalues are desired and ABSTOL is less than or equal diff --git a/SRC/ssbgst.f b/SRC/ssbgst.f index 9faea00dca..76a55836ff 100644 --- a/SRC/ssbgst.f +++ b/SRC/ssbgst.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hbgst * * ===================================================================== SUBROUTINE SSBGST( VECT, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, X, diff --git a/SRC/ssbgv.f b/SRC/ssbgv.f index 8930867658..a6f501260e 100644 --- a/SRC/ssbgv.f +++ b/SRC/ssbgv.f @@ -169,7 +169,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbgv * * ===================================================================== SUBROUTINE SSBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z, diff --git a/SRC/ssbgvd.f b/SRC/ssbgvd.f index 7c21ee455c..5cc82f215f 100644 --- a/SRC/ssbgvd.f +++ b/SRC/ssbgvd.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbgvd * *> \par Contributors: * ================== diff --git a/SRC/ssbgvx.f b/SRC/ssbgvx.f index 3607fae82c..d8c5750237 100644 --- a/SRC/ssbgvx.f +++ b/SRC/ssbgvx.f @@ -280,7 +280,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hbgvx * *> \par Contributors: * ================== diff --git a/SRC/ssbtrd.f b/SRC/ssbtrd.f index f0d1720352..2d59542bb5 100644 --- a/SRC/ssbtrd.f +++ b/SRC/ssbtrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hbtrd * *> \par Further Details: * ===================== diff --git a/SRC/ssfrk.f b/SRC/ssfrk.f index ff477fc4c6..3e8bdee4c3 100644 --- a/SRC/ssfrk.f +++ b/SRC/ssfrk.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hfrk * * ===================================================================== SUBROUTINE SSFRK( TRANSR, UPLO, TRANS, N, K, ALPHA, A, LDA, BETA, diff --git a/SRC/sspcon.f b/SRC/sspcon.f index a9ac881d32..abc14b4089 100644 --- a/SRC/sspcon.f +++ b/SRC/sspcon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hpcon * * ===================================================================== SUBROUTINE SSPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, IWORK, diff --git a/SRC/sspev.f b/SRC/sspev.f index 8fb6a2d9d9..42479aae14 100644 --- a/SRC/sspev.f +++ b/SRC/sspev.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hpev * * ===================================================================== SUBROUTINE SSPEV( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, INFO ) diff --git a/SRC/sspevd.f b/SRC/sspevd.f index 0872e95acd..bc980c336d 100644 --- a/SRC/sspevd.f +++ b/SRC/sspevd.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hpevd * * ===================================================================== SUBROUTINE SSPEVD( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, LWORK, diff --git a/SRC/sspevx.f b/SRC/sspevx.f index 6d60ed7aca..10b15aa73f 100644 --- a/SRC/sspevx.f +++ b/SRC/sspevx.f @@ -225,7 +225,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hpevx * * ===================================================================== SUBROUTINE SSPEVX( JOBZ, RANGE, UPLO, N, AP, VL, VU, IL, IU, diff --git a/SRC/sspgst.f b/SRC/sspgst.f index 5e2e873c68..653ef63a18 100644 --- a/SRC/sspgst.f +++ b/SRC/sspgst.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hpgst * * ===================================================================== SUBROUTINE SSPGST( ITYPE, UPLO, N, AP, BP, INFO ) diff --git a/SRC/sspgv.f b/SRC/sspgv.f index e8bc66e5d3..762a4a6c6a 100644 --- a/SRC/sspgv.f +++ b/SRC/sspgv.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hpgv * * ===================================================================== SUBROUTINE SSPGV( ITYPE, JOBZ, UPLO, N, AP, BP, W, Z, LDZ, WORK, diff --git a/SRC/sspgvd.f b/SRC/sspgvd.f index 1a88365f2a..bc56d31efd 100644 --- a/SRC/sspgvd.f +++ b/SRC/sspgvd.f @@ -191,7 +191,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hpgvd * *> \par Contributors: * ================== diff --git a/SRC/sspgvx.f b/SRC/sspgvx.f index 6d5b4ed3dd..8a1148262e 100644 --- a/SRC/sspgvx.f +++ b/SRC/sspgvx.f @@ -258,7 +258,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup hpgvx * *> \par Contributors: * ================== diff --git a/SRC/ssprfs.f b/SRC/ssprfs.f index 6f105bb13a..9299f37ff4 100644 --- a/SRC/ssprfs.f +++ b/SRC/ssprfs.f @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hprfs * * ===================================================================== SUBROUTINE SSPRFS( UPLO, N, NRHS, AP, AFP, IPIV, B, LDB, X, LDX, diff --git a/SRC/sspsv.f b/SRC/sspsv.f index 7feafd35b0..f298c1967b 100644 --- a/SRC/sspsv.f +++ b/SRC/sspsv.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERsolve +*> \ingroup hpsv * *> \par Further Details: * ===================== diff --git a/SRC/sspsvx.f b/SRC/sspsvx.f index 3a24bc023e..79f26aa8de 100644 --- a/SRC/sspsvx.f +++ b/SRC/sspsvx.f @@ -248,7 +248,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERsolve +*> \ingroup hpsvx * *> \par Further Details: * ===================== diff --git a/SRC/ssptrd.f b/SRC/ssptrd.f index e9c104f281..214d23760b 100644 --- a/SRC/ssptrd.f +++ b/SRC/ssptrd.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hptrd * *> \par Further Details: * ===================== diff --git a/SRC/ssptrf.f b/SRC/ssptrf.f index 4a25e3d073..ce0ed89694 100644 --- a/SRC/ssptrf.f +++ b/SRC/ssptrf.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hptrf * *> \par Further Details: * ===================== diff --git a/SRC/ssptri.f b/SRC/ssptri.f index ce9b971b58..580a4c6a02 100644 --- a/SRC/ssptri.f +++ b/SRC/ssptri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hptri * * ===================================================================== SUBROUTINE SSPTRI( UPLO, N, AP, IPIV, WORK, INFO ) diff --git a/SRC/ssptrs.f b/SRC/ssptrs.f index 9a25ec9f6c..0b455c0c19 100644 --- a/SRC/ssptrs.f +++ b/SRC/ssptrs.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup hptrs * * ===================================================================== SUBROUTINE SSPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) diff --git a/SRC/sstebz.f b/SRC/sstebz.f index 13e7cde43c..0136a5aaa0 100644 --- a/SRC/sstebz.f +++ b/SRC/sstebz.f @@ -264,7 +264,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup stebz * * ===================================================================== SUBROUTINE SSTEBZ( RANGE, ORDER, N, VL, VU, IL, IU, ABSTOL, D, E, diff --git a/SRC/sstedc.f b/SRC/sstedc.f index 61e3c2fda7..5d60872b90 100644 --- a/SRC/sstedc.f +++ b/SRC/sstedc.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup stedc * *> \par Contributors: * ================== diff --git a/SRC/sstegr.f b/SRC/sstegr.f index 2967a6969d..3b68957acd 100644 --- a/SRC/sstegr.f +++ b/SRC/sstegr.f @@ -249,7 +249,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup stegr * *> \par Contributors: * ================== diff --git a/SRC/sstein.f b/SRC/sstein.f index d944c0b112..d237bb49d1 100644 --- a/SRC/sstein.f +++ b/SRC/sstein.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup stein * * ===================================================================== SUBROUTINE SSTEIN( N, D, E, M, W, IBLOCK, ISPLIT, Z, LDZ, WORK, diff --git a/SRC/sstemr.f b/SRC/sstemr.f index 3a9bbe7846..06491ca3da 100644 --- a/SRC/sstemr.f +++ b/SRC/sstemr.f @@ -303,7 +303,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup stemr * *> \par Contributors: * ================== diff --git a/SRC/ssteqr.f b/SRC/ssteqr.f index 364428a0c7..643bac632a 100644 --- a/SRC/ssteqr.f +++ b/SRC/ssteqr.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup steqr * * ===================================================================== SUBROUTINE SSTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/ssterf.f b/SRC/ssterf.f index ec038207fd..7b386cfd75 100644 --- a/SRC/ssterf.f +++ b/SRC/ssterf.f @@ -79,7 +79,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup auxOTHERcomputational +*> \ingroup sterf * * ===================================================================== SUBROUTINE SSTERF( N, D, E, INFO ) diff --git a/SRC/sstev.f b/SRC/sstev.f index 8742b85384..3cd17ab21b 100644 --- a/SRC/sstev.f +++ b/SRC/sstev.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup stev * * ===================================================================== SUBROUTINE SSTEV( JOBZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/sstevd.f b/SRC/sstevd.f index 218af8c768..eea729d6ac 100644 --- a/SRC/sstevd.f +++ b/SRC/sstevd.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup stevd * * ===================================================================== SUBROUTINE SSTEVD( JOBZ, N, D, E, Z, LDZ, WORK, LWORK, IWORK, diff --git a/SRC/sstevr.f b/SRC/sstevr.f index 2ab63eb3e9..8363e6ffdf 100644 --- a/SRC/sstevr.f +++ b/SRC/sstevr.f @@ -287,7 +287,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup stevr * *> \par Contributors: * ================== diff --git a/SRC/sstevx.f b/SRC/sstevx.f index 6d8c8e5cab..1157a2cc2d 100644 --- a/SRC/sstevx.f +++ b/SRC/sstevx.f @@ -219,7 +219,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHEReigen +*> \ingroup stevx * * ===================================================================== SUBROUTINE SSTEVX( JOBZ, RANGE, N, D, E, VL, VU, IL, IU, ABSTOL, diff --git a/SRC/ssycon.f b/SRC/ssycon.f index 4ce23a2140..6ccabc5fca 100644 --- a/SRC/ssycon.f +++ b/SRC/ssycon.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hecon * * ===================================================================== SUBROUTINE SSYCON( UPLO, N, A, LDA, IPIV, ANORM, RCOND, WORK, diff --git a/SRC/ssycon_3.f b/SRC/ssycon_3.f index 9f36645d76..b17157a5a2 100644 --- a/SRC/ssycon_3.f +++ b/SRC/ssycon_3.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup hecon_3 * *> \par Contributors: * ================== diff --git a/SRC/ssycon_rook.f b/SRC/ssycon_rook.f index c67b35dbc1..71ef5b3d43 100644 --- a/SRC/ssycon_rook.f +++ b/SRC/ssycon_rook.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hecon_rook * *> \par Contributors: * ================== diff --git a/SRC/ssyconv.f b/SRC/ssyconv.f index 8b772f1f73..809a108620 100644 --- a/SRC/ssyconv.f +++ b/SRC/ssyconv.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup syconv * * ===================================================================== SUBROUTINE SSYCONV( UPLO, WAY, N, A, LDA, IPIV, E, INFO ) diff --git a/SRC/ssyconvf.f b/SRC/ssyconvf.f index af55da51a0..8847438551 100644 --- a/SRC/ssyconvf.f +++ b/SRC/ssyconvf.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup syconvf * *> \par Contributors: * ================== diff --git a/SRC/ssyconvf_rook.f b/SRC/ssyconvf_rook.f index efd7c57fec..f83acf5a08 100644 --- a/SRC/ssyconvf_rook.f +++ b/SRC/ssyconvf_rook.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup syconvf_rook * *> \par Contributors: * ================== diff --git a/SRC/ssyequb.f b/SRC/ssyequb.f index c6efb751b6..9f26062443 100644 --- a/SRC/ssyequb.f +++ b/SRC/ssyequb.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup heequb * *> \par References: * ================ diff --git a/SRC/ssyev.f b/SRC/ssyev.f index 03ed326b84..e2bba66e04 100644 --- a/SRC/ssyev.f +++ b/SRC/ssyev.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup heev * * ===================================================================== SUBROUTINE SSYEV( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, INFO ) diff --git a/SRC/ssyev_2stage.f b/SRC/ssyev_2stage.f index a6fa30cc81..b6701ff4f4 100644 --- a/SRC/ssyev_2stage.f +++ b/SRC/ssyev_2stage.f @@ -20,7 +20,7 @@ * Definition: * =========== * -* SUBROUTINE SSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, +* SUBROUTINE SSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, * INFO ) * * IMPLICIT NONE @@ -105,12 +105,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 2*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 2*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -143,7 +143,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup heev_2stage * *> \par Further Details: * ===================== @@ -161,7 +161,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -169,16 +169,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * * ===================================================================== - SUBROUTINE SSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, + SUBROUTINE SSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, $ INFO ) * IMPLICIT NONE @@ -305,7 +305,7 @@ SUBROUTINE SSYEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, LLWORK = LWORK - INDWRK + 1 * CALL SSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK( INDE ), - $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, + $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call SSTERF. For eigenvectors, first call diff --git a/SRC/ssyevd.f b/SRC/ssyevd.f index ee0e33384e..ff9171571b 100644 --- a/SRC/ssyevd.f +++ b/SRC/ssyevd.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup heevd * *> \par Contributors: * ================== diff --git a/SRC/ssyevd_2stage.f b/SRC/ssyevd_2stage.f index e63e280a79..061da79bd4 100644 --- a/SRC/ssyevd_2stage.f +++ b/SRC/ssyevd_2stage.f @@ -113,8 +113,8 @@ *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 2*N+1 -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 2*N+1 *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup heevd_2stage * *> \par Contributors: * ================== @@ -199,7 +199,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -207,11 +207,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -365,7 +365,7 @@ SUBROUTINE SSYEVD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, LLWRK2 = LWORK - INDWK2 + 1 * CALL SSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK( INDE ), - $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, + $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call SSTERF. For eigenvectors, first call diff --git a/SRC/ssyevr.f b/SRC/ssyevr.f index d8e4ce3ea6..ec987c9b7d 100644 --- a/SRC/ssyevr.f +++ b/SRC/ssyevr.f @@ -317,7 +317,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup heevr * *> \par Contributors: * ================== diff --git a/SRC/ssyevr_2stage.f b/SRC/ssyevr_2stage.f index 8ab2844c65..a04d0a1716 100644 --- a/SRC/ssyevr_2stage.f +++ b/SRC/ssyevr_2stage.f @@ -263,7 +263,7 @@ *> indicating the nonzero elements in Z. The i-th eigenvector *> is nonzero only in elements ISUPPZ( 2*i-1 ) through *> ISUPPZ( 2*i ). This is an output of SSTEMR (tridiagonal -*> matrix). The support of the eigenvectors of A is typically +*> matrix). The support of the eigenvectors of A is typically *> 1:N because of the orthogonal transformations applied by SORMTR. *> Implemented only for RANGE = 'A' or 'I' and IU - IL = N - 1 *> \endverbatim @@ -277,12 +277,12 @@ *> \param[in] LWORK *> \verbatim *> LWORK is INTEGER -*> The dimension of the array WORK. +*> The dimension of the array WORK. *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 26*N, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 5*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 5*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -330,7 +330,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup heevr_2stage * *> \par Contributors: * ================== @@ -358,7 +358,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -366,11 +366,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -608,7 +608,7 @@ SUBROUTINE SSYEVR_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, * Call SSYTRD_2STAGE to reduce symmetric matrix to tridiagonal form. * * - CALL SSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, WORK( INDD ), + CALL SSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, WORK( INDD ), $ WORK( INDE ), WORK( INDTAU ), WORK( INDHOUS ), $ LHTRD, WORK( INDWK ), LLWORK, IINFO ) * diff --git a/SRC/ssyevx.f b/SRC/ssyevx.f index 11776e8c55..aaab9859f3 100644 --- a/SRC/ssyevx.f +++ b/SRC/ssyevx.f @@ -244,7 +244,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup heevx * * ===================================================================== SUBROUTINE SSYEVX( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, IL, IU, diff --git a/SRC/ssyevx_2stage.f b/SRC/ssyevx_2stage.f index 1a2225c875..407de74dc6 100644 --- a/SRC/ssyevx_2stage.f +++ b/SRC/ssyevx_2stage.f @@ -208,12 +208,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 8*N, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 3*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 3*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -259,7 +259,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup heevx_2stage * *> \par Further Details: * ===================== @@ -277,7 +277,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -285,11 +285,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -487,7 +487,7 @@ SUBROUTINE SSYEVX_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, INDWRK = INDHOUS + LHTRD LLWORK = LWORK - INDWRK + 1 * - CALL SSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, WORK( INDD ), + CALL SSYTRD_2STAGE( JOBZ, UPLO, N, A, LDA, WORK( INDD ), $ WORK( INDE ), WORK( INDTAU ), WORK( INDHOUS ), $ LHTRD, WORK( INDWRK ), LLWORK, IINFO ) * diff --git a/SRC/ssygs2.f b/SRC/ssygs2.f index b27b473b06..2d3d8c13d3 100644 --- a/SRC/ssygs2.f +++ b/SRC/ssygs2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hegs2 * * ===================================================================== SUBROUTINE SSYGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) diff --git a/SRC/ssygst.f b/SRC/ssygst.f index a517a8c124..aaf66bf665 100644 --- a/SRC/ssygst.f +++ b/SRC/ssygst.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hegst * * ===================================================================== SUBROUTINE SSYGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) diff --git a/SRC/ssygv.f b/SRC/ssygv.f index f39947d92b..028d0712f2 100644 --- a/SRC/ssygv.f +++ b/SRC/ssygv.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup hegv * * ===================================================================== SUBROUTINE SSYGV( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, WORK, diff --git a/SRC/ssygv_2stage.f b/SRC/ssygv_2stage.f index 3d9a44b5e8..887681c47c 100644 --- a/SRC/ssygv_2stage.f +++ b/SRC/ssygv_2stage.f @@ -143,12 +143,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + 2*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + 2*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -186,7 +186,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup hegv_2stage * *> \par Further Details: * ===================== @@ -204,7 +204,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -212,11 +212,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * diff --git a/SRC/ssygvd.f b/SRC/ssygvd.f index 3c8bd2a0ec..4180093aff 100644 --- a/SRC/ssygvd.f +++ b/SRC/ssygvd.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup hegvd * *> \par Further Details: * ===================== diff --git a/SRC/ssygvx.f b/SRC/ssygvx.f index 344075c9fb..b90b4a9d2e 100644 --- a/SRC/ssygvx.f +++ b/SRC/ssygvx.f @@ -283,7 +283,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYeigen +*> \ingroup hegvx * *> \par Contributors: * ================== diff --git a/SRC/ssyrfs.f b/SRC/ssyrfs.f index 77ffdb94d5..ae5ba06c7b 100644 --- a/SRC/ssyrfs.f +++ b/SRC/ssyrfs.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup herfs * * ===================================================================== SUBROUTINE SSYRFS( UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/ssyrfsx.f b/SRC/ssyrfsx.f index 43215902fb..b580ce6a13 100644 --- a/SRC/ssyrfsx.f +++ b/SRC/ssyrfsx.f @@ -392,7 +392,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup herfsx * * ===================================================================== SUBROUTINE SSYRFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/ssysv.f b/SRC/ssysv.f index 06a42dfb75..e18265a2f3 100644 --- a/SRC/ssysv.f +++ b/SRC/ssysv.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYsolve +*> \ingroup hesv * * ===================================================================== SUBROUTINE SSYSV( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/ssysv_aa.f b/SRC/ssysv_aa.f index 5661332c5f..96c4451bc8 100644 --- a/SRC/ssysv_aa.f +++ b/SRC/ssysv_aa.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYsolve +*> \ingroup hesv_aa * * ===================================================================== SUBROUTINE SSYSV_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/ssysv_aa_2stage.f b/SRC/ssysv_aa_2stage.f index aa862f14b0..0ce02cdccc 100644 --- a/SRC/ssysv_aa_2stage.f +++ b/SRC/ssysv_aa_2stage.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYsolve +*> \ingroup hesv_aa_2stage * * ===================================================================== SUBROUTINE SSYSV_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/ssysv_rk.f b/SRC/ssysv_rk.f index 9a7dfa4bb7..daf0ab7544 100644 --- a/SRC/ssysv_rk.f +++ b/SRC/ssysv_rk.f @@ -205,7 +205,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYsolve +*> \ingroup hesv_rk * *> \par Contributors: * ================== diff --git a/SRC/ssysv_rook.f b/SRC/ssysv_rook.f index fb7ba8c53f..4b9c9fa874 100644 --- a/SRC/ssysv_rook.f +++ b/SRC/ssysv_rook.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYsolve +*> \ingroup hesv_rook * *> \par Contributors: * ================== diff --git a/SRC/ssysvx.f b/SRC/ssysvx.f index b19ce26417..ea3fa44fb0 100644 --- a/SRC/ssysvx.f +++ b/SRC/ssysvx.f @@ -275,7 +275,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYsolve +*> \ingroup hesvx * * ===================================================================== SUBROUTINE SSYSVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, diff --git a/SRC/ssysvxx.f b/SRC/ssysvxx.f index e0a869e816..0786257212 100644 --- a/SRC/ssysvxx.f +++ b/SRC/ssysvxx.f @@ -498,7 +498,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYsolve +*> \ingroup hesvxx * * ===================================================================== SUBROUTINE SSYSVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/ssyswapr.f b/SRC/ssyswapr.f index e1ab5a22ac..5d2b15a15c 100644 --- a/SRC/ssyswapr.f +++ b/SRC/ssyswapr.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYauxiliary +*> \ingroup heswapr * * ===================================================================== SUBROUTINE SSYSWAPR( UPLO, N, A, LDA, I1, I2) diff --git a/SRC/ssytd2.f b/SRC/ssytd2.f index 8d5b3858fc..8972430acf 100644 --- a/SRC/ssytd2.f +++ b/SRC/ssytd2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetd2 * *> \par Further Details: * ===================== diff --git a/SRC/ssytf2.f b/SRC/ssytf2.f index 1e8087996d..939a6d15ac 100644 --- a/SRC/ssytf2.f +++ b/SRC/ssytf2.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetf2 * *> \par Further Details: * ===================== diff --git a/SRC/ssytf2_rk.f b/SRC/ssytf2_rk.f index 51130acd37..3806cfda67 100644 --- a/SRC/ssytf2_rk.f +++ b/SRC/ssytf2_rk.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup hetf2_rk * *> \par Further Details: * ===================== diff --git a/SRC/ssytf2_rook.f b/SRC/ssytf2_rook.f index 34dc12c732..7643e168ac 100644 --- a/SRC/ssytf2_rook.f +++ b/SRC/ssytf2_rook.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetf2_rook * *> \par Further Details: * ===================== diff --git a/SRC/ssytrd.f b/SRC/ssytrd.f index f09ad9ab4d..04b3ab0f6a 100644 --- a/SRC/ssytrd.f +++ b/SRC/ssytrd.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrd * *> \par Further Details: * ===================== diff --git a/SRC/ssytrd_2stage.f b/SRC/ssytrd_2stage.f index 5d70ae0d4a..b85c647ce0 100644 --- a/SRC/ssytrd_2stage.f +++ b/SRC/ssytrd_2stage.f @@ -4,23 +4,23 @@ * * =========== DOCUMENTATION =========== * -* Online html documentation available at -* http://www.netlib.org/lapack/explore-html/ +* Online html documentation available at +* http://www.netlib.org/lapack/explore-html/ * *> \htmlonly -*> Download SSYTRD_2STAGE + dependencies -*> -*> [TGZ] -*> -*> [ZIP] -*> +*> Download SSYTRD_2STAGE + dependencies +*> +*> [TGZ] +*> +*> [ZIP] +*> *> [TXT] -*> \endhtmlonly +*> \endhtmlonly * * Definition: * =========== * -* SUBROUTINE SSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, +* SUBROUTINE SSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, * HOUS2, LHOUS2, WORK, LWORK, INFO ) * * IMPLICIT NONE @@ -34,7 +34,7 @@ * REAL A( LDA, * ), TAU( * ), * HOUS2( * ), WORK( * ) * .. -* +* * *> \par Purpose: * ============= @@ -52,11 +52,11 @@ *> \param[in] VECT *> \verbatim *> VECT is CHARACTER*1 -*> = 'N': No need for the Housholder representation, +*> = 'N': No need for the Housholder representation, *> in particular for the second stage (Band to *> tridiagonal) and thus LHOUS2 is of size max(1, 4*N); -*> = 'V': the Householder representation is needed to -*> either generate Q1 Q2 or to apply Q1 Q2, +*> = 'V': the Householder representation is needed to +*> either generate Q1 Q2 or to apply Q1 Q2, *> then LHOUS2 is to be queried and computed. *> (NOT AVAILABLE IN THIS RELEASE). *> \endverbatim @@ -86,7 +86,7 @@ *> triangular part of A is not referenced. *> On exit, if UPLO = 'U', the band superdiagonal *> of A are overwritten by the corresponding elements of the -*> internal band-diagonal matrix AB, and the elements above +*> internal band-diagonal matrix AB, and the elements above *> the KD superdiagonal, with the array TAU, represent the orthogonal *> matrix Q1 as a product of elementary reflectors; if UPLO *> = 'L', the diagonal and band subdiagonal of A are over- @@ -117,7 +117,7 @@ *> \param[out] TAU *> \verbatim *> TAU is REAL array, dimension (N-KD) -*> The scalar factors of the elementary reflectors of +*> The scalar factors of the elementary reflectors of *> the first stage (see Further Details). *> \endverbatim *> @@ -157,9 +157,9 @@ *> message related to LWORK is issued by XERBLA. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) -*> + (KD+1)*N +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) +*> + (KD+1)*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ *> algorithm, usually FACTOPTNB=128 is a good choice @@ -177,12 +177,12 @@ * Authors: * ======== * -*> \author Univ. of Tennessee -*> \author Univ. of California Berkeley -*> \author Univ. of Colorado Denver -*> \author NAG Ltd. +*> \author Univ. of Tennessee +*> \author Univ. of California Berkeley +*> \author Univ. of Colorado Denver +*> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrd_2stage * *> \par Further Details: * ===================== @@ -202,7 +202,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -210,16 +210,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - SUBROUTINE SSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, + SUBROUTINE SSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, $ HOUS2, LHOUS2, WORK, LWORK, INFO ) * IMPLICIT NONE @@ -309,14 +309,14 @@ SUBROUTINE SSYTRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, LWRK = LWORK-LDAB*N ABPOS = 1 WPOS = ABPOS + LDAB*N - CALL SSYTRD_SY2SB( UPLO, N, KD, A, LDA, WORK( ABPOS ), LDAB, + CALL SSYTRD_SY2SB( UPLO, N, KD, A, LDA, WORK( ABPOS ), LDAB, $ TAU, WORK( WPOS ), LWRK, INFO ) IF( INFO.NE.0 ) THEN CALL XERBLA( 'SSYTRD_SY2SB', -INFO ) RETURN END IF - CALL SSYTRD_SB2ST( 'Y', VECT, UPLO, N, KD, - $ WORK( ABPOS ), LDAB, D, E, + CALL SSYTRD_SB2ST( 'Y', VECT, UPLO, N, KD, + $ WORK( ABPOS ), LDAB, D, E, $ HOUS2, LHOUS2, WORK( WPOS ), LWRK, INFO ) IF( INFO.NE.0 ) THEN CALL XERBLA( 'SSYTRD_SB2ST', -INFO ) diff --git a/SRC/ssytrd_sb2st.F b/SRC/ssytrd_sb2st.F index b8386670a4..7bb61f2cc8 100644 --- a/SRC/ssytrd_sb2st.F +++ b/SRC/ssytrd_sb2st.F @@ -18,7 +18,7 @@ * Definition: * =========== * -* SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, +* SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * D, E, HOUS, LHOUS, WORK, LWORK, INFO ) * * #if defined(_OPENMP) @@ -53,12 +53,12 @@ *> \param[in] STAGE1 *> \verbatim *> STAGE1 is CHARACTER*1 -*> = 'N': "No": to mention that the stage 1 of the reduction +*> = 'N': "No": to mention that the stage 1 of the reduction *> from dense to band using the ssytrd_sy2sb routine -*> was not called before this routine to reproduce AB. -*> In other term this routine is called as standalone. -*> = 'Y': "Yes": to mention that the stage 1 of the -*> reduction from dense to band using the ssytrd_sy2sb +*> was not called before this routine to reproduce AB. +*> In other term this routine is called as standalone. +*> = 'Y': "Yes": to mention that the stage 1 of the +*> reduction from dense to band using the ssytrd_sy2sb *> routine has been called to produce AB (e.g., AB is *> the output of ssytrd_sy2sb. *> \endverbatim @@ -66,10 +66,10 @@ *> \param[in] VECT *> \verbatim *> VECT is CHARACTER*1 -*> = 'N': No need for the Housholder representation, +*> = 'N': No need for the Housholder representation, *> and thus LHOUS is of size max(1, 4*N); -*> = 'V': the Householder representation is needed to -*> either generate or to apply Q later on, +*> = 'V': the Householder representation is needed to +*> either generate or to apply Q later on, *> then LHOUS is to be queried and computed. *> (NOT AVAILABLE IN THIS RELEASE). *> \endverbatim @@ -147,7 +147,7 @@ *> message related to LHOUS is issued by XERBLA. *> LHOUS = MAX(1, dimension) where *> dimension = 4*N if VECT='N' -*> not available now if VECT='H' +*> not available now if VECT='H' *> \endverbatim *> *> \param[out] WORK @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup real16OTHERcomputational +*> \ingroup hetrd_hb2st * *> \par Further Details: * ===================== @@ -208,7 +208,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -216,16 +216,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, + SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, $ D, E, HOUS, LHOUS, WORK, LWORK, INFO ) * #if defined(_OPENMP) @@ -258,11 +258,11 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * .. * .. Local Scalars .. LOGICAL LQUERY, WANTQ, UPPER, AFTERS1 - INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST, + INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST, $ ED, STIND, EDIND, BLKLASTIND, COLPT, THED, $ STEPERCOL, GRSIZ, THGRSIZ, THGRNB, THGRID, $ NBTILES, TTYPE, TID, NTHREADS, DEBUG, - $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS, + $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS, $ INDA, INDW, APOS, SIZEA, LDA, INDV, INDTAU, $ SISEV, SIZETAU, LDV, LHMIN, LWMIN * .. @@ -274,7 +274,7 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * .. * .. External Functions .. LOGICAL LSAME - INTEGER ILAENV2STAGE + INTEGER ILAENV2STAGE EXTERNAL LSAME, ILAENV2STAGE * .. * .. Executable Statements .. @@ -355,7 +355,7 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ABDPOS = KD + 1 ABOFDPOS = KD ELSE - APOS = INDA + APOS = INDA AWPOS = INDA + KD + 1 DPOS = APOS OFDPOS = DPOS + 1 @@ -363,11 +363,11 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ABOFDPOS = 2 ENDIF -* -* Case KD=0: -* The matrix is diagonal. We just copy it (convert to "real" for -* real because D is double and the imaginary part should be 0) -* and store it in D. A sequential code here is better or +* +* Case KD=0: +* The matrix is diagonal. We just copy it (convert to "real" for +* real because D is double and the imaginary part should be 0) +* and store it in D. A sequential code here is better or * in a parallel environment it might need two cores for D and E * IF( KD.EQ.0 ) THEN @@ -382,17 +382,17 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, WORK( 1 ) = 1 RETURN END IF -* -* Case KD=1: -* The matrix is already Tridiagonal. We have to make diagonal +* +* Case KD=1: +* The matrix is already Tridiagonal. We have to make diagonal * and offdiagonal elements real, and store them in D and E. -* For that, for real precision just copy the diag and offdiag -* to D and E while for the COMPLEX case the bulge chasing is -* performed to convert the hermetian tridiagonal to symmetric -* tridiagonal. A simpler conversion formula might be used, but then +* For that, for real precision just copy the diag and offdiag +* to D and E while for the COMPLEX case the bulge chasing is +* performed to convert the hermetian tridiagonal to symmetric +* tridiagonal. A simpler conversion formula might be used, but then * updating the Q matrix will be required and based if Q is generated -* or not this might complicate the story. -* +* or not this might complicate the story. +* IF( KD.EQ.1 ) THEN DO 50 I = 1, N D( I ) = ( AB( ABDPOS, I ) ) @@ -413,7 +413,7 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, RETURN END IF * -* Main code start here. +* Main code start here. * Reduce the symmetric band of A to a tridiagonal matrix. * THGRSIZ = N @@ -422,7 +422,7 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, NBTILES = CEILING( REAL(N)/REAL(KD) ) STEPERCOL = CEILING( REAL(SHIFT)/REAL(GRSIZ) ) THGRNB = CEILING( REAL(N-1)/REAL(THGRSIZ) ) -* +* CALL SLACPY( "A", KD+1, N, AB, LDAB, WORK( APOS ), LDA ) CALL SLASET( "A", KD, N, ZERO, ZERO, WORK( AWPOS ), LDA ) * @@ -431,7 +431,7 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * #if defined(_OPENMP) !$OMP PARALLEL PRIVATE( TID, THGRID, BLKLASTIND ) -!$OMP$ PRIVATE( THED, I, M, K, ST, ED, STT, SWEEPID ) +!$OMP$ PRIVATE( THED, I, M, K, ST, ED, STT, SWEEPID ) !$OMP$ PRIVATE( MYID, TTYPE, COLPT, STIND, EDIND ) !$OMP$ SHARED ( UPLO, WANTQ, INDV, INDTAU, HOUS, WORK) !$OMP$ SHARED ( N, KD, IB, NBTILES, LDA, LDV, INDA ) @@ -440,7 +440,7 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, #endif * * main bulge chasing loop -* +* DO 100 THGRID = 1, THGRNB STT = (THGRID-1)*THGRSIZ+1 THED = MIN( (STT + THGRSIZ -1), (N-1)) @@ -451,7 +451,7 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ST = STT DO 130 SWEEPID = ST, ED DO 140 K = 1, GRSIZ - MYID = (I-SWEEPID)*(STEPERCOL*GRSIZ) + MYID = (I-SWEEPID)*(STEPERCOL*GRSIZ) $ + (M-1)*GRSIZ + K IF ( MYID.EQ.1 ) THEN TTYPE = 1 @@ -477,16 +477,16 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ENDIF * * Call the kernel -* +* #if defined(_OPENMP) && _OPENMP >= 201307 - IF( TTYPE.NE.1 ) THEN + IF( TTYPE.NE.1 ) THEN !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1)) !$OMP$ DEPEND(in:WORK(MYID-1)) !$OMP$ DEPEND(out:WORK(MYID)) TID = OMP_GET_THREAD_NUM() - CALL SSB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL SSB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW + TID*KD ) ) !$OMP END TASK @@ -494,20 +494,20 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1)) !$OMP$ DEPEND(out:WORK(MYID)) TID = OMP_GET_THREAD_NUM() - CALL SSB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL SSB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW + TID*KD ) ) !$OMP END TASK ENDIF #else - CALL SSB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL SSB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW ) ) -#endif +#endif IF ( BLKLASTIND.GE.(N-1) ) THEN STT = STT + 1 EXIT @@ -522,14 +522,14 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, !$OMP END MASTER !$OMP END PARALLEL #endif -* +* * Copy the diagonal from A to D. Note that D is REAL thus only * the Real part is needed, the imaginary part should be zero. * DO 150 I = 1, N D( I ) = ( WORK( DPOS+(I-1)*LDA ) ) 150 CONTINUE -* +* * Copy the off diagonal from A to E. Note that E is REAL thus only * the Real part is needed, the imaginary part should be zero. * @@ -550,4 +550,4 @@ SUBROUTINE SSYTRD_SB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * End of SSYTRD_SB2ST * END - + diff --git a/SRC/ssytrd_sy2sb.f b/SRC/ssytrd_sy2sb.f index 2c92cd14a8..36f0363aca 100644 --- a/SRC/ssytrd_sy2sb.f +++ b/SRC/ssytrd_sy2sb.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrd_he2hb * *> \par Further Details: * ===================== diff --git a/SRC/ssytrf.f b/SRC/ssytrf.f index d188589b90..642458773b 100644 --- a/SRC/ssytrf.f +++ b/SRC/ssytrf.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrf * *> \par Further Details: * ===================== diff --git a/SRC/ssytrf_aa.f b/SRC/ssytrf_aa.f index 4ba026fc8a..f7739b8afa 100644 --- a/SRC/ssytrf_aa.f +++ b/SRC/ssytrf_aa.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrf_aa * * ===================================================================== SUBROUTINE SSYTRF_AA( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO) diff --git a/SRC/ssytrf_aa_2stage.f b/SRC/ssytrf_aa_2stage.f index 07357f2ab3..8606553774 100644 --- a/SRC/ssytrf_aa_2stage.f +++ b/SRC/ssytrf_aa_2stage.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrf_aa_2stage * * ===================================================================== SUBROUTINE SSYTRF_AA_2STAGE( UPLO, N, A, LDA, TB, LTB, IPIV, diff --git a/SRC/ssytrf_rk.f b/SRC/ssytrf_rk.f index ec84fcb1b9..ad71bd9113 100644 --- a/SRC/ssytrf_rk.f +++ b/SRC/ssytrf_rk.f @@ -229,7 +229,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup hetrf_rk * *> \par Further Details: * ===================== diff --git a/SRC/ssytrf_rook.f b/SRC/ssytrf_rook.f index 653289e2b5..e1c9def403 100644 --- a/SRC/ssytrf_rook.f +++ b/SRC/ssytrf_rook.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrf_rook * *> \par Further Details: * ===================== diff --git a/SRC/ssytri.f b/SRC/ssytri.f index d02f3afaf6..1137a537e5 100644 --- a/SRC/ssytri.f +++ b/SRC/ssytri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetri * * ===================================================================== SUBROUTINE SSYTRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) diff --git a/SRC/ssytri2.f b/SRC/ssytri2.f index 49f6cad652..caa0abb15b 100644 --- a/SRC/ssytri2.f +++ b/SRC/ssytri2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetri2 * * ===================================================================== SUBROUTINE SSYTRI2( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/ssytri2x.f b/SRC/ssytri2x.f index 57672eec22..fe9cbc7869 100644 --- a/SRC/ssytri2x.f +++ b/SRC/ssytri2x.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetri2x * * ===================================================================== SUBROUTINE SSYTRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) diff --git a/SRC/ssytri_3.f b/SRC/ssytri_3.f index 58d5df92ae..062f2dc37b 100644 --- a/SRC/ssytri_3.f +++ b/SRC/ssytri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup hetri_3 * *> \par Contributors: * ================== diff --git a/SRC/ssytri_3x.f b/SRC/ssytri_3x.f index 330b832974..f02ce8b80d 100644 --- a/SRC/ssytri_3x.f +++ b/SRC/ssytri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup hetri_3x * *> \par Contributors: * ================== diff --git a/SRC/ssytri_rook.f b/SRC/ssytri_rook.f index d78fe73071..40de33e960 100644 --- a/SRC/ssytri_rook.f +++ b/SRC/ssytri_rook.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetri_rook * *> \par Contributors: * ================== diff --git a/SRC/ssytrs.f b/SRC/ssytrs.f index 344949a99d..ee8b9de0ff 100644 --- a/SRC/ssytrs.f +++ b/SRC/ssytrs.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrs * * ===================================================================== SUBROUTINE SSYTRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/ssytrs2.f b/SRC/ssytrs2.f index c8346d83be..26ed9fd4f9 100644 --- a/SRC/ssytrs2.f +++ b/SRC/ssytrs2.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrs2 * * ===================================================================== SUBROUTINE SSYTRS2( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/ssytrs_3.f b/SRC/ssytrs_3.f index 9ad5813360..48e23925d7 100644 --- a/SRC/ssytrs_3.f +++ b/SRC/ssytrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singleSYcomputational +*> \ingroup hetrs_3 * *> \par Contributors: * ================== diff --git a/SRC/ssytrs_aa.f b/SRC/ssytrs_aa.f index 3cfa2a2068..8c8aca2079 100644 --- a/SRC/ssytrs_aa.f +++ b/SRC/ssytrs_aa.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrs_aa * * ===================================================================== SUBROUTINE SSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/ssytrs_aa_2stage.f b/SRC/ssytrs_aa_2stage.f index 12912bc315..d5db097ef7 100644 --- a/SRC/ssytrs_aa_2stage.f +++ b/SRC/ssytrs_aa_2stage.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrs_aa_2stage * * ===================================================================== SUBROUTINE SSYTRS_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/ssytrs_rook.f b/SRC/ssytrs_rook.f index eabc84f44e..9bb41a6e59 100644 --- a/SRC/ssytrs_rook.f +++ b/SRC/ssytrs_rook.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup hetrs_rook * *> \par Contributors: * ================== diff --git a/SRC/stbcon.f b/SRC/stbcon.f index 9ce694aa1e..41b4b9ae03 100644 --- a/SRC/stbcon.f +++ b/SRC/stbcon.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tbcon * * ===================================================================== SUBROUTINE STBCON( NORM, UPLO, DIAG, N, KD, AB, LDAB, RCOND, WORK, diff --git a/SRC/stbrfs.f b/SRC/stbrfs.f index 6ccb35e391..5ef22438ef 100644 --- a/SRC/stbrfs.f +++ b/SRC/stbrfs.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tbrfs * * ===================================================================== SUBROUTINE STBRFS( UPLO, TRANS, DIAG, N, KD, NRHS, AB, LDAB, B, diff --git a/SRC/stbtrs.f b/SRC/stbtrs.f index 30219e7039..7692cde6eb 100644 --- a/SRC/stbtrs.f +++ b/SRC/stbtrs.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tbtrs * * ===================================================================== SUBROUTINE STBTRS( UPLO, TRANS, DIAG, N, KD, NRHS, AB, LDAB, B, diff --git a/SRC/stfsm.f b/SRC/stfsm.f index fd4e2df808..7a5201a89b 100644 --- a/SRC/stfsm.f +++ b/SRC/stfsm.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tfsm * *> \par Further Details: * ===================== diff --git a/SRC/stftri.f b/SRC/stftri.f index d02a85b1e2..87cb0226cc 100644 --- a/SRC/stftri.f +++ b/SRC/stftri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tftri * *> \par Further Details: * ===================== diff --git a/SRC/stfttp.f b/SRC/stfttp.f index 1ae028cedd..bfb8b8faec 100644 --- a/SRC/stfttp.f +++ b/SRC/stfttp.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tfttp * *> \par Further Details: * ===================== diff --git a/SRC/stfttr.f b/SRC/stfttr.f index 219da39cda..8f5b066d00 100644 --- a/SRC/stfttr.f +++ b/SRC/stfttr.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tfttr * *> \par Further Details: * ===================== diff --git a/SRC/stgevc.f b/SRC/stgevc.f index be4cb18296..d63bbf79d5 100644 --- a/SRC/stgevc.f +++ b/SRC/stgevc.f @@ -228,7 +228,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup tgevc * *> \par Further Details: * ===================== diff --git a/SRC/stgex2.f b/SRC/stgex2.f index d61da2327a..eebaff68a1 100644 --- a/SRC/stgex2.f +++ b/SRC/stgex2.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEauxiliary +*> \ingroup tgex2 * *> \par Further Details: * ===================== diff --git a/SRC/stgexc.f b/SRC/stgexc.f index d1ad799366..de376e7edd 100644 --- a/SRC/stgexc.f +++ b/SRC/stgexc.f @@ -195,7 +195,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realGEcomputational +*> \ingroup tgexc * *> \par Contributors: * ================== diff --git a/SRC/stgsen.f b/SRC/stgsen.f index f1103d7400..a49ccfe5cb 100644 --- a/SRC/stgsen.f +++ b/SRC/stgsen.f @@ -304,7 +304,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tgsen * *> \par Further Details: * ===================== diff --git a/SRC/stgsja.f b/SRC/stgsja.f index 5a81b7e4fd..40d2bd6344 100644 --- a/SRC/stgsja.f +++ b/SRC/stgsja.f @@ -350,7 +350,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tgsja * *> \par Further Details: * ===================== diff --git a/SRC/stgsna.f b/SRC/stgsna.f index 430f3c4b7c..6f74b4521d 100644 --- a/SRC/stgsna.f +++ b/SRC/stgsna.f @@ -230,7 +230,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tgsna * *> \par Further Details: * ===================== diff --git a/SRC/stgsy2.f b/SRC/stgsy2.f index 7dffbd2f75..87f2866fbd 100644 --- a/SRC/stgsy2.f +++ b/SRC/stgsy2.f @@ -259,7 +259,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYauxiliary +*> \ingroup tgsy2 * *> \par Contributors: * ================== diff --git a/SRC/stgsyl.f b/SRC/stgsyl.f index 733c8ab9cd..a43b823211 100644 --- a/SRC/stgsyl.f +++ b/SRC/stgsyl.f @@ -261,7 +261,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup tgsyl * *> \par Contributors: * ================== diff --git a/SRC/stpcon.f b/SRC/stpcon.f index d32e99855c..e65d9be835 100644 --- a/SRC/stpcon.f +++ b/SRC/stpcon.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tpcon * * ===================================================================== SUBROUTINE STPCON( NORM, UPLO, DIAG, N, AP, RCOND, WORK, IWORK, diff --git a/SRC/stplqt.f b/SRC/stplqt.f index 4dd0c7ca30..bee065ee0e 100644 --- a/SRC/stplqt.f +++ b/SRC/stplqt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tplqt * *> \par Further Details: * ===================== diff --git a/SRC/stplqt2.f b/SRC/stplqt2.f index 7f381876f4..a22427b379 100644 --- a/SRC/stplqt2.f +++ b/SRC/stplqt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tplqt2 * *> \par Further Details: * ===================== diff --git a/SRC/stpmlqt.f b/SRC/stpmlqt.f index 6497f42bbe..fbe5b6d771 100644 --- a/SRC/stpmlqt.f +++ b/SRC/stpmlqt.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpmlqt * *> \par Further Details: * ===================== diff --git a/SRC/stpmqrt.f b/SRC/stpmqrt.f index c9c09fd71a..1015835d30 100644 --- a/SRC/stpmqrt.f +++ b/SRC/stpmqrt.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tpmqrt * *> \par Further Details: * ===================== diff --git a/SRC/stpqrt.f b/SRC/stpqrt.f index eee0f25239..bcfa8395a8 100644 --- a/SRC/stpqrt.f +++ b/SRC/stpqrt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tpqrt * *> \par Further Details: * ===================== diff --git a/SRC/stpqrt2.f b/SRC/stpqrt2.f index 281c2e8ac2..13479ec3ba 100644 --- a/SRC/stpqrt2.f +++ b/SRC/stpqrt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tpqrt2 * *> \par Further Details: * ===================== diff --git a/SRC/stprfb.f b/SRC/stprfb.f index d91a80dfbb..97eb016366 100644 --- a/SRC/stprfb.f +++ b/SRC/stprfb.f @@ -194,7 +194,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERauxiliary +*> \ingroup tprfb * *> \par Further Details: * ===================== diff --git a/SRC/stprfs.f b/SRC/stprfs.f index efe453919e..35c1b67907 100644 --- a/SRC/stprfs.f +++ b/SRC/stprfs.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tprfs * * ===================================================================== SUBROUTINE STPRFS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, X, LDX, diff --git a/SRC/stptri.f b/SRC/stptri.f index fb889ae850..1e8e7529e0 100644 --- a/SRC/stptri.f +++ b/SRC/stptri.f @@ -91,7 +91,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tptri * *> \par Further Details: * ===================== diff --git a/SRC/stptrs.f b/SRC/stptrs.f index d4882b3b64..ef16314b48 100644 --- a/SRC/stptrs.f +++ b/SRC/stptrs.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tptrs * * ===================================================================== SUBROUTINE STPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO ) diff --git a/SRC/stpttf.f b/SRC/stpttf.f index 67d0c1f1eb..271388f0a8 100644 --- a/SRC/stpttf.f +++ b/SRC/stpttf.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tpttf * *> \par Further Details: * ===================== diff --git a/SRC/stpttr.f b/SRC/stpttr.f index 8266a5651e..0490a471bb 100644 --- a/SRC/stpttr.f +++ b/SRC/stpttr.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tpttr * * ===================================================================== SUBROUTINE STPTTR( UPLO, N, AP, A, LDA, INFO ) diff --git a/SRC/strcon.f b/SRC/strcon.f index 741f436f5d..de37691773 100644 --- a/SRC/strcon.f +++ b/SRC/strcon.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trcon * * ===================================================================== SUBROUTINE STRCON( NORM, UPLO, DIAG, N, A, LDA, RCOND, WORK, diff --git a/SRC/strevc.f b/SRC/strevc.f index f1a7064ddc..8ae96f7461 100644 --- a/SRC/strevc.f +++ b/SRC/strevc.f @@ -200,7 +200,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trevc * *> \par Further Details: * ===================== diff --git a/SRC/strevc3.f b/SRC/strevc3.f index 225a7ce975..42fc3298cd 100644 --- a/SRC/strevc3.f +++ b/SRC/strevc3.f @@ -215,7 +215,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trevc3 * *> \par Further Details: * ===================== diff --git a/SRC/strexc.f b/SRC/strexc.f index e66b892220..d4c5b61f40 100644 --- a/SRC/strexc.f +++ b/SRC/strexc.f @@ -140,7 +140,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trexc * * ===================================================================== SUBROUTINE STREXC( COMPQ, N, T, LDT, Q, LDQ, IFST, ILST, WORK, diff --git a/SRC/strrfs.f b/SRC/strrfs.f index 8ac2257ea6..91cb17b7b4 100644 --- a/SRC/strrfs.f +++ b/SRC/strrfs.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trrfs * * ===================================================================== SUBROUTINE STRRFS( UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, X, diff --git a/SRC/strsen.f b/SRC/strsen.f index c0f75fb129..b4d94629c0 100644 --- a/SRC/strsen.f +++ b/SRC/strsen.f @@ -231,7 +231,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trsen * *> \par Further Details: * ===================== diff --git a/SRC/strsna.f b/SRC/strsna.f index c915ac02c0..6e15577407 100644 --- a/SRC/strsna.f +++ b/SRC/strsna.f @@ -213,7 +213,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trsna * *> \par Further Details: * ===================== diff --git a/SRC/strsyl.f b/SRC/strsyl.f index 3df531879a..6255868958 100644 --- a/SRC/strsyl.f +++ b/SRC/strsyl.f @@ -156,7 +156,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realSYcomputational +*> \ingroup trsyl * * ===================================================================== SUBROUTINE STRSYL( TRANA, TRANB, ISGN, M, N, A, LDA, B, LDB, C, diff --git a/SRC/strti2.f b/SRC/strti2.f index e2b630deb9..03a00d7102 100644 --- a/SRC/strti2.f +++ b/SRC/strti2.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trti2 * * ===================================================================== SUBROUTINE STRTI2( UPLO, DIAG, N, A, LDA, INFO ) diff --git a/SRC/strtri.f b/SRC/strtri.f index e90872f06a..a809db5278 100644 --- a/SRC/strtri.f +++ b/SRC/strtri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trtri * * ===================================================================== SUBROUTINE STRTRI( UPLO, DIAG, N, A, LDA, INFO ) diff --git a/SRC/strtrs.f b/SRC/strtrs.f index 07bb780ee3..a31c4fcbb8 100644 --- a/SRC/strtrs.f +++ b/SRC/strtrs.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trtrs * * ===================================================================== SUBROUTINE STRTRS( UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, diff --git a/SRC/strttf.f b/SRC/strttf.f index 7ea4980a6f..9863d141b2 100644 --- a/SRC/strttf.f +++ b/SRC/strttf.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trttf * *> \par Further Details: * ===================== diff --git a/SRC/strttp.f b/SRC/strttp.f index 371d21b8f7..f27fe3b094 100644 --- a/SRC/strttp.f +++ b/SRC/strttp.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup trttp * * ===================================================================== SUBROUTINE STRTTP( UPLO, N, A, LDA, AP, INFO ) diff --git a/SRC/stzrzf.f b/SRC/stzrzf.f index e8cbb56b61..7b9723eeb5 100644 --- a/SRC/stzrzf.f +++ b/SRC/stzrzf.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup realOTHERcomputational +*> \ingroup tzrzf * *> \par Contributors: * ================== diff --git a/SRC/xerbla.f b/SRC/xerbla.f index 6b141499ee..96de0ef24a 100644 --- a/SRC/xerbla.f +++ b/SRC/xerbla.f @@ -63,7 +63,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup xerbla * * ===================================================================== SUBROUTINE XERBLA( SRNAME, INFO ) diff --git a/SRC/xerbla_array.f b/SRC/xerbla_array.f index 1bffae8d75..e27ed8c932 100644 --- a/SRC/xerbla_array.f +++ b/SRC/xerbla_array.f @@ -83,7 +83,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup OTHERauxiliary +*> \ingroup xerbla_array * * ===================================================================== SUBROUTINE XERBLA_ARRAY( SRNAME_ARRAY, SRNAME_LEN, INFO) diff --git a/SRC/zbbcsd.f b/SRC/zbbcsd.f index 757e98c718..67f3cbdb90 100644 --- a/SRC/zbbcsd.f +++ b/SRC/zbbcsd.f @@ -322,7 +322,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup bbcsd * * ===================================================================== SUBROUTINE ZBBCSD( JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, M, P, Q, diff --git a/SRC/zbdsqr.f b/SRC/zbdsqr.f index faedafc3ca..6c33c73827 100644 --- a/SRC/zbdsqr.f +++ b/SRC/zbdsqr.f @@ -214,7 +214,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup bdsqr * * ===================================================================== SUBROUTINE ZBDSQR( UPLO, N, NCVT, NRU, NCC, D, E, VT, LDVT, U, diff --git a/SRC/zcgesv.f b/SRC/zcgesv.f index e926d4e975..63d6d4be47 100644 --- a/SRC/zcgesv.f +++ b/SRC/zcgesv.f @@ -193,7 +193,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gesv_mixed * * ===================================================================== SUBROUTINE ZCGESV( N, NRHS, A, LDA, IPIV, B, LDB, X, LDX, WORK, diff --git a/SRC/zcposv.f b/SRC/zcposv.f index 649d2c049c..8e9cb46fc2 100644 --- a/SRC/zcposv.f +++ b/SRC/zcposv.f @@ -201,7 +201,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POsolve +*> \ingroup posv_mixed * * ===================================================================== SUBROUTINE ZCPOSV( UPLO, N, NRHS, A, LDA, B, LDB, X, LDX, WORK, diff --git a/SRC/zdrscl.f b/SRC/zdrscl.f index 338badf425..00653c75a4 100644 --- a/SRC/zdrscl.f +++ b/SRC/zdrscl.f @@ -77,7 +77,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup rscl * * ===================================================================== SUBROUTINE ZDRSCL( N, SA, SX, INCX ) diff --git a/SRC/zgbbrd.f b/SRC/zgbbrd.f index 0f7226065e..58fcf52e0f 100644 --- a/SRC/zgbbrd.f +++ b/SRC/zgbbrd.f @@ -185,7 +185,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbbrd * * ===================================================================== SUBROUTINE ZGBBRD( VECT, M, N, NCC, KL, KU, AB, LDAB, D, E, Q, diff --git a/SRC/zgbcon.f b/SRC/zgbcon.f index 7a10ef340b..26219bf462 100644 --- a/SRC/zgbcon.f +++ b/SRC/zgbcon.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbcon * * ===================================================================== SUBROUTINE ZGBCON( NORM, N, KL, KU, AB, LDAB, IPIV, ANORM, RCOND, diff --git a/SRC/zgbequ.f b/SRC/zgbequ.f index a8e398a159..1917100a77 100644 --- a/SRC/zgbequ.f +++ b/SRC/zgbequ.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbequ * * ===================================================================== SUBROUTINE ZGBEQU( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/zgbequb.f b/SRC/zgbequb.f index 76677fee1a..28794bfc97 100644 --- a/SRC/zgbequb.f +++ b/SRC/zgbequb.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbequb * * ===================================================================== SUBROUTINE ZGBEQUB( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/zgbrfs.f b/SRC/zgbrfs.f index 6c7c016da8..393cae327c 100644 --- a/SRC/zgbrfs.f +++ b/SRC/zgbrfs.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbrfs * * ===================================================================== SUBROUTINE ZGBRFS( TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, LDAFB, diff --git a/SRC/zgbrfsx.f b/SRC/zgbrfsx.f index c97038b4ae..3ed5554c8a 100644 --- a/SRC/zgbrfsx.f +++ b/SRC/zgbrfsx.f @@ -429,7 +429,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbrfsx * * ===================================================================== SUBROUTINE ZGBRFSX( TRANS, EQUED, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/zgbsv.f b/SRC/zgbsv.f index 0b6a1d19f2..87af5bedcb 100644 --- a/SRC/zgbsv.f +++ b/SRC/zgbsv.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBsolve +*> \ingroup gbsv * *> \par Further Details: * ===================== diff --git a/SRC/zgbsvx.f b/SRC/zgbsvx.f index 871564a814..e39fbe7128 100644 --- a/SRC/zgbsvx.f +++ b/SRC/zgbsvx.f @@ -361,7 +361,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBsolve +*> \ingroup gbsvx * * ===================================================================== SUBROUTINE ZGBSVX( FACT, TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/zgbsvxx.f b/SRC/zgbsvxx.f index f608e9c105..1f98f02336 100644 --- a/SRC/zgbsvxx.f +++ b/SRC/zgbsvxx.f @@ -549,7 +549,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBsolve +*> \ingroup gbsvxx * * ===================================================================== SUBROUTINE ZGBSVXX( FACT, TRANS, N, KL, KU, NRHS, AB, LDAB, AFB, diff --git a/SRC/zgbtf2.f b/SRC/zgbtf2.f index fbbe632476..e66329ffc9 100644 --- a/SRC/zgbtf2.f +++ b/SRC/zgbtf2.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbtf2 * *> \par Further Details: * ===================== diff --git a/SRC/zgbtrf.f b/SRC/zgbtrf.f index 83139b0919..50bc12413b 100644 --- a/SRC/zgbtrf.f +++ b/SRC/zgbtrf.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbtrf * *> \par Further Details: * ===================== diff --git a/SRC/zgbtrs.f b/SRC/zgbtrs.f index 4a2ba5452c..19cb9b7b87 100644 --- a/SRC/zgbtrs.f +++ b/SRC/zgbtrs.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup gbtrs * * ===================================================================== SUBROUTINE ZGBTRS( TRANS, N, KL, KU, NRHS, AB, LDAB, IPIV, B, LDB, diff --git a/SRC/zgebak.f b/SRC/zgebak.f index 9a0f65a439..6144fc3465 100644 --- a/SRC/zgebak.f +++ b/SRC/zgebak.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gebak * * ===================================================================== SUBROUTINE ZGEBAK( JOB, SIDE, N, ILO, IHI, SCALE, M, V, LDV, diff --git a/SRC/zgebal.f b/SRC/zgebal.f index a467991d4d..9349f1e214 100644 --- a/SRC/zgebal.f +++ b/SRC/zgebal.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gebal * *> \par Further Details: * ===================== diff --git a/SRC/zgebd2.f b/SRC/zgebd2.f index 9a403e4008..ec1142954b 100644 --- a/SRC/zgebd2.f +++ b/SRC/zgebd2.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gebd2 * *> \par Further Details: * ===================== diff --git a/SRC/zgebrd.f b/SRC/zgebrd.f index f1791c6a4b..089fc1095c 100644 --- a/SRC/zgebrd.f +++ b/SRC/zgebrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gebrd * *> \par Further Details: * ===================== diff --git a/SRC/zgecon.f b/SRC/zgecon.f index 9cbfe35bcd..03fa09421f 100644 --- a/SRC/zgecon.f +++ b/SRC/zgecon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gecon * * ===================================================================== SUBROUTINE ZGECON( NORM, N, A, LDA, ANORM, RCOND, WORK, RWORK, diff --git a/SRC/zgeequ.f b/SRC/zgeequ.f index 9575bd6526..0802647831 100644 --- a/SRC/zgeequ.f +++ b/SRC/zgeequ.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geequ * * ===================================================================== SUBROUTINE ZGEEQU( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/zgeequb.f b/SRC/zgeequb.f index 74e1f68170..0e1c777b86 100644 --- a/SRC/zgeequb.f +++ b/SRC/zgeequb.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geequb * * ===================================================================== SUBROUTINE ZGEEQUB( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/zgees.f b/SRC/zgees.f index e2bd855cf0..7a3e222950 100644 --- a/SRC/zgees.f +++ b/SRC/zgees.f @@ -189,7 +189,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEeigen +*> \ingroup gees * * ===================================================================== SUBROUTINE ZGEES( JOBVS, SORT, SELECT, N, A, LDA, SDIM, W, VS, diff --git a/SRC/zgeesx.f b/SRC/zgeesx.f index 12418caa49..1930821152 100644 --- a/SRC/zgeesx.f +++ b/SRC/zgeesx.f @@ -230,7 +230,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEeigen +*> \ingroup geesx * * ===================================================================== SUBROUTINE ZGEESX( JOBVS, SORT, SELECT, SENSE, N, A, LDA, SDIM, W, diff --git a/SRC/zgeev.f b/SRC/zgeev.f index 565704d5ca..aba60d0cda 100644 --- a/SRC/zgeev.f +++ b/SRC/zgeev.f @@ -172,7 +172,7 @@ * * @precisions fortran z -> c * -*> \ingroup complex16GEeigen +*> \ingroup geev * * ===================================================================== SUBROUTINE ZGEEV( JOBVL, JOBVR, N, A, LDA, W, VL, LDVL, VR, LDVR, diff --git a/SRC/zgeevx.f b/SRC/zgeevx.f index 9fbffb0386..7f69af7a9c 100644 --- a/SRC/zgeevx.f +++ b/SRC/zgeevx.f @@ -279,7 +279,7 @@ * * @precisions fortran z -> c * -*> \ingroup complex16GEeigen +*> \ingroup geevx * * ===================================================================== SUBROUTINE ZGEEVX( BALANC, JOBVL, JOBVR, SENSE, N, A, LDA, W, VL, diff --git a/SRC/zgehd2.f b/SRC/zgehd2.f index e4d79f1b83..dc2c1bf08d 100644 --- a/SRC/zgehd2.f +++ b/SRC/zgehd2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gehd2 * *> \par Further Details: * ===================== diff --git a/SRC/zgehrd.f b/SRC/zgehrd.f index e18493cf97..6ddb9551cb 100644 --- a/SRC/zgehrd.f +++ b/SRC/zgehrd.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gehrd * *> \par Further Details: * ===================== diff --git a/SRC/zgejsv.f b/SRC/zgejsv.f index b4bc531ab1..262a797547 100644 --- a/SRC/zgejsv.f +++ b/SRC/zgejsv.f @@ -483,7 +483,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsing +*> \ingroup gejsv * *> \par Further Details: * ===================== diff --git a/SRC/zgelq.f b/SRC/zgelq.f index de7c9a3784..22ca6ca76a 100644 --- a/SRC/zgelq.f +++ b/SRC/zgelq.f @@ -166,6 +166,8 @@ *> the LQ factorization. *> \endverbatim *> +*> \ingroup gelq +*> * ===================================================================== SUBROUTINE ZGELQ( M, N, A, LDA, T, TSIZE, WORK, LWORK, $ INFO ) diff --git a/SRC/zgelq2.f b/SRC/zgelq2.f index 7604556a5f..952c66d1dc 100644 --- a/SRC/zgelq2.f +++ b/SRC/zgelq2.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gelq2 * *> \par Further Details: * ===================== diff --git a/SRC/zgelqf.f b/SRC/zgelqf.f index 6c295eecec..4d6e7d995b 100644 --- a/SRC/zgelqf.f +++ b/SRC/zgelqf.f @@ -118,7 +118,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gelqf * *> \par Further Details: * ===================== diff --git a/SRC/zgelqt.f b/SRC/zgelqt.f index 801996743d..4c2b6d9dc4 100644 --- a/SRC/zgelqt.f +++ b/SRC/zgelqt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqt * *> \par Further Details: * ===================== diff --git a/SRC/zgelqt3.f b/SRC/zgelqt3.f index 629a09472d..becde4d4ab 100644 --- a/SRC/zgelqt3.f +++ b/SRC/zgelqt3.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gelqt3 * *> \par Further Details: * ===================== diff --git a/SRC/zgels.f b/SRC/zgels.f index ac943081c8..618f9a9fc0 100644 --- a/SRC/zgels.f +++ b/SRC/zgels.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gels * * ===================================================================== SUBROUTINE ZGELS( TRANS, M, N, NRHS, A, LDA, B, LDB, WORK, LWORK, diff --git a/SRC/zgelsd.f b/SRC/zgelsd.f index dad746564b..8eed1e0af9 100644 --- a/SRC/zgelsd.f +++ b/SRC/zgelsd.f @@ -204,7 +204,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gelsd * *> \par Contributors: * ================== diff --git a/SRC/zgelss.f b/SRC/zgelss.f index 35b815accf..885333a10f 100644 --- a/SRC/zgelss.f +++ b/SRC/zgelss.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gelss * * ===================================================================== SUBROUTINE ZGELSS( M, N, NRHS, A, LDA, B, LDB, S, RCOND, RANK, diff --git a/SRC/zgelst.f b/SRC/zgelst.f index 927f515218..90884d8175 100644 --- a/SRC/zgelst.f +++ b/SRC/zgelst.f @@ -176,7 +176,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gelst * *> \par Contributors: * ================== diff --git a/SRC/zgelsy.f b/SRC/zgelsy.f index e32ace83ad..380ba6c820 100644 --- a/SRC/zgelsy.f +++ b/SRC/zgelsy.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gelsy * *> \par Contributors: * ================== diff --git a/SRC/zgemlq.f b/SRC/zgemlq.f index 41cd1c0595..1c29aa886e 100644 --- a/SRC/zgemlq.f +++ b/SRC/zgemlq.f @@ -118,7 +118,7 @@ *> The dimension of the array WORK. *> If LWORK = -1, then a workspace query is assumed. The routine *> only calculates the size of the WORK array, returns this -*> value as WORK(1), and no error message related to WORK +*> value as WORK(1), and no error message related to WORK *> is issued by XERBLA. *> \endverbatim *> @@ -142,7 +142,7 @@ *> *> \verbatim *> -*> These details are particular for this LAPACK implementation. Users should not +*> These details are particular for this LAPACK implementation. Users should not *> take them for granted. These details may change in the future, and are not likely *> true for another LAPACK implementation. These details are relevant if one wants *> to try to understand the code. They are not part of the interface. @@ -158,11 +158,13 @@ *> block sizes MB and NB returned by ILAENV, ZGELQ will use either *> ZLASWLQ (if the matrix is wide-and-short) or ZGELQT to compute *> the LQ factorization. -*> This version of ZGEMLQ will use either ZLAMSWLQ or ZGEMLQT to +*> This version of ZGEMLQ will use either ZLAMSWLQ or ZGEMLQT to *> multiply matrix Q by another matrix. *> Further Details in ZLAMSWLQ or ZGEMLQT. *> \endverbatim *> +*> \ingroup gemlq +*> * ===================================================================== SUBROUTINE ZGEMLQ( SIDE, TRANS, M, N, K, A, LDA, T, TSIZE, $ C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/zgemlqt.f b/SRC/zgemlqt.f index 06fe4958e5..d85651b1ec 100644 --- a/SRC/zgemlqt.f +++ b/SRC/zgemlqt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleGEcomputational +*> \ingroup gemlqt * * ===================================================================== SUBROUTINE ZGEMLQT( SIDE, TRANS, M, N, K, MB, V, LDV, T, LDT, diff --git a/SRC/zgemqr.f b/SRC/zgemqr.f index c83eaff2f1..f299ece847 100644 --- a/SRC/zgemqr.f +++ b/SRC/zgemqr.f @@ -120,7 +120,7 @@ *> The dimension of the array WORK. *> If LWORK = -1, then a workspace query is assumed. The routine *> only calculates the size of the WORK array, returns this -*> value as WORK(1), and no error message related to WORK +*> value as WORK(1), and no error message related to WORK *> is issued by XERBLA. *> \endverbatim *> @@ -144,7 +144,7 @@ *> *> \verbatim *> -*> These details are particular for this LAPACK implementation. Users should not +*> These details are particular for this LAPACK implementation. Users should not *> take them for granted. These details may change in the future, and are not likely *> true for another LAPACK implementation. These details are relevant if one wants *> to try to understand the code. They are not part of the interface. @@ -166,6 +166,8 @@ *> *> \endverbatim *> +*> \ingroup gemqr +*> * ===================================================================== SUBROUTINE ZGEMQR( SIDE, TRANS, M, N, K, A, LDA, T, TSIZE, $ C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/zgemqrt.f b/SRC/zgemqrt.f index 9547c33a57..3e6c467d0f 100644 --- a/SRC/zgemqrt.f +++ b/SRC/zgemqrt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gemqrt * * ===================================================================== SUBROUTINE ZGEMQRT( SIDE, TRANS, M, N, K, NB, V, LDV, T, LDT, diff --git a/SRC/zgeql2.f b/SRC/zgeql2.f index 35bd61d412..cdac186e98 100644 --- a/SRC/zgeql2.f +++ b/SRC/zgeql2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geql2 * *> \par Further Details: * ===================== diff --git a/SRC/zgeqlf.f b/SRC/zgeqlf.f index 94721540c5..89c5b1b08c 100644 --- a/SRC/zgeqlf.f +++ b/SRC/zgeqlf.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqlf * *> \par Further Details: * ===================== diff --git a/SRC/zgeqp3.f b/SRC/zgeqp3.f index 9e55fb0c98..50a024cf98 100644 --- a/SRC/zgeqp3.f +++ b/SRC/zgeqp3.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqp3 * *> \par Further Details: * ===================== diff --git a/SRC/zgeqr.f b/SRC/zgeqr.f index 20a80d0835..704bcbc6cd 100644 --- a/SRC/zgeqr.f +++ b/SRC/zgeqr.f @@ -168,6 +168,8 @@ *> *> \endverbatim *> +*> \ingroup geqr +*> * ===================================================================== SUBROUTINE ZGEQR( M, N, A, LDA, T, TSIZE, WORK, LWORK, $ INFO ) diff --git a/SRC/zgeqr2.f b/SRC/zgeqr2.f index 511a81ef8a..457404ad91 100644 --- a/SRC/zgeqr2.f +++ b/SRC/zgeqr2.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqr2 * *> \par Further Details: * ===================== diff --git a/SRC/zgeqr2p.f b/SRC/zgeqr2p.f index 136d75f85c..93451faec8 100644 --- a/SRC/zgeqr2p.f +++ b/SRC/zgeqr2p.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqr2p * *> \par Further Details: * ===================== diff --git a/SRC/zgeqrf.f b/SRC/zgeqrf.f index 2032bf742b..2ef06633e8 100644 --- a/SRC/zgeqrf.f +++ b/SRC/zgeqrf.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqrf * *> \par Further Details: * ===================== diff --git a/SRC/zgeqrfp.f b/SRC/zgeqrfp.f index 73bcde6674..6fe06d962d 100644 --- a/SRC/zgeqrfp.f +++ b/SRC/zgeqrfp.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqrfp * *> \par Further Details: * ===================== diff --git a/SRC/zgeqrt.f b/SRC/zgeqrt.f index d54a9e6c36..3c77cb4e0d 100644 --- a/SRC/zgeqrt.f +++ b/SRC/zgeqrt.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqrt * *> \par Further Details: * ===================== diff --git a/SRC/zgeqrt2.f b/SRC/zgeqrt2.f index 34d9d544fd..3cdcf5353d 100644 --- a/SRC/zgeqrt2.f +++ b/SRC/zgeqrt2.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqrt2 * *> \par Further Details: * ===================== diff --git a/SRC/zgeqrt3.f b/SRC/zgeqrt3.f index af6b9437dd..da23cff85c 100644 --- a/SRC/zgeqrt3.f +++ b/SRC/zgeqrt3.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup geqrt3 * *> \par Further Details: * ===================== diff --git a/SRC/zgerfs.f b/SRC/zgerfs.f index ce5d15279e..8892cabfed 100644 --- a/SRC/zgerfs.f +++ b/SRC/zgerfs.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gerfs * * ===================================================================== SUBROUTINE ZGERFS( TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/zgerfsx.f b/SRC/zgerfsx.f index 2c5cf03ec8..088e64c663 100644 --- a/SRC/zgerfsx.f +++ b/SRC/zgerfsx.f @@ -404,7 +404,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gerfsx * * ===================================================================== SUBROUTINE ZGERFSX( TRANS, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/zgerq2.f b/SRC/zgerq2.f index 8a987dd0a0..f7bac6d570 100644 --- a/SRC/zgerq2.f +++ b/SRC/zgerq2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gerq2 * *> \par Further Details: * ===================== diff --git a/SRC/zgerqf.f b/SRC/zgerqf.f index 26e901390f..8ea363c38f 100644 --- a/SRC/zgerqf.f +++ b/SRC/zgerqf.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gerqf * *> \par Further Details: * ===================== diff --git a/SRC/zgesc2.f b/SRC/zgesc2.f index b3754d9779..d90249c640 100644 --- a/SRC/zgesc2.f +++ b/SRC/zgesc2.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEauxiliary +*> \ingroup gesc2 * *> \par Contributors: * ================== diff --git a/SRC/zgesdd.f b/SRC/zgesdd.f index 6064510b0a..dd8da82022 100644 --- a/SRC/zgesdd.f +++ b/SRC/zgesdd.f @@ -207,7 +207,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsing +*> \ingroup gesdd * *> \par Contributors: * ================== diff --git a/SRC/zgesv.f b/SRC/zgesv.f index abb9a42132..816ce90769 100644 --- a/SRC/zgesv.f +++ b/SRC/zgesv.f @@ -1,3 +1,5 @@ +*> \addtogroup gesv +*> *> \brief ZGESV computes the solution to system of linear equations A * X = B for GE matrices (simple driver) * * =========== DOCUMENTATION =========== @@ -115,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gesv * * ===================================================================== SUBROUTINE ZGESV( N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/zgesvd.f b/SRC/zgesvd.f index 1064fabbbb..1a127b3ee7 100644 --- a/SRC/zgesvd.f +++ b/SRC/zgesvd.f @@ -206,7 +206,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsing +*> \ingroup gesvd * * ===================================================================== SUBROUTINE ZGESVD( JOBU, JOBVT, M, N, A, LDA, S, U, LDU, diff --git a/SRC/zgesvdq.f b/SRC/zgesvdq.f index b990f73893..3230faddde 100644 --- a/SRC/zgesvdq.f +++ b/SRC/zgesvdq.f @@ -404,7 +404,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsing +*> \ingroup gesvdq * * ===================================================================== SUBROUTINE ZGESVDQ( JOBA, JOBP, JOBR, JOBU, JOBV, M, N, A, LDA, diff --git a/SRC/zgesvdx.f b/SRC/zgesvdx.f index a8bf560c21..b96ba4f73b 100644 --- a/SRC/zgesvdx.f +++ b/SRC/zgesvdx.f @@ -261,7 +261,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsing +*> \ingroup gesvdx * * ===================================================================== SUBROUTINE ZGESVDX( JOBU, JOBVT, RANGE, M, N, A, LDA, VL, VU, diff --git a/SRC/zgesvj.f b/SRC/zgesvj.f index 6cd2335f24..ea0b162f95 100644 --- a/SRC/zgesvj.f +++ b/SRC/zgesvj.f @@ -276,7 +276,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup gesvj * *> \par Further Details: * ===================== diff --git a/SRC/zgesvx.f b/SRC/zgesvx.f index 3b193a1b2a..c31675f2df 100644 --- a/SRC/zgesvx.f +++ b/SRC/zgesvx.f @@ -341,7 +341,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gesvx * * ===================================================================== SUBROUTINE ZGESVX( FACT, TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/zgesvxx.f b/SRC/zgesvxx.f index f1102668ae..5e39938830 100644 --- a/SRC/zgesvxx.f +++ b/SRC/zgesvxx.f @@ -529,7 +529,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup gesvxx * * ===================================================================== SUBROUTINE ZGESVXX( FACT, TRANS, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/zgetc2.f b/SRC/zgetc2.f index e1f3c74e75..649820bc56 100644 --- a/SRC/zgetc2.f +++ b/SRC/zgetc2.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEauxiliary +*> \ingroup getc2 * *> \par Contributors: * ================== diff --git a/SRC/zgetf2.f b/SRC/zgetf2.f index c247f8645a..b7de660a5f 100644 --- a/SRC/zgetf2.f +++ b/SRC/zgetf2.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup getf2 * * ===================================================================== SUBROUTINE ZGETF2( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/zgetrf.f b/SRC/zgetrf.f index f3c3b396f8..6a99def47e 100644 --- a/SRC/zgetrf.f +++ b/SRC/zgetrf.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup getrf * * ===================================================================== SUBROUTINE ZGETRF( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/zgetrf2.f b/SRC/zgetrf2.f index a3391fc532..a493bf5c42 100644 --- a/SRC/zgetrf2.f +++ b/SRC/zgetrf2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup getrf2 * * ===================================================================== RECURSIVE SUBROUTINE ZGETRF2( M, N, A, LDA, IPIV, INFO ) diff --git a/SRC/zgetri.f b/SRC/zgetri.f index 41782841c9..9aab294975 100644 --- a/SRC/zgetri.f +++ b/SRC/zgetri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup getri * * ===================================================================== SUBROUTINE ZGETRI( N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/zgetrs.f b/SRC/zgetrs.f index 53f1bc3884..ab2e3d2f32 100644 --- a/SRC/zgetrs.f +++ b/SRC/zgetrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup getrs * * ===================================================================== SUBROUTINE ZGETRS( TRANS, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/zgetsls.f b/SRC/zgetsls.f index 0b11bb466e..b9adbc8325 100644 --- a/SRC/zgetsls.f +++ b/SRC/zgetsls.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsolve +*> \ingroup getsls * * ===================================================================== SUBROUTINE ZGETSLS( TRANS, M, N, NRHS, A, LDA, B, LDB, diff --git a/SRC/zgetsqrhrt.f b/SRC/zgetsqrhrt.f index 5f0167937e..807a96fbef 100644 --- a/SRC/zgetsqrhrt.f +++ b/SRC/zgetsqrhrt.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup comlpex16OTHERcomputational +*> \ingroup getsqrhrt * *> \par Contributors: * ================== diff --git a/SRC/zggbak.f b/SRC/zggbak.f index a0ea5de4d2..6daf1811c8 100644 --- a/SRC/zggbak.f +++ b/SRC/zggbak.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup ggbak * *> \par Further Details: * ===================== diff --git a/SRC/zggbal.f b/SRC/zggbal.f index c37ab4c100..7e871d35db 100644 --- a/SRC/zggbal.f +++ b/SRC/zggbal.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup ggbal * *> \par Further Details: * ===================== diff --git a/SRC/zgges.f b/SRC/zgges.f index a67992353e..ad1a2f947e 100644 --- a/SRC/zgges.f +++ b/SRC/zgges.f @@ -261,7 +261,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEeigen +*> \ingroup gges * * ===================================================================== SUBROUTINE ZGGES( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B, LDB, diff --git a/SRC/zgges3.f b/SRC/zgges3.f index 81112a2143..c316c66945 100644 --- a/SRC/zgges3.f +++ b/SRC/zgges3.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEeigen +*> \ingroup gges3 * * ===================================================================== SUBROUTINE ZGGES3( JOBVSL, JOBVSR, SORT, SELCTG, N, A, LDA, B, diff --git a/SRC/zggesx.f b/SRC/zggesx.f index 53de433393..dbcb8d446e 100644 --- a/SRC/zggesx.f +++ b/SRC/zggesx.f @@ -320,7 +320,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEeigen +*> \ingroup ggesx * * ===================================================================== SUBROUTINE ZGGESX( JOBVSL, JOBVSR, SORT, SELCTG, SENSE, N, A, LDA, diff --git a/SRC/zggev.f b/SRC/zggev.f index 174fe036a5..6f16db4482 100644 --- a/SRC/zggev.f +++ b/SRC/zggev.f @@ -209,7 +209,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEeigen +*> \ingroup ggev * * ===================================================================== SUBROUTINE ZGGEV( JOBVL, JOBVR, N, A, LDA, B, LDB, ALPHA, BETA, diff --git a/SRC/zggev3.f b/SRC/zggev3.f index ce035fcc78..f8729e91d2 100644 --- a/SRC/zggev3.f +++ b/SRC/zggev3.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEeigen +*> \ingroup ggev3 * * ===================================================================== SUBROUTINE ZGGEV3( JOBVL, JOBVR, N, A, LDA, B, LDB, ALPHA, BETA, diff --git a/SRC/zggevx.f b/SRC/zggevx.f index 616e3a8300..cfa5232fff 100644 --- a/SRC/zggevx.f +++ b/SRC/zggevx.f @@ -335,7 +335,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEeigen +*> \ingroup ggevx * *> \par Further Details: * ===================== diff --git a/SRC/zggglm.f b/SRC/zggglm.f index 62b4acdec3..3eea191ec9 100644 --- a/SRC/zggglm.f +++ b/SRC/zggglm.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup ggglm * * ===================================================================== SUBROUTINE ZGGGLM( N, M, P, A, LDA, B, LDB, D, X, Y, WORK, LWORK, diff --git a/SRC/zgghd3.f b/SRC/zgghd3.f index b29cdc70a3..0da8972966 100644 --- a/SRC/zgghd3.f +++ b/SRC/zgghd3.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup gghd3 * *> \par Further Details: * ===================== diff --git a/SRC/zgghrd.f b/SRC/zgghrd.f index 35305f3448..da77796ceb 100644 --- a/SRC/zgghrd.f +++ b/SRC/zgghrd.f @@ -186,7 +186,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup gghrd * *> \par Further Details: * ===================== diff --git a/SRC/zgglse.f b/SRC/zgglse.f index cc558bc407..c5cd0ca94c 100644 --- a/SRC/zgglse.f +++ b/SRC/zgglse.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup gglse * * ===================================================================== SUBROUTINE ZGGLSE( M, N, P, A, LDA, B, LDB, C, D, X, WORK, LWORK, diff --git a/SRC/zggqrf.f b/SRC/zggqrf.f index 0388b08743..79104606c0 100644 --- a/SRC/zggqrf.f +++ b/SRC/zggqrf.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ggqrf * *> \par Further Details: * ===================== diff --git a/SRC/zggrqf.f b/SRC/zggrqf.f index be912c7726..8e4e45f003 100644 --- a/SRC/zggrqf.f +++ b/SRC/zggrqf.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ggrqf * *> \par Further Details: * ===================== diff --git a/SRC/zggsvd3.f b/SRC/zggsvd3.f index 71257a7c07..d97265d44c 100644 --- a/SRC/zggsvd3.f +++ b/SRC/zggsvd3.f @@ -332,7 +332,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEsing +*> \ingroup ggsvd3 * *> \par Contributors: * ================== diff --git a/SRC/zggsvp3.f b/SRC/zggsvp3.f index f39ccdad31..c21a146fa8 100644 --- a/SRC/zggsvp3.f +++ b/SRC/zggsvp3.f @@ -256,7 +256,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ggsvp3 * *> \par Further Details: * ===================== diff --git a/SRC/zgsvj0.f b/SRC/zgsvj0.f index 075c243c29..1447ceb109 100644 --- a/SRC/zgsvj0.f +++ b/SRC/zgsvj0.f @@ -193,7 +193,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup gsvj0 *> *> \par Further Details: * ===================== diff --git a/SRC/zgsvj1.f b/SRC/zgsvj1.f index ba71e155fa..750c29643f 100644 --- a/SRC/zgsvj1.f +++ b/SRC/zgsvj1.f @@ -223,7 +223,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup gsvj1 * *> \par Contributor: * ================== diff --git a/SRC/zgtcon.f b/SRC/zgtcon.f index 24190946aa..7248b4248a 100644 --- a/SRC/zgtcon.f +++ b/SRC/zgtcon.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GTcomputational +*> \ingroup gtcon * * ===================================================================== SUBROUTINE ZGTCON( NORM, N, DL, D, DU, DU2, IPIV, ANORM, RCOND, diff --git a/SRC/zgtrfs.f b/SRC/zgtrfs.f index 509a0d7a55..d866eae9d2 100644 --- a/SRC/zgtrfs.f +++ b/SRC/zgtrfs.f @@ -201,7 +201,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GTcomputational +*> \ingroup gtrfs * * ===================================================================== SUBROUTINE ZGTRFS( TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, DU2, diff --git a/SRC/zgtsv.f b/SRC/zgtsv.f index fbd583d6a6..08b640b33e 100644 --- a/SRC/zgtsv.f +++ b/SRC/zgtsv.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GTsolve +*> \ingroup gtsv * * ===================================================================== SUBROUTINE ZGTSV( N, NRHS, DL, D, DU, B, LDB, INFO ) diff --git a/SRC/zgtsvx.f b/SRC/zgtsvx.f index 32ed2133d5..53153439d4 100644 --- a/SRC/zgtsvx.f +++ b/SRC/zgtsvx.f @@ -285,7 +285,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GTsolve +*> \ingroup gtsvx * * ===================================================================== SUBROUTINE ZGTSVX( FACT, TRANS, N, NRHS, DL, D, DU, DLF, DF, DUF, diff --git a/SRC/zgttrf.f b/SRC/zgttrf.f index 411233ef0b..3529288aba 100644 --- a/SRC/zgttrf.f +++ b/SRC/zgttrf.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GTcomputational +*> \ingroup gttrf * * ===================================================================== SUBROUTINE ZGTTRF( N, DL, D, DU, DU2, IPIV, INFO ) diff --git a/SRC/zgttrs.f b/SRC/zgttrs.f index d36d0107e0..d1344f6a43 100644 --- a/SRC/zgttrs.f +++ b/SRC/zgttrs.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GTcomputational +*> \ingroup gttrs * * ===================================================================== SUBROUTINE ZGTTRS( TRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB, diff --git a/SRC/zgtts2.f b/SRC/zgtts2.f index 83ca50cbab..57f606ffba 100644 --- a/SRC/zgtts2.f +++ b/SRC/zgtts2.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GTcomputational +*> \ingroup gtts2 * * ===================================================================== SUBROUTINE ZGTTS2( ITRANS, N, NRHS, DL, D, DU, DU2, IPIV, B, LDB ) diff --git a/SRC/zhb2st_kernels.f b/SRC/zhb2st_kernels.f index 717b36eefa..4a4c554da9 100644 --- a/SRC/zhb2st_kernels.f +++ b/SRC/zhb2st_kernels.f @@ -163,6 +163,8 @@ *> *> \endverbatim *> +*> \ingroup hb2st_kernels +*> * ===================================================================== SUBROUTINE ZHB2ST_KERNELS( UPLO, WANTZ, TTYPE, $ ST, ED, SWEEP, N, NB, IB, diff --git a/SRC/zhbev.f b/SRC/zhbev.f index 341a6fb2bb..a74844af0b 100644 --- a/SRC/zhbev.f +++ b/SRC/zhbev.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbev * * ===================================================================== SUBROUTINE ZHBEV( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, WORK, diff --git a/SRC/zhbev_2stage.f b/SRC/zhbev_2stage.f index 056f0a7cea..db01aa6670 100644 --- a/SRC/zhbev_2stage.f +++ b/SRC/zhbev_2stage.f @@ -132,7 +132,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbev_2stage * *> \par Further Details: * ===================== @@ -189,7 +189,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -197,11 +197,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -351,7 +351,7 @@ SUBROUTINE ZHBEV_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, LLWORK = LWORK - INDWRK + 1 * CALL ZHETRD_HB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, W, - $ RWORK( INDE ), WORK( INDHOUS ), LHTRD, + $ RWORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call DSTERF. For eigenvectors, call ZSTEQR. diff --git a/SRC/zhbevd.f b/SRC/zhbevd.f index be9f015560..02119c3b3e 100644 --- a/SRC/zhbevd.f +++ b/SRC/zhbevd.f @@ -201,7 +201,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbevd * * ===================================================================== SUBROUTINE ZHBEVD( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, WORK, diff --git a/SRC/zhbevd_2stage.f b/SRC/zhbevd_2stage.f index e32c7125ca..0e0a723c3b 100644 --- a/SRC/zhbevd_2stage.f +++ b/SRC/zhbevd_2stage.f @@ -21,7 +21,7 @@ * =========== * * SUBROUTINE ZHBEVD_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, -* WORK, LWORK, RWORK, LRWORK, IWORK, +* WORK, LWORK, RWORK, LRWORK, IWORK, * LIWORK, INFO ) * * IMPLICIT NONE @@ -136,7 +136,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS @@ -213,7 +213,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbevd_2stage * *> \par Further Details: * ===================== @@ -231,7 +231,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -239,17 +239,17 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * * ===================================================================== SUBROUTINE ZHBEVD_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, - $ WORK, LWORK, RWORK, LRWORK, IWORK, + $ WORK, LWORK, RWORK, LRWORK, IWORK, $ LIWORK, INFO ) * IMPLICIT NONE @@ -412,7 +412,7 @@ SUBROUTINE ZHBEVD_2STAGE( JOBZ, UPLO, N, KD, AB, LDAB, W, Z, LDZ, LLWK2 = LWORK - INDWK2 + 1 * CALL ZHETRD_HB2ST( "N", JOBZ, UPLO, N, KD, AB, LDAB, W, - $ RWORK( INDE ), WORK( INDHOUS ), LHTRD, + $ RWORK( INDE ), WORK( INDHOUS ), LHTRD, $ WORK( INDWK ), LLWORK, IINFO ) * * For eigenvalues only, call DSTERF. For eigenvectors, call ZSTEDC. diff --git a/SRC/zhbevx.f b/SRC/zhbevx.f index 77bd721b3c..afbe0cea46 100644 --- a/SRC/zhbevx.f +++ b/SRC/zhbevx.f @@ -258,7 +258,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbevx * * ===================================================================== SUBROUTINE ZHBEVX( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, Q, LDQ, VL, diff --git a/SRC/zhbevx_2stage.f b/SRC/zhbevx_2stage.f index 2a9896d430..0a60aa43ff 100644 --- a/SRC/zhbevx_2stage.f +++ b/SRC/zhbevx_2stage.f @@ -22,7 +22,7 @@ * * SUBROUTINE ZHBEVX_2STAGE( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, * Q, LDQ, VL, VU, IL, IU, ABSTOL, M, W, -* Z, LDZ, WORK, LWORK, RWORK, IWORK, +* Z, LDZ, WORK, LWORK, RWORK, IWORK, * IFAIL, INFO ) * * IMPLICIT NONE @@ -233,7 +233,7 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = (2KD+1)*N + KD*NTHREADS @@ -285,7 +285,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbevx_2stage * *> \par Further Details: * ===================== @@ -303,7 +303,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -311,18 +311,18 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * * ===================================================================== SUBROUTINE ZHBEVX_2STAGE( JOBZ, RANGE, UPLO, N, KD, AB, LDAB, $ Q, LDQ, VL, VU, IL, IU, ABSTOL, M, W, - $ Z, LDZ, WORK, LWORK, RWORK, IWORK, + $ Z, LDZ, WORK, LWORK, RWORK, IWORK, $ IFAIL, INFO ) * IMPLICIT NONE diff --git a/SRC/zhbgst.f b/SRC/zhbgst.f index b05823b2b2..da6dd6c1cd 100644 --- a/SRC/zhbgst.f +++ b/SRC/zhbgst.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hbgst * * ===================================================================== SUBROUTINE ZHBGST( VECT, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, X, diff --git a/SRC/zhbgv.f b/SRC/zhbgv.f index 297ad6da73..9504ef4d2c 100644 --- a/SRC/zhbgv.f +++ b/SRC/zhbgv.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbgv * * ===================================================================== SUBROUTINE ZHBGV( JOBZ, UPLO, N, KA, KB, AB, LDAB, BB, LDBB, W, Z, diff --git a/SRC/zhbgvd.f b/SRC/zhbgvd.f index 4bd02168d4..0d33cf648d 100644 --- a/SRC/zhbgvd.f +++ b/SRC/zhbgvd.f @@ -232,7 +232,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbgvd * *> \par Contributors: * ================== diff --git a/SRC/zhbgvx.f b/SRC/zhbgvx.f index 3832ed4141..f18ef2b6d1 100644 --- a/SRC/zhbgvx.f +++ b/SRC/zhbgvx.f @@ -286,7 +286,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hbgvx * *> \par Contributors: * ================== diff --git a/SRC/zhbtrd.f b/SRC/zhbtrd.f index 63dc7a9343..7c1006b5b0 100644 --- a/SRC/zhbtrd.f +++ b/SRC/zhbtrd.f @@ -147,7 +147,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hbtrd * *> \par Further Details: * ===================== diff --git a/SRC/zhecon.f b/SRC/zhecon.f index 5c57b566d2..4b5172ba19 100644 --- a/SRC/zhecon.f +++ b/SRC/zhecon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hecon * * ===================================================================== SUBROUTINE ZHECON( UPLO, N, A, LDA, IPIV, ANORM, RCOND, WORK, diff --git a/SRC/zhecon_3.f b/SRC/zhecon_3.f index a84d5c0caf..eb739fe1c1 100644 --- a/SRC/zhecon_3.f +++ b/SRC/zhecon_3.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hecon_3 * *> \par Contributors: * ================== diff --git a/SRC/zhecon_rook.f b/SRC/zhecon_rook.f index 522bd2b2d6..c282ba59ec 100644 --- a/SRC/zhecon_rook.f +++ b/SRC/zhecon_rook.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hecon_rook * *> \par Contributors: * ================== diff --git a/SRC/zheequb.f b/SRC/zheequb.f index 93747172eb..1cc675540c 100644 --- a/SRC/zheequb.f +++ b/SRC/zheequb.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup heequb * *> \par References: * ================ diff --git a/SRC/zheev.f b/SRC/zheev.f index 59af34a742..7e38bead1e 100644 --- a/SRC/zheev.f +++ b/SRC/zheev.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup heev * * ===================================================================== SUBROUTINE ZHEEV( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, RWORK, diff --git a/SRC/zheev_2stage.f b/SRC/zheev_2stage.f index 96c07c54fd..02d1b56e1b 100644 --- a/SRC/zheev_2stage.f +++ b/SRC/zheev_2stage.f @@ -106,12 +106,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup heev_2stage * *> \par Further Details: * ===================== @@ -167,7 +167,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -175,11 +175,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -314,7 +314,7 @@ SUBROUTINE ZHEEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, LLWORK = LWORK - INDWRK + 1 * CALL ZHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, W, RWORK( INDE ), - $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, + $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call DSTERF. For eigenvectors, first call diff --git a/SRC/zheevd.f b/SRC/zheevd.f index ba52f9e723..791988a892 100644 --- a/SRC/zheevd.f +++ b/SRC/zheevd.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup heevd * *> \par Further Details: * ===================== diff --git a/SRC/zheevd_2stage.f b/SRC/zheevd_2stage.f index e697a98237..1ddaa5c17c 100644 --- a/SRC/zheevd_2stage.f +++ b/SRC/zheevd_2stage.f @@ -113,8 +113,8 @@ *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N+1 -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N+1 *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -196,7 +196,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup heevd_2stage * *> \par Further Details: * ===================== @@ -225,7 +225,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -233,11 +233,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -291,7 +291,7 @@ SUBROUTINE ZHEEVD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, $ ZSTEDC, ZUNMTR, ZHETRD_2STAGE * .. * .. Intrinsic Functions .. - INTRINSIC DBLE, MAX, SQRT + INTRINSIC DBLE, MAX, SQRT * .. * .. Executable Statements .. * @@ -404,7 +404,7 @@ SUBROUTINE ZHEEVD_2STAGE( JOBZ, UPLO, N, A, LDA, W, WORK, LWORK, LLWRK2 = LWORK - INDWK2 + 1 * CALL ZHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, W, RWORK( INDE ), - $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, + $ WORK( INDTAU ), WORK( INDHOUS ), LHTRD, $ WORK( INDWRK ), LLWORK, IINFO ) * * For eigenvalues only, call DSTERF. For eigenvectors, first call diff --git a/SRC/zheevr.f b/SRC/zheevr.f index 1452e04a33..ad0d310d15 100644 --- a/SRC/zheevr.f +++ b/SRC/zheevr.f @@ -338,7 +338,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup heevr * *> \par Contributors: * ================== diff --git a/SRC/zheevr_2stage.f b/SRC/zheevr_2stage.f index 5c576e633b..23deaf5fd8 100644 --- a/SRC/zheevr_2stage.f +++ b/SRC/zheevr_2stage.f @@ -265,7 +265,7 @@ *> indicating the nonzero elements in Z. The i-th eigenvector *> is nonzero only in elements ISUPPZ( 2*i-1 ) through *> ISUPPZ( 2*i ). This is an output of ZSTEMR (tridiagonal -*> matrix). The support of the eigenvectors of A is typically +*> matrix). The support of the eigenvectors of A is typically *> 1:N because of the unitary transformations applied by ZUNMTR. *> Implemented only for RANGE = 'A' or 'I' and IU - IL = N - 1 *> \endverbatim @@ -279,12 +279,12 @@ *> \param[in] LWORK *> \verbatim *> LWORK is INTEGER -*> The dimension of the array WORK. +*> The dimension of the array WORK. *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 26*N, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -354,7 +354,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup heevr_2stage * *> \par Contributors: * ================== @@ -382,7 +382,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -390,11 +390,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -643,9 +643,9 @@ SUBROUTINE ZHEEVR_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, * * Call ZHETRD_2STAGE to reduce Hermitian matrix to tridiagonal form. * - CALL ZHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, RWORK( INDRD ), + CALL ZHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, RWORK( INDRD ), $ RWORK( INDRE ), WORK( INDTAU ), - $ WORK( INDHOUS ), LHTRD, + $ WORK( INDHOUS ), LHTRD, $ WORK( INDWK ), LLWORK, IINFO ) * * If all eigenvalues are desired diff --git a/SRC/zheevx.f b/SRC/zheevx.f index 71c358b371..f194ff50e3 100644 --- a/SRC/zheevx.f +++ b/SRC/zheevx.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup heevx * * ===================================================================== SUBROUTINE ZHEEVX( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, IL, IU, diff --git a/SRC/zheevx_2stage.f b/SRC/zheevx_2stage.f index 1d4dfe9c59..17499c650f 100644 --- a/SRC/zheevx_2stage.f +++ b/SRC/zheevx_2stage.f @@ -209,12 +209,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, 8*N, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -265,7 +265,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup heevx_2stage * *> \par Further Details: * ===================== @@ -283,7 +283,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -291,11 +291,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -335,7 +335,7 @@ SUBROUTINE ZHEEVX_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, CHARACTER ORDER INTEGER I, IINFO, IMAX, INDD, INDE, INDEE, INDIBL, $ INDISP, INDIWK, INDRWK, INDTAU, INDWRK, ISCALE, - $ ITMP1, J, JJ, LLWORK, + $ ITMP1, J, JJ, LLWORK, $ NSPLIT, LWMIN, LHTRD, LWTRD, KD, IB, INDHOUS DOUBLE PRECISION ABSTLL, ANRM, BIGNUM, EPS, RMAX, RMIN, SAFMIN, $ SIGMA, SMLNUM, TMP1, VLL, VUU @@ -499,7 +499,7 @@ SUBROUTINE ZHEEVX_2STAGE( JOBZ, RANGE, UPLO, N, A, LDA, VL, VU, LLWORK = LWORK - INDWRK + 1 * CALL ZHETRD_2STAGE( JOBZ, UPLO, N, A, LDA, RWORK( INDD ), - $ RWORK( INDE ), WORK( INDTAU ), + $ RWORK( INDE ), WORK( INDTAU ), $ WORK( INDHOUS ), LHTRD, WORK( INDWRK ), $ LLWORK, IINFO ) * diff --git a/SRC/zhegs2.f b/SRC/zhegs2.f index ba1c3fb017..9ee15f5efb 100644 --- a/SRC/zhegs2.f +++ b/SRC/zhegs2.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hegs2 * * ===================================================================== SUBROUTINE ZHEGS2( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) diff --git a/SRC/zhegst.f b/SRC/zhegst.f index 0d167e8c52..46712bec3d 100644 --- a/SRC/zhegst.f +++ b/SRC/zhegst.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hegst * * ===================================================================== SUBROUTINE ZHEGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) diff --git a/SRC/zhegv.f b/SRC/zhegv.f index c973bd0fce..9a27e83ae5 100644 --- a/SRC/zhegv.f +++ b/SRC/zhegv.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup hegv * * ===================================================================== SUBROUTINE ZHEGV( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, WORK, diff --git a/SRC/zhegv_2stage.f b/SRC/zhegv_2stage.f index 91ac093116..3d8cd1f515 100644 --- a/SRC/zhegv_2stage.f +++ b/SRC/zhegv_2stage.f @@ -144,12 +144,12 @@ *> \verbatim *> LWORK is INTEGER *> The length of the array WORK. LWORK >= 1, when N <= 1; -*> otherwise +*> otherwise *> If JOBZ = 'N' and N > 1, LWORK must be queried. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N + N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) *> + (KD+1)*N + N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup hegv_2stage * *> \par Further Details: * ===================== @@ -210,7 +210,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -218,11 +218,11 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim * @@ -327,7 +327,7 @@ SUBROUTINE ZHEGV_2STAGE( ITYPE, JOBZ, UPLO, N, A, LDA, B, LDB, W, * Transform problem to standard eigenvalue problem and solve. * CALL ZHEGST( ITYPE, UPLO, N, A, LDA, B, LDB, INFO ) - CALL ZHEEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, + CALL ZHEEV_2STAGE( JOBZ, UPLO, N, A, LDA, W, $ WORK, LWORK, RWORK, INFO ) * IF( WANTZ ) THEN diff --git a/SRC/zhegvd.f b/SRC/zhegvd.f index c9ff55e3d2..4d554d8a28 100644 --- a/SRC/zhegvd.f +++ b/SRC/zhegvd.f @@ -219,7 +219,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup hegvd * *> \par Further Details: * ===================== diff --git a/SRC/zhegvx.f b/SRC/zhegvx.f index 71ed1c4ca5..ac36ce12f5 100644 --- a/SRC/zhegvx.f +++ b/SRC/zhegvx.f @@ -293,7 +293,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEeigen +*> \ingroup hegvx * *> \par Contributors: * ================== diff --git a/SRC/zherfs.f b/SRC/zherfs.f index b061e8764f..4527a1f0ea 100644 --- a/SRC/zherfs.f +++ b/SRC/zherfs.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup herfs * * ===================================================================== SUBROUTINE ZHERFS( UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/zherfsx.f b/SRC/zherfsx.f index c02955e7ec..b688c74e99 100644 --- a/SRC/zherfsx.f +++ b/SRC/zherfsx.f @@ -391,7 +391,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup herfsx * * ===================================================================== SUBROUTINE ZHERFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/zhesv.f b/SRC/zhesv.f index f54023e508..03efbdc5ec 100644 --- a/SRC/zhesv.f +++ b/SRC/zhesv.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEsolve +*> \ingroup hesv * * ===================================================================== SUBROUTINE ZHESV( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/zhesv_aa.f b/SRC/zhesv_aa.f index df8498c7a5..30f9e41a31 100644 --- a/SRC/zhesv_aa.f +++ b/SRC/zhesv_aa.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEsolve +*> \ingroup hesv_aa * * ===================================================================== SUBROUTINE ZHESV_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/zhesv_aa_2stage.f b/SRC/zhesv_aa_2stage.f index 79c01c546e..b68d7a5f33 100644 --- a/SRC/zhesv_aa_2stage.f +++ b/SRC/zhesv_aa_2stage.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEsolve +*> \ingroup hesv_aa_2stage * * ===================================================================== SUBROUTINE ZHESV_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/zhesv_rk.f b/SRC/zhesv_rk.f index 6333e9f363..8ef4ee9c13 100644 --- a/SRC/zhesv_rk.f +++ b/SRC/zhesv_rk.f @@ -205,7 +205,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEsolve +*> \ingroup hesv_rk * *> \par Contributors: * ================== diff --git a/SRC/zhesv_rook.f b/SRC/zhesv_rook.f index d44284182b..4c099face0 100644 --- a/SRC/zhesv_rook.f +++ b/SRC/zhesv_rook.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEsolve +*> \ingroup hesv_rook *> *> \verbatim *> diff --git a/SRC/zhesvx.f b/SRC/zhesvx.f index 485c81df63..db9ca6d521 100644 --- a/SRC/zhesvx.f +++ b/SRC/zhesvx.f @@ -276,7 +276,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEsolve +*> \ingroup hesvx * * ===================================================================== SUBROUTINE ZHESVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, diff --git a/SRC/zhesvxx.f b/SRC/zhesvxx.f index cafd58db10..f8580db056 100644 --- a/SRC/zhesvxx.f +++ b/SRC/zhesvxx.f @@ -496,7 +496,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEsolve +*> \ingroup hesvxx * * ===================================================================== SUBROUTINE ZHESVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/zheswapr.f b/SRC/zheswapr.f index 71b1ed1c49..e8966ca125 100644 --- a/SRC/zheswapr.f +++ b/SRC/zheswapr.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEauxiliary +*> \ingroup heswapr * * ===================================================================== SUBROUTINE ZHESWAPR( UPLO, N, A, LDA, I1, I2) diff --git a/SRC/zhetd2.f b/SRC/zhetd2.f index a6d900b7c7..1b1a523b55 100644 --- a/SRC/zhetd2.f +++ b/SRC/zhetd2.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetd2 * *> \par Further Details: * ===================== diff --git a/SRC/zhetf2.f b/SRC/zhetf2.f index 7a64951c71..5c3e8a3f6f 100644 --- a/SRC/zhetf2.f +++ b/SRC/zhetf2.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetf2 * *> \par Further Details: * ===================== diff --git a/SRC/zhetf2_rk.f b/SRC/zhetf2_rk.f index 87df901aa2..af47fb4893 100644 --- a/SRC/zhetf2_rk.f +++ b/SRC/zhetf2_rk.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetf2_rk * *> \par Further Details: * ===================== diff --git a/SRC/zhetf2_rook.f b/SRC/zhetf2_rook.f index 91172f6019..10e7194fdf 100644 --- a/SRC/zhetf2_rook.f +++ b/SRC/zhetf2_rook.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetf2_rook * *> \par Further Details: * ===================== diff --git a/SRC/zhetrd.f b/SRC/zhetrd.f index 5b7d6546cc..a1010bdfb4 100644 --- a/SRC/zhetrd.f +++ b/SRC/zhetrd.f @@ -139,7 +139,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrd * *> \par Further Details: * ===================== diff --git a/SRC/zhetrd_2stage.f b/SRC/zhetrd_2stage.f index b9d2f0eb19..652d6725db 100644 --- a/SRC/zhetrd_2stage.f +++ b/SRC/zhetrd_2stage.f @@ -4,23 +4,23 @@ * * =========== DOCUMENTATION =========== * -* Online html documentation available at -* http://www.netlib.org/lapack/explore-html/ +* Online html documentation available at +* http://www.netlib.org/lapack/explore-html/ * *> \htmlonly -*> Download ZHETRD_2STAGE + dependencies -*> -*> [TGZ] -*> -*> [ZIP] -*> +*> Download ZHETRD_2STAGE + dependencies +*> +*> [TGZ] +*> +*> [ZIP] +*> *> [TXT] -*> \endhtmlonly +*> \endhtmlonly * * Definition: * =========== * -* SUBROUTINE ZHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, +* SUBROUTINE ZHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, * HOUS2, LHOUS2, WORK, LWORK, INFO ) * * IMPLICIT NONE @@ -34,7 +34,7 @@ * COMPLEX*16 A( LDA, * ), TAU( * ), * HOUS2( * ), WORK( * ) * .. -* +* * *> \par Purpose: * ============= @@ -52,11 +52,11 @@ *> \param[in] VECT *> \verbatim *> VECT is CHARACTER*1 -*> = 'N': No need for the Housholder representation, +*> = 'N': No need for the Housholder representation, *> in particular for the second stage (Band to *> tridiagonal) and thus LHOUS2 is of size max(1, 4*N); -*> = 'V': the Householder representation is needed to -*> either generate Q1 Q2 or to apply Q1 Q2, +*> = 'V': the Householder representation is needed to +*> either generate Q1 Q2 or to apply Q1 Q2, *> then LHOUS2 is to be queried and computed. *> (NOT AVAILABLE IN THIS RELEASE). *> \endverbatim @@ -86,7 +86,7 @@ *> triangular part of A is not referenced. *> On exit, if UPLO = 'U', the band superdiagonal *> of A are overwritten by the corresponding elements of the -*> internal band-diagonal matrix AB, and the elements above +*> internal band-diagonal matrix AB, and the elements above *> the KD superdiagonal, with the array TAU, represent the unitary *> matrix Q1 as a product of elementary reflectors; if UPLO *> = 'L', the diagonal and band subdiagonal of A are over- @@ -117,7 +117,7 @@ *> \param[out] TAU *> \verbatim *> TAU is COMPLEX*16 array, dimension (N-KD) -*> The scalar factors of the elementary reflectors of +*> The scalar factors of the elementary reflectors of *> the first stage (see Further Details). *> \endverbatim *> @@ -157,9 +157,9 @@ *> message related to LWORK is issued by XERBLA. *> LWORK = MAX(1, dimension) where *> dimension = max(stage1,stage2) + (KD+1)*N -*> = N*KD + N*max(KD+1,FACTOPTNB) -*> + max(2*KD*KD, KD*NTHREADS) -*> + (KD+1)*N +*> = N*KD + N*max(KD+1,FACTOPTNB) +*> + max(2*KD*KD, KD*NTHREADS) +*> + (KD+1)*N *> where KD is the blocking size of the reduction, *> FACTOPTNB is the blocking used by the QR or LQ *> algorithm, usually FACTOPTNB=128 is a good choice @@ -177,12 +177,12 @@ * Authors: * ======== * -*> \author Univ. of Tennessee -*> \author Univ. of California Berkeley -*> \author Univ. of Colorado Denver -*> \author NAG Ltd. +*> \author Univ. of Tennessee +*> \author Univ. of California Berkeley +*> \author Univ. of Colorado Denver +*> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrd_2stage * *> \par Further Details: * ===================== @@ -202,7 +202,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -210,16 +210,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - SUBROUTINE ZHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, + SUBROUTINE ZHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, $ HOUS2, LHOUS2, WORK, LWORK, INFO ) * IMPLICIT NONE @@ -309,14 +309,14 @@ SUBROUTINE ZHETRD_2STAGE( VECT, UPLO, N, A, LDA, D, E, TAU, LWRK = LWORK-LDAB*N ABPOS = 1 WPOS = ABPOS + LDAB*N - CALL ZHETRD_HE2HB( UPLO, N, KD, A, LDA, WORK( ABPOS ), LDAB, + CALL ZHETRD_HE2HB( UPLO, N, KD, A, LDA, WORK( ABPOS ), LDAB, $ TAU, WORK( WPOS ), LWRK, INFO ) IF( INFO.NE.0 ) THEN CALL XERBLA( 'ZHETRD_HE2HB', -INFO ) RETURN END IF - CALL ZHETRD_HB2ST( 'Y', VECT, UPLO, N, KD, - $ WORK( ABPOS ), LDAB, D, E, + CALL ZHETRD_HB2ST( 'Y', VECT, UPLO, N, KD, + $ WORK( ABPOS ), LDAB, D, E, $ HOUS2, LHOUS2, WORK( WPOS ), LWRK, INFO ) IF( INFO.NE.0 ) THEN CALL XERBLA( 'ZHETRD_HB2ST', -INFO ) diff --git a/SRC/zhetrd_hb2st.F b/SRC/zhetrd_hb2st.F index 1d39ac9428..4f04d82c69 100644 --- a/SRC/zhetrd_hb2st.F +++ b/SRC/zhetrd_hb2st.F @@ -18,7 +18,7 @@ * Definition: * =========== * -* SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, +* SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * D, E, HOUS, LHOUS, WORK, LWORK, INFO ) * * #if defined(_OPENMP) @@ -53,12 +53,12 @@ *> \param[in] STAGE1 *> \verbatim *> STAGE1 is CHARACTER*1 -*> = 'N': "No": to mention that the stage 1 of the reduction +*> = 'N': "No": to mention that the stage 1 of the reduction *> from dense to band using the zhetrd_he2hb routine -*> was not called before this routine to reproduce AB. -*> In other term this routine is called as standalone. -*> = 'Y': "Yes": to mention that the stage 1 of the -*> reduction from dense to band using the zhetrd_he2hb +*> was not called before this routine to reproduce AB. +*> In other term this routine is called as standalone. +*> = 'Y': "Yes": to mention that the stage 1 of the +*> reduction from dense to band using the zhetrd_he2hb *> routine has been called to produce AB (e.g., AB is *> the output of zhetrd_he2hb. *> \endverbatim @@ -66,10 +66,10 @@ *> \param[in] VECT *> \verbatim *> VECT is CHARACTER*1 -*> = 'N': No need for the Housholder representation, +*> = 'N': No need for the Housholder representation, *> and thus LHOUS is of size max(1, 4*N); -*> = 'V': the Householder representation is needed to -*> either generate or to apply Q later on, +*> = 'V': the Householder representation is needed to +*> either generate or to apply Q later on, *> then LHOUS is to be queried and computed. *> (NOT AVAILABLE IN THIS RELEASE). *> \endverbatim @@ -147,7 +147,7 @@ *> message related to LHOUS is issued by XERBLA. *> LHOUS = MAX(1, dimension) where *> dimension = 4*N if VECT='N' -*> not available now if VECT='H' +*> not available now if VECT='H' *> \endverbatim *> *> \param[out] WORK @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hetrd_hb2st * *> \par Further Details: * ===================== @@ -208,7 +208,7 @@ *> http://doi.acm.org/10.1145/2063384.2063394 *> *> A. Haidar, J. Kurzak, P. Luszczek, 2013. -*> An improved parallel singular value algorithm and its implementation +*> An improved parallel singular value algorithm and its implementation *> for multicore hardware, In Proceedings of 2013 International Conference *> for High Performance Computing, Networking, Storage and Analysis (SC '13). *> Denver, Colorado, USA, 2013. @@ -216,16 +216,16 @@ *> http://doi.acm.org/10.1145/2503210.2503292 *> *> A. Haidar, R. Solca, S. Tomov, T. Schulthess and J. Dongarra. -*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure +*> A novel hybrid CPU-GPU generalized eigensolver for electronic structure *> calculations based on fine-grained memory aware tasks. *> International Journal of High Performance Computing Applications. *> Volume 28 Issue 2, Pages 196-209, May 2014. -*> http://hpc.sagepub.com/content/28/2/196 +*> http://hpc.sagepub.com/content/28/2/196 *> *> \endverbatim *> * ===================================================================== - SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, + SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, $ D, E, HOUS, LHOUS, WORK, LWORK, INFO ) * * @@ -259,11 +259,11 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * .. * .. Local Scalars .. LOGICAL LQUERY, WANTQ, UPPER, AFTERS1 - INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST, + INTEGER I, M, K, IB, SWEEPID, MYID, SHIFT, STT, ST, $ ED, STIND, EDIND, BLKLASTIND, COLPT, THED, $ STEPERCOL, GRSIZ, THGRSIZ, THGRNB, THGRID, $ NBTILES, TTYPE, TID, NTHREADS, DEBUG, - $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS, + $ ABDPOS, ABOFDPOS, DPOS, OFDPOS, AWPOS, $ INDA, INDW, APOS, SIZEA, LDA, INDV, INDTAU, $ SIZEV, SIZETAU, LDV, LHMIN, LWMIN DOUBLE PRECISION ABSTMP @@ -277,7 +277,7 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * .. * .. External Functions .. LOGICAL LSAME - INTEGER ILAENV2STAGE + INTEGER ILAENV2STAGE EXTERNAL LSAME, ILAENV2STAGE * .. * .. Executable Statements .. @@ -358,7 +358,7 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ABDPOS = KD + 1 ABOFDPOS = KD ELSE - APOS = INDA + APOS = INDA AWPOS = INDA + KD + 1 DPOS = APOS OFDPOS = DPOS + 1 @@ -366,11 +366,11 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ABOFDPOS = 2 ENDIF -* -* Case KD=0: -* The matrix is diagonal. We just copy it (convert to "real" for -* complex because D is double and the imaginary part should be 0) -* and store it in D. A sequential code here is better or +* +* Case KD=0: +* The matrix is diagonal. We just copy it (convert to "real" for +* complex because D is double and the imaginary part should be 0) +* and store it in D. A sequential code here is better or * in a parallel environment it might need two cores for D and E * IF( KD.EQ.0 ) THEN @@ -385,17 +385,17 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, WORK( 1 ) = 1 RETURN END IF -* -* Case KD=1: -* The matrix is already Tridiagonal. We have to make diagonal +* +* Case KD=1: +* The matrix is already Tridiagonal. We have to make diagonal * and offdiagonal elements real, and store them in D and E. -* For that, for real precision just copy the diag and offdiag -* to D and E while for the COMPLEX case the bulge chasing is -* performed to convert the hermetian tridiagonal to symmetric -* tridiagonal. A simpler conversion formula might be used, but then +* For that, for real precision just copy the diag and offdiag +* to D and E while for the COMPLEX case the bulge chasing is +* performed to convert the hermetian tridiagonal to symmetric +* tridiagonal. A simpler conversion formula might be used, but then * updating the Q matrix will be required and based if Q is generated -* or not this might complicate the story. -* +* or not this might complicate the story. +* IF( KD.EQ.1 ) THEN DO 50 I = 1, N D( I ) = DBLE( AB( ABDPOS, I ) ) @@ -444,7 +444,7 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, RETURN END IF * -* Main code start here. +* Main code start here. * Reduce the hermitian band of A to a tridiagonal matrix. * THGRSIZ = N @@ -453,7 +453,7 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, NBTILES = CEILING( REAL(N)/REAL(KD) ) STEPERCOL = CEILING( REAL(SHIFT)/REAL(GRSIZ) ) THGRNB = CEILING( REAL(N-1)/REAL(THGRSIZ) ) -* +* CALL ZLACPY( "A", KD+1, N, AB, LDAB, WORK( APOS ), LDA ) CALL ZLASET( "A", KD, N, ZERO, ZERO, WORK( AWPOS ), LDA ) * @@ -462,7 +462,7 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * #if defined(_OPENMP) !$OMP PARALLEL PRIVATE( TID, THGRID, BLKLASTIND ) -!$OMP$ PRIVATE( THED, I, M, K, ST, ED, STT, SWEEPID ) +!$OMP$ PRIVATE( THED, I, M, K, ST, ED, STT, SWEEPID ) !$OMP$ PRIVATE( MYID, TTYPE, COLPT, STIND, EDIND ) !$OMP$ SHARED ( UPLO, WANTQ, INDV, INDTAU, HOUS, WORK) !$OMP$ SHARED ( N, KD, IB, NBTILES, LDA, LDV, INDA ) @@ -471,7 +471,7 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, #endif * * main bulge chasing loop -* +* DO 100 THGRID = 1, THGRNB STT = (THGRID-1)*THGRSIZ+1 THED = MIN( (STT + THGRSIZ -1), (N-1)) @@ -482,7 +482,7 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ST = STT DO 130 SWEEPID = ST, ED DO 140 K = 1, GRSIZ - MYID = (I-SWEEPID)*(STEPERCOL*GRSIZ) + MYID = (I-SWEEPID)*(STEPERCOL*GRSIZ) $ + (M-1)*GRSIZ + K IF ( MYID.EQ.1 ) THEN TTYPE = 1 @@ -508,17 +508,17 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, ENDIF * * Call the kernel -* +* #if defined(_OPENMP) && _OPENMP >= 201307 - IF( TTYPE.NE.1 ) THEN + IF( TTYPE.NE.1 ) THEN !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1)) !$OMP$ DEPEND(in:WORK(MYID-1)) !$OMP$ DEPEND(out:WORK(MYID)) TID = OMP_GET_THREAD_NUM() - CALL ZHB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL ZHB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW + TID*KD ) ) !$OMP END TASK @@ -526,20 +526,20 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, !$OMP TASK DEPEND(in:WORK(MYID+SHIFT-1)) !$OMP$ DEPEND(out:WORK(MYID)) TID = OMP_GET_THREAD_NUM() - CALL ZHB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL ZHB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW + TID*KD ) ) !$OMP END TASK ENDIF #else - CALL ZHB2ST_KERNELS( UPLO, WANTQ, TTYPE, + CALL ZHB2ST_KERNELS( UPLO, WANTQ, TTYPE, $ STIND, EDIND, SWEEPID, N, KD, IB, - $ WORK ( INDA ), LDA, + $ WORK ( INDA ), LDA, $ HOUS( INDV ), HOUS( INDTAU ), LDV, $ WORK( INDW ) ) -#endif +#endif IF ( BLKLASTIND.GE.(N-1) ) THEN STT = STT + 1 EXIT @@ -554,14 +554,14 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, !$OMP END MASTER !$OMP END PARALLEL #endif -* +* * Copy the diagonal from A to D. Note that D is REAL thus only * the Real part is needed, the imaginary part should be zero. * DO 150 I = 1, N D( I ) = DBLE( WORK( DPOS+(I-1)*LDA ) ) 150 CONTINUE -* +* * Copy the off diagonal from A to E. Note that E is REAL thus only * the Real part is needed, the imaginary part should be zero. * @@ -582,4 +582,4 @@ SUBROUTINE ZHETRD_HB2ST( STAGE1, VECT, UPLO, N, KD, AB, LDAB, * End of ZHETRD_HB2ST * END - + diff --git a/SRC/zhetrd_he2hb.f b/SRC/zhetrd_he2hb.f index 51e2d209b6..e0a70cbb85 100644 --- a/SRC/zhetrd_he2hb.f +++ b/SRC/zhetrd_he2hb.f @@ -158,7 +158,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrd_he2hb * *> \par Further Details: * ===================== diff --git a/SRC/zhetrf.f b/SRC/zhetrf.f index 78d4f71b89..cb5429839a 100644 --- a/SRC/zhetrf.f +++ b/SRC/zhetrf.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrf * *> \par Further Details: * ===================== diff --git a/SRC/zhetrf_aa.f b/SRC/zhetrf_aa.f index 537c16e8cd..acca14627a 100644 --- a/SRC/zhetrf_aa.f +++ b/SRC/zhetrf_aa.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrf_aa * * ===================================================================== SUBROUTINE ZHETRF_AA( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO) diff --git a/SRC/zhetrf_aa_2stage.f b/SRC/zhetrf_aa_2stage.f index 477602b5e6..631f7deb6f 100644 --- a/SRC/zhetrf_aa_2stage.f +++ b/SRC/zhetrf_aa_2stage.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrf_aa_2stage * * ===================================================================== SUBROUTINE ZHETRF_AA_2STAGE( UPLO, N, A, LDA, TB, LTB, IPIV, diff --git a/SRC/zhetrf_rk.f b/SRC/zhetrf_rk.f index 73dd9f9d07..f0c3b68bb2 100644 --- a/SRC/zhetrf_rk.f +++ b/SRC/zhetrf_rk.f @@ -229,7 +229,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrf_rk * *> \par Further Details: * ===================== diff --git a/SRC/zhetrf_rook.f b/SRC/zhetrf_rook.f index e9de472486..9cae55366c 100644 --- a/SRC/zhetrf_rook.f +++ b/SRC/zhetrf_rook.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrf_rook * *> \par Further Details: * ===================== diff --git a/SRC/zhetri.f b/SRC/zhetri.f index 284ba87380..d2f2e51e30 100644 --- a/SRC/zhetri.f +++ b/SRC/zhetri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetri * * ===================================================================== SUBROUTINE ZHETRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) diff --git a/SRC/zhetri2.f b/SRC/zhetri2.f index 384745c3af..0748a6e989 100644 --- a/SRC/zhetri2.f +++ b/SRC/zhetri2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetri2 * * ===================================================================== SUBROUTINE ZHETRI2( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/zhetri2x.f b/SRC/zhetri2x.f index c1a3908dcf..44ea8aa870 100644 --- a/SRC/zhetri2x.f +++ b/SRC/zhetri2x.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetri2x * * ===================================================================== SUBROUTINE ZHETRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) diff --git a/SRC/zhetri_3.f b/SRC/zhetri_3.f index c778f1b9ef..30b82e6d68 100644 --- a/SRC/zhetri_3.f +++ b/SRC/zhetri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetri_3 * *> \par Contributors: * ================== diff --git a/SRC/zhetri_3x.f b/SRC/zhetri_3x.f index 941b7522f8..cb8108f8f2 100644 --- a/SRC/zhetri_3x.f +++ b/SRC/zhetri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetri_3x * *> \par Contributors: * ================== diff --git a/SRC/zhetri_rook.f b/SRC/zhetri_rook.f index f6ad6180dc..0fa7d11d74 100644 --- a/SRC/zhetri_rook.f +++ b/SRC/zhetri_rook.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetri_rook * *> \par Contributors: * ================== diff --git a/SRC/zhetrs.f b/SRC/zhetrs.f index b00821d7f2..54ce9711c4 100644 --- a/SRC/zhetrs.f +++ b/SRC/zhetrs.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrs * * ===================================================================== SUBROUTINE ZHETRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/zhetrs2.f b/SRC/zhetrs2.f index 010568c421..a67f3d8cb3 100644 --- a/SRC/zhetrs2.f +++ b/SRC/zhetrs2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrs2 * * ===================================================================== SUBROUTINE ZHETRS2( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/zhetrs_3.f b/SRC/zhetrs_3.f index 4de54bab48..f269a8cc7c 100644 --- a/SRC/zhetrs_3.f +++ b/SRC/zhetrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrs_3 * *> \par Contributors: * ================== diff --git a/SRC/zhetrs_aa.f b/SRC/zhetrs_aa.f index 06ac1fd287..b203665d0c 100644 --- a/SRC/zhetrs_aa.f +++ b/SRC/zhetrs_aa.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrs_aa * * ===================================================================== SUBROUTINE ZHETRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/zhetrs_aa_2stage.f b/SRC/zhetrs_aa_2stage.f index 74037f8a88..9c2b5362ea 100644 --- a/SRC/zhetrs_aa_2stage.f +++ b/SRC/zhetrs_aa_2stage.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrs_aa_2stage * * ===================================================================== SUBROUTINE ZHETRS_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/zhetrs_rook.f b/SRC/zhetrs_rook.f index cb05538244..3907f2c873 100644 --- a/SRC/zhetrs_rook.f +++ b/SRC/zhetrs_rook.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup hetrs_rook * *> \par Contributors: * ================== diff --git a/SRC/zhfrk.f b/SRC/zhfrk.f index 2fd8fa04db..9e1874bcbb 100644 --- a/SRC/zhfrk.f +++ b/SRC/zhfrk.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hfrk * * ===================================================================== SUBROUTINE ZHFRK( TRANSR, UPLO, TRANS, N, K, ALPHA, A, LDA, BETA, diff --git a/SRC/zhgeqz.f b/SRC/zhgeqz.f index c15e7aace4..0b37d7d970 100644 --- a/SRC/zhgeqz.f +++ b/SRC/zhgeqz.f @@ -266,7 +266,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup hgeqz * *> \par Further Details: * ===================== diff --git a/SRC/zhpcon.f b/SRC/zhpcon.f index c028529b18..6d61a696f7 100644 --- a/SRC/zhpcon.f +++ b/SRC/zhpcon.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hpcon * * ===================================================================== SUBROUTINE ZHPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, INFO ) diff --git a/SRC/zhpev.f b/SRC/zhpev.f index bc43049d87..2878284a44 100644 --- a/SRC/zhpev.f +++ b/SRC/zhpev.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hpev * * ===================================================================== SUBROUTINE ZHPEV( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, RWORK, diff --git a/SRC/zhpevd.f b/SRC/zhpevd.f index 5260aaf14a..9250cc4a42 100644 --- a/SRC/zhpevd.f +++ b/SRC/zhpevd.f @@ -186,7 +186,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hpevd * * ===================================================================== SUBROUTINE ZHPEVD( JOBZ, UPLO, N, AP, W, Z, LDZ, WORK, LWORK, diff --git a/SRC/zhpevx.f b/SRC/zhpevx.f index 0fc80c51a4..c72647e090 100644 --- a/SRC/zhpevx.f +++ b/SRC/zhpevx.f @@ -231,7 +231,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hpevx * * ===================================================================== SUBROUTINE ZHPEVX( JOBZ, RANGE, UPLO, N, AP, VL, VU, IL, IU, diff --git a/SRC/zhpgst.f b/SRC/zhpgst.f index 49822e09d7..16a37e2504 100644 --- a/SRC/zhpgst.f +++ b/SRC/zhpgst.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hpgst * * ===================================================================== SUBROUTINE ZHPGST( ITYPE, UPLO, N, AP, BP, INFO ) diff --git a/SRC/zhpgv.f b/SRC/zhpgv.f index b921685551..2e004bb594 100644 --- a/SRC/zhpgv.f +++ b/SRC/zhpgv.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hpgv * * ===================================================================== SUBROUTINE ZHPGV( ITYPE, JOBZ, UPLO, N, AP, BP, W, Z, LDZ, WORK, diff --git a/SRC/zhpgvd.f b/SRC/zhpgvd.f index dfe92067cf..b2c7451f9c 100644 --- a/SRC/zhpgvd.f +++ b/SRC/zhpgvd.f @@ -212,7 +212,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hpgvd * *> \par Contributors: * ================== diff --git a/SRC/zhpgvx.f b/SRC/zhpgvx.f index de75b486b2..711888c3d6 100644 --- a/SRC/zhpgvx.f +++ b/SRC/zhpgvx.f @@ -263,7 +263,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHEReigen +*> \ingroup hpgvx * *> \par Contributors: * ================== diff --git a/SRC/zhprfs.f b/SRC/zhprfs.f index 4aa91aa9d3..097b3f561c 100644 --- a/SRC/zhprfs.f +++ b/SRC/zhprfs.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hprfs * * ===================================================================== SUBROUTINE ZHPRFS( UPLO, N, NRHS, AP, AFP, IPIV, B, LDB, X, LDX, diff --git a/SRC/zhpsv.f b/SRC/zhpsv.f index 671eac6e60..1af382199d 100644 --- a/SRC/zhpsv.f +++ b/SRC/zhpsv.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup hpsv * *> \par Further Details: * ===================== diff --git a/SRC/zhpsvx.f b/SRC/zhpsvx.f index 5c7b2e6ce0..0278f1ccfb 100644 --- a/SRC/zhpsvx.f +++ b/SRC/zhpsvx.f @@ -249,7 +249,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup hpsvx * *> \par Further Details: * ===================== diff --git a/SRC/zhptrd.f b/SRC/zhptrd.f index d933af8942..3cf8adc6b5 100644 --- a/SRC/zhptrd.f +++ b/SRC/zhptrd.f @@ -112,7 +112,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hptrd * *> \par Further Details: * ===================== diff --git a/SRC/zhptrf.f b/SRC/zhptrf.f index 9c736f3352..4cf3ba52af 100644 --- a/SRC/zhptrf.f +++ b/SRC/zhptrf.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hptrf * *> \par Further Details: * ===================== diff --git a/SRC/zhptri.f b/SRC/zhptri.f index 61147cac2a..7c37ece0e8 100644 --- a/SRC/zhptri.f +++ b/SRC/zhptri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hptri * * ===================================================================== SUBROUTINE ZHPTRI( UPLO, N, AP, IPIV, WORK, INFO ) diff --git a/SRC/zhptrs.f b/SRC/zhptrs.f index ddf8d8eb0c..edeea0972f 100644 --- a/SRC/zhptrs.f +++ b/SRC/zhptrs.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hptrs * * ===================================================================== SUBROUTINE ZHPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) diff --git a/SRC/zhsein.f b/SRC/zhsein.f index 4d3594017e..959b0fdcf6 100644 --- a/SRC/zhsein.f +++ b/SRC/zhsein.f @@ -226,7 +226,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hsein * *> \par Further Details: * ===================== diff --git a/SRC/zhseqr.f b/SRC/zhseqr.f index d483641c8f..2cddf9b760 100644 --- a/SRC/zhseqr.f +++ b/SRC/zhseqr.f @@ -216,7 +216,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hseqr * *> \par Contributors: * ================== diff --git a/SRC/zla_gbamv.f b/SRC/zla_gbamv.f index a4a9bc0a08..9df7d30a06 100644 --- a/SRC/zla_gbamv.f +++ b/SRC/zla_gbamv.f @@ -178,7 +178,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup la_gbamv * * ===================================================================== SUBROUTINE ZLA_GBAMV( TRANS, M, N, KL, KU, ALPHA, AB, LDAB, X, diff --git a/SRC/zla_gbrcond_c.f b/SRC/zla_gbrcond_c.f index 6515c383e4..616680be10 100644 --- a/SRC/zla_gbrcond_c.f +++ b/SRC/zla_gbrcond_c.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup la_gbrcond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_GBRCOND_C( TRANS, N, KL, KU, AB, diff --git a/SRC/zla_gbrcond_x.f b/SRC/zla_gbrcond_x.f index a3e89f3283..08e94c7e63 100644 --- a/SRC/zla_gbrcond_x.f +++ b/SRC/zla_gbrcond_x.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup la_gbrcond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_GBRCOND_X( TRANS, N, KL, KU, AB, diff --git a/SRC/zla_gbrfsx_extended.f b/SRC/zla_gbrfsx_extended.f index 2f57b7682d..3ca0983c49 100644 --- a/SRC/zla_gbrfsx_extended.f +++ b/SRC/zla_gbrfsx_extended.f @@ -397,7 +397,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup la_gbrfsx_extended * * ===================================================================== SUBROUTINE ZLA_GBRFSX_EXTENDED( PREC_TYPE, TRANS_TYPE, N, KL, KU, diff --git a/SRC/zla_gbrpvgrw.f b/SRC/zla_gbrpvgrw.f index 7bf810169c..26bd8b9deb 100644 --- a/SRC/zla_gbrpvgrw.f +++ b/SRC/zla_gbrpvgrw.f @@ -109,7 +109,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup la_gbrpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_GBRPVGRW( N, KL, KU, NCOLS, AB, diff --git a/SRC/zla_geamv.f b/SRC/zla_geamv.f index bcdc5f1283..e18e14a4b0 100644 --- a/SRC/zla_geamv.f +++ b/SRC/zla_geamv.f @@ -167,7 +167,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup la_geamv * * ===================================================================== SUBROUTINE ZLA_GEAMV( TRANS, M, N, ALPHA, A, LDA, X, INCX, BETA, diff --git a/SRC/zla_gercond_c.f b/SRC/zla_gercond_c.f index 8c8caca467..4b62e225d0 100644 --- a/SRC/zla_gercond_c.f +++ b/SRC/zla_gercond_c.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup la_gercond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_GERCOND_C( TRANS, N, A, LDA, AF, diff --git a/SRC/zla_gercond_x.f b/SRC/zla_gercond_x.f index 9de53ec91b..e5d3dd32e1 100644 --- a/SRC/zla_gercond_x.f +++ b/SRC/zla_gercond_x.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup la_gercond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_GERCOND_X( TRANS, N, A, LDA, AF, diff --git a/SRC/zla_gerfsx_extended.f b/SRC/zla_gerfsx_extended.f index 22e45c5a93..cd9990ffa1 100644 --- a/SRC/zla_gerfsx_extended.f +++ b/SRC/zla_gerfsx_extended.f @@ -384,7 +384,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup la_gerfsx_extended * * ===================================================================== SUBROUTINE ZLA_GERFSX_EXTENDED( PREC_TYPE, TRANS_TYPE, N, NRHS, A, diff --git a/SRC/zla_gerpvgrw.f b/SRC/zla_gerpvgrw.f index 64da5a1ff6..b0c502f21c 100644 --- a/SRC/zla_gerpvgrw.f +++ b/SRC/zla_gerpvgrw.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup la_gerpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_GERPVGRW( N, NCOLS, A, LDA, AF, diff --git a/SRC/zla_heamv.f b/SRC/zla_heamv.f index 66cece241c..d17f504ef3 100644 --- a/SRC/zla_heamv.f +++ b/SRC/zla_heamv.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup la_heamv * *> \par Further Details: * ===================== diff --git a/SRC/zla_hercond_c.f b/SRC/zla_hercond_c.f index 9de54ea524..9dcda014fe 100644 --- a/SRC/zla_hercond_c.f +++ b/SRC/zla_hercond_c.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup la_hercond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_HERCOND_C( UPLO, N, A, LDA, AF, diff --git a/SRC/zla_hercond_x.f b/SRC/zla_hercond_x.f index e1ffafd496..b3650cd808 100644 --- a/SRC/zla_hercond_x.f +++ b/SRC/zla_hercond_x.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup la_hercond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_HERCOND_X( UPLO, N, A, LDA, AF, diff --git a/SRC/zla_herfsx_extended.f b/SRC/zla_herfsx_extended.f index 689460a02e..65af0807de 100644 --- a/SRC/zla_herfsx_extended.f +++ b/SRC/zla_herfsx_extended.f @@ -382,7 +382,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup la_herfsx_extended * * ===================================================================== SUBROUTINE ZLA_HERFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/zla_herpvgrw.f b/SRC/zla_herpvgrw.f index 76571f6da5..daeb94a552 100644 --- a/SRC/zla_herpvgrw.f +++ b/SRC/zla_herpvgrw.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup la_herpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_HERPVGRW( UPLO, N, INFO, A, LDA, AF, diff --git a/SRC/zla_lin_berr.f b/SRC/zla_lin_berr.f index 5ca205b98b..b07efd568b 100644 --- a/SRC/zla_lin_berr.f +++ b/SRC/zla_lin_berr.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup la_lin_berr * * ===================================================================== SUBROUTINE ZLA_LIN_BERR( N, NZ, NRHS, RES, AYB, BERR ) diff --git a/SRC/zla_porcond_c.f b/SRC/zla_porcond_c.f index 6133f43dfe..0376fae742 100644 --- a/SRC/zla_porcond_c.f +++ b/SRC/zla_porcond_c.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup la_porcond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_PORCOND_C( UPLO, N, A, LDA, AF, diff --git a/SRC/zla_porcond_x.f b/SRC/zla_porcond_x.f index e73718cfc5..36e4dc844e 100644 --- a/SRC/zla_porcond_x.f +++ b/SRC/zla_porcond_x.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup la_porcond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_PORCOND_X( UPLO, N, A, LDA, AF, diff --git a/SRC/zla_porfsx_extended.f b/SRC/zla_porfsx_extended.f index e853494fc1..8cd3f16031 100644 --- a/SRC/zla_porfsx_extended.f +++ b/SRC/zla_porfsx_extended.f @@ -374,7 +374,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup la_porfsx_extended * * ===================================================================== SUBROUTINE ZLA_PORFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/zla_porpvgrw.f b/SRC/zla_porpvgrw.f index 897589aa01..11a42e4199 100644 --- a/SRC/zla_porpvgrw.f +++ b/SRC/zla_porpvgrw.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup la_porpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_PORPVGRW( UPLO, NCOLS, A, LDA, AF, diff --git a/SRC/zla_syamv.f b/SRC/zla_syamv.f index d00406fb57..db8bc95bc0 100644 --- a/SRC/zla_syamv.f +++ b/SRC/zla_syamv.f @@ -155,7 +155,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup la_heamv * *> \par Further Details: * ===================== diff --git a/SRC/zla_syrcond_c.f b/SRC/zla_syrcond_c.f index fd7287373c..3a4056e7c2 100644 --- a/SRC/zla_syrcond_c.f +++ b/SRC/zla_syrcond_c.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup la_hercond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_SYRCOND_C( UPLO, N, A, LDA, AF, diff --git a/SRC/zla_syrcond_x.f b/SRC/zla_syrcond_x.f index 85ef929bfa..b5591aadb6 100644 --- a/SRC/zla_syrcond_x.f +++ b/SRC/zla_syrcond_x.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup la_hercond * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_SYRCOND_X( UPLO, N, A, LDA, AF, diff --git a/SRC/zla_syrfsx_extended.f b/SRC/zla_syrfsx_extended.f index fb1b9e2d7f..97287999a2 100644 --- a/SRC/zla_syrfsx_extended.f +++ b/SRC/zla_syrfsx_extended.f @@ -382,7 +382,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup la_herfsx_extended * * ===================================================================== SUBROUTINE ZLA_SYRFSX_EXTENDED( PREC_TYPE, UPLO, N, NRHS, A, LDA, diff --git a/SRC/zla_syrpvgrw.f b/SRC/zla_syrpvgrw.f index d256eee304..d9e0a8a7ff 100644 --- a/SRC/zla_syrpvgrw.f +++ b/SRC/zla_syrpvgrw.f @@ -115,7 +115,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup la_herpvgrw * * ===================================================================== DOUBLE PRECISION FUNCTION ZLA_SYRPVGRW( UPLO, N, INFO, A, LDA, AF, diff --git a/SRC/zla_wwaddw.f b/SRC/zla_wwaddw.f index e9d8366463..18d415967a 100644 --- a/SRC/zla_wwaddw.f +++ b/SRC/zla_wwaddw.f @@ -74,7 +74,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup la_wwaddw * * ===================================================================== SUBROUTINE ZLA_WWADDW( N, X, Y, W ) diff --git a/SRC/zlabrd.f b/SRC/zlabrd.f index ab3b3217fd..e0d4396da6 100644 --- a/SRC/zlabrd.f +++ b/SRC/zlabrd.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup labrd * *> \par Further Details: * ===================== diff --git a/SRC/zlacgv.f b/SRC/zlacgv.f index dc935e08f4..1496def6a1 100644 --- a/SRC/zlacgv.f +++ b/SRC/zlacgv.f @@ -67,7 +67,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lacgv * * ===================================================================== SUBROUTINE ZLACGV( N, X, INCX ) diff --git a/SRC/zlacn2.f b/SRC/zlacn2.f index d301d95f44..14f437e5ba 100644 --- a/SRC/zlacn2.f +++ b/SRC/zlacn2.f @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lacn2 * *> \par Further Details: * ===================== diff --git a/SRC/zlacon.f b/SRC/zlacon.f index 61f20d042a..687fd8e15f 100644 --- a/SRC/zlacon.f +++ b/SRC/zlacon.f @@ -89,7 +89,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lacon * *> \par Further Details: * ===================== diff --git a/SRC/zlacp2.f b/SRC/zlacp2.f index 001043a53d..0b32918e07 100644 --- a/SRC/zlacp2.f +++ b/SRC/zlacp2.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lacp2 * * ===================================================================== SUBROUTINE ZLACP2( UPLO, M, N, A, LDA, B, LDB ) diff --git a/SRC/zlacpy.f b/SRC/zlacpy.f index 06017509e0..bb4f3d192b 100644 --- a/SRC/zlacpy.f +++ b/SRC/zlacpy.f @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lacpy * * ===================================================================== SUBROUTINE ZLACPY( UPLO, M, N, A, LDA, B, LDB ) diff --git a/SRC/zlacrm.f b/SRC/zlacrm.f index ce8b9b02c5..1d09e34260 100644 --- a/SRC/zlacrm.f +++ b/SRC/zlacrm.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lacrm * * ===================================================================== SUBROUTINE ZLACRM( M, N, A, LDA, B, LDB, C, LDC, RWORK ) diff --git a/SRC/zlacrt.f b/SRC/zlacrt.f index b64ace8d2d..7d48ec40fb 100644 --- a/SRC/zlacrt.f +++ b/SRC/zlacrt.f @@ -98,7 +98,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lacrt * * ===================================================================== SUBROUTINE ZLACRT( N, CX, INCX, CY, INCY, C, S ) diff --git a/SRC/zladiv.f b/SRC/zladiv.f index ae111d73d6..74a5414e5c 100644 --- a/SRC/zladiv.f +++ b/SRC/zladiv.f @@ -57,7 +57,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup ladiv * * ===================================================================== COMPLEX*16 FUNCTION ZLADIV( X, Y ) diff --git a/SRC/zlaed0.f b/SRC/zlaed0.f index c4deac037a..02983d6155 100644 --- a/SRC/zlaed0.f +++ b/SRC/zlaed0.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup laed0 * * ===================================================================== SUBROUTINE ZLAED0( QSIZ, N, D, E, Q, LDQ, QSTORE, LDQS, RWORK, diff --git a/SRC/zlaed7.f b/SRC/zlaed7.f index 86e5ec6b55..215e074e9e 100644 --- a/SRC/zlaed7.f +++ b/SRC/zlaed7.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup laed7 * * ===================================================================== SUBROUTINE ZLAED7( N, CUTPNT, QSIZ, TLVLS, CURLVL, CURPBM, D, Q, diff --git a/SRC/zlaed8.f b/SRC/zlaed8.f index 0037258204..190865649e 100644 --- a/SRC/zlaed8.f +++ b/SRC/zlaed8.f @@ -219,7 +219,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup laed8 * * ===================================================================== SUBROUTINE ZLAED8( K, N, QSIZ, Q, LDQ, D, RHO, CUTPNT, Z, DLAMBDA, diff --git a/SRC/zlaein.f b/SRC/zlaein.f index 7e0f6f1094..dbafa04354 100644 --- a/SRC/zlaein.f +++ b/SRC/zlaein.f @@ -141,7 +141,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laein * * ===================================================================== SUBROUTINE ZLAEIN( RIGHTV, NOINIT, N, H, LDH, W, V, B, LDB, RWORK, diff --git a/SRC/zlaesy.f b/SRC/zlaesy.f index eddf453ecc..2dd3f36a37 100644 --- a/SRC/zlaesy.f +++ b/SRC/zlaesy.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYauxiliary +*> \ingroup laesy * * ===================================================================== SUBROUTINE ZLAESY( A, B, C, RT1, RT2, EVSCAL, CS1, SN1 ) diff --git a/SRC/zlaev2.f b/SRC/zlaev2.f index de2d9cbb7b..2440753644 100644 --- a/SRC/zlaev2.f +++ b/SRC/zlaev2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laev2 * *> \par Further Details: * ===================== diff --git a/SRC/zlag2c.f b/SRC/zlag2c.f index 434590bb9c..f30536854a 100644 --- a/SRC/zlag2c.f +++ b/SRC/zlag2c.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup _lag2_ * * ===================================================================== SUBROUTINE ZLAG2C( M, N, A, LDA, SA, LDSA, INFO ) diff --git a/SRC/zlags2.f b/SRC/zlags2.f index 1332b052f1..21b59d26b3 100644 --- a/SRC/zlags2.f +++ b/SRC/zlags2.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lags2 * * ===================================================================== SUBROUTINE ZLAGS2( UPPER, A1, A2, A3, B1, B2, B3, CSU, SNU, CSV, diff --git a/SRC/zlagtm.f b/SRC/zlagtm.f index 576490899d..958d52b8f6 100644 --- a/SRC/zlagtm.f +++ b/SRC/zlagtm.f @@ -137,7 +137,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lagtm * * ===================================================================== SUBROUTINE ZLAGTM( TRANS, N, NRHS, ALPHA, DL, D, DU, X, LDX, BETA, diff --git a/SRC/zlahef.f b/SRC/zlahef.f index 22a638ba82..385250bebf 100644 --- a/SRC/zlahef.f +++ b/SRC/zlahef.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup lahef * *> \par Contributors: * ================== diff --git a/SRC/zlahef_aa.f b/SRC/zlahef_aa.f index 37bd29f888..9d687d5a20 100644 --- a/SRC/zlahef_aa.f +++ b/SRC/zlahef_aa.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup lahef_aa * * ===================================================================== SUBROUTINE ZLAHEF_AA( UPLO, J1, M, NB, A, LDA, IPIV, diff --git a/SRC/zlahef_rk.f b/SRC/zlahef_rk.f index ed66e133da..1876934453 100644 --- a/SRC/zlahef_rk.f +++ b/SRC/zlahef_rk.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup lahef_rk * *> \par Contributors: * ================== diff --git a/SRC/zlahef_rook.f b/SRC/zlahef_rook.f index 65f70a5978..41fece5cf0 100644 --- a/SRC/zlahef_rook.f +++ b/SRC/zlahef_rook.f @@ -162,7 +162,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEcomputational +*> \ingroup lahef_rook * *> \par Contributors: * ================== diff --git a/SRC/zlahqr.f b/SRC/zlahqr.f index d20021f614..c5fb344b95 100644 --- a/SRC/zlahqr.f +++ b/SRC/zlahqr.f @@ -171,7 +171,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lahqr * *> \par Contributors: * ================== diff --git a/SRC/zlahr2.f b/SRC/zlahr2.f index 60ba5f0310..df9e2daac6 100644 --- a/SRC/zlahr2.f +++ b/SRC/zlahr2.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lahr2 * *> \par Further Details: * ===================== diff --git a/SRC/zlaic1.f b/SRC/zlaic1.f index 47927e7789..4cc4282de3 100644 --- a/SRC/zlaic1.f +++ b/SRC/zlaic1.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laic1 * * ===================================================================== SUBROUTINE ZLAIC1( JOB, J, X, SEST, W, GAMMA, SESTPR, S, C ) diff --git a/SRC/zlals0.f b/SRC/zlals0.f index 79c0cf5e40..10341ab6c1 100644 --- a/SRC/zlals0.f +++ b/SRC/zlals0.f @@ -254,7 +254,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup lals0 * *> \par Contributors: * ================== diff --git a/SRC/zlalsa.f b/SRC/zlalsa.f index d419598d21..88a4a2e370 100644 --- a/SRC/zlalsa.f +++ b/SRC/zlalsa.f @@ -250,7 +250,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup lalsa * *> \par Contributors: * ================== diff --git a/SRC/zlalsd.f b/SRC/zlalsd.f index 1d7358aa97..a49b44da25 100644 --- a/SRC/zlalsd.f +++ b/SRC/zlalsd.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup lalsd * *> \par Contributors: * ================== diff --git a/SRC/zlamswlq.f b/SRC/zlamswlq.f index 4abefa4343..cf478d6713 100644 --- a/SRC/zlamswlq.f +++ b/SRC/zlamswlq.f @@ -189,6 +189,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup lamswlq +*> * ===================================================================== SUBROUTINE ZLAMSWLQ( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/zlamtsqr.f b/SRC/zlamtsqr.f index 5030cb75fd..1b6f75506d 100644 --- a/SRC/zlamtsqr.f +++ b/SRC/zlamtsqr.f @@ -191,6 +191,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup lamtsqr +*> * ===================================================================== SUBROUTINE ZLAMTSQR( SIDE, TRANS, M, N, K, MB, NB, A, LDA, T, $ LDT, C, LDC, WORK, LWORK, INFO ) diff --git a/SRC/zlangb.f b/SRC/zlangb.f index 25089ee58b..5917c72ebf 100644 --- a/SRC/zlangb.f +++ b/SRC/zlangb.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBauxiliary +*> \ingroup langb * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANGB( NORM, N, KL, KU, AB, LDAB, diff --git a/SRC/zlange.f b/SRC/zlange.f index d68560e995..4257040707 100644 --- a/SRC/zlange.f +++ b/SRC/zlange.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEauxiliary +*> \ingroup lange * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANGE( NORM, M, N, A, LDA, WORK ) diff --git a/SRC/zlangt.f b/SRC/zlangt.f index 6ae1da31e9..33db121d2d 100644 --- a/SRC/zlangt.f +++ b/SRC/zlangt.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup langt * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANGT( NORM, N, DL, D, DU ) diff --git a/SRC/zlanhb.f b/SRC/zlanhb.f index 52f46dbc6e..7e2a0290d6 100644 --- a/SRC/zlanhb.f +++ b/SRC/zlanhb.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lanhb * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANHB( NORM, UPLO, N, K, AB, LDAB, diff --git a/SRC/zlanhe.f b/SRC/zlanhe.f index bbb4843ffd..b4f30c4945 100644 --- a/SRC/zlanhe.f +++ b/SRC/zlanhe.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEauxiliary +*> \ingroup lanhe * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANHE( NORM, UPLO, N, A, LDA, WORK ) diff --git a/SRC/zlanhf.f b/SRC/zlanhf.f index 331a92aac3..df84bb1d6b 100644 --- a/SRC/zlanhf.f +++ b/SRC/zlanhf.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup lanhf * *> \par Further Details: * ===================== diff --git a/SRC/zlanhp.f b/SRC/zlanhp.f index ac45467d0e..8f25fb7dbf 100644 --- a/SRC/zlanhp.f +++ b/SRC/zlanhp.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lanhp * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANHP( NORM, UPLO, N, AP, WORK ) diff --git a/SRC/zlanhs.f b/SRC/zlanhs.f index d6725804f7..335001b125 100644 --- a/SRC/zlanhs.f +++ b/SRC/zlanhs.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lanhs * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANHS( NORM, N, A, LDA, WORK ) diff --git a/SRC/zlanht.f b/SRC/zlanht.f index 92254726c7..4cb4bd075f 100644 --- a/SRC/zlanht.f +++ b/SRC/zlanht.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lanht * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANHT( NORM, N, D, E ) diff --git a/SRC/zlansb.f b/SRC/zlansb.f index ded6d2b7ea..887749dc50 100644 --- a/SRC/zlansb.f +++ b/SRC/zlansb.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lanhb * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANSB( NORM, UPLO, N, K, AB, LDAB, diff --git a/SRC/zlansp.f b/SRC/zlansp.f index b565a1e1c0..ff450e3fdc 100644 --- a/SRC/zlansp.f +++ b/SRC/zlansp.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lanhp * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANSP( NORM, UPLO, N, AP, WORK ) diff --git a/SRC/zlansy.f b/SRC/zlansy.f index fd28bda204..a384549d5c 100644 --- a/SRC/zlansy.f +++ b/SRC/zlansy.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYauxiliary +*> \ingroup lanhe * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANSY( NORM, UPLO, N, A, LDA, WORK ) diff --git a/SRC/zlantb.f b/SRC/zlantb.f index 13014ceaca..ece4d68136 100644 --- a/SRC/zlantb.f +++ b/SRC/zlantb.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lantb * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANTB( NORM, UPLO, DIAG, N, K, AB, diff --git a/SRC/zlantp.f b/SRC/zlantp.f index af2b2cf75f..c9d93a640c 100644 --- a/SRC/zlantp.f +++ b/SRC/zlantp.f @@ -118,7 +118,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lantp * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANTP( NORM, UPLO, DIAG, N, AP, WORK ) diff --git a/SRC/zlantr.f b/SRC/zlantr.f index bd4b5da7c2..d365ed4f21 100644 --- a/SRC/zlantr.f +++ b/SRC/zlantr.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lantr * * ===================================================================== DOUBLE PRECISION FUNCTION ZLANTR( NORM, UPLO, DIAG, M, N, A, LDA, diff --git a/SRC/zlapll.f b/SRC/zlapll.f index 345e7f7709..ee5111cf00 100644 --- a/SRC/zlapll.f +++ b/SRC/zlapll.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lapll * * ===================================================================== SUBROUTINE ZLAPLL( N, X, INCX, Y, INCY, SSMIN ) diff --git a/SRC/zlapmr.f b/SRC/zlapmr.f index 6a409d2c21..f9c0b4ea88 100644 --- a/SRC/zlapmr.f +++ b/SRC/zlapmr.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lapmr * * ===================================================================== SUBROUTINE ZLAPMR( FORWRD, M, N, X, LDX, K ) diff --git a/SRC/zlapmt.f b/SRC/zlapmt.f index 6c8e6fe7d1..b7fe771467 100644 --- a/SRC/zlapmt.f +++ b/SRC/zlapmt.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lapmt * * ===================================================================== SUBROUTINE ZLAPMT( FORWRD, M, N, X, LDX, K ) diff --git a/SRC/zlaqgb.f b/SRC/zlaqgb.f index f1480b67e5..230064264a 100644 --- a/SRC/zlaqgb.f +++ b/SRC/zlaqgb.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBauxiliary +*> \ingroup laqgb * * ===================================================================== SUBROUTINE ZLAQGB( M, N, KL, KU, AB, LDAB, R, C, ROWCND, COLCND, diff --git a/SRC/zlaqge.f b/SRC/zlaqge.f index 5eae13dd50..270ed0f9cf 100644 --- a/SRC/zlaqge.f +++ b/SRC/zlaqge.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEauxiliary +*> \ingroup laqge * * ===================================================================== SUBROUTINE ZLAQGE( M, N, A, LDA, R, C, ROWCND, COLCND, AMAX, diff --git a/SRC/zlaqhb.f b/SRC/zlaqhb.f index 3b90b59909..d844de0ac8 100644 --- a/SRC/zlaqhb.f +++ b/SRC/zlaqhb.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqhb * * ===================================================================== SUBROUTINE ZLAQHB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) diff --git a/SRC/zlaqhe.f b/SRC/zlaqhe.f index afda051f15..5de8e3fc96 100644 --- a/SRC/zlaqhe.f +++ b/SRC/zlaqhe.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16HEauxiliary +*> \ingroup laqhe * * ===================================================================== SUBROUTINE ZLAQHE( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) diff --git a/SRC/zlaqhp.f b/SRC/zlaqhp.f index e5b2f213d3..1baebbb06d 100644 --- a/SRC/zlaqhp.f +++ b/SRC/zlaqhp.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqhp * * ===================================================================== SUBROUTINE ZLAQHP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) diff --git a/SRC/zlaqp2.f b/SRC/zlaqp2.f index 2354b67887..b406046f7b 100644 --- a/SRC/zlaqp2.f +++ b/SRC/zlaqp2.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqp2 * *> \par Contributors: * ================== diff --git a/SRC/zlaqps.f b/SRC/zlaqps.f index c2387dba8c..86f7e6fd05 100644 --- a/SRC/zlaqps.f +++ b/SRC/zlaqps.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqps * *> \par Contributors: * ================== diff --git a/SRC/zlaqr0.f b/SRC/zlaqr0.f index 27ad09f5af..3eae019804 100644 --- a/SRC/zlaqr0.f +++ b/SRC/zlaqr0.f @@ -215,7 +215,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqr0 * *> \par Contributors: * ================== diff --git a/SRC/zlaqr1.f b/SRC/zlaqr1.f index fdcb377680..a03645389f 100644 --- a/SRC/zlaqr1.f +++ b/SRC/zlaqr1.f @@ -94,7 +94,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqr1 * *> \par Contributors: * ================== diff --git a/SRC/zlaqr2.f b/SRC/zlaqr2.f index 8294105ca4..9c016af983 100644 --- a/SRC/zlaqr2.f +++ b/SRC/zlaqr2.f @@ -255,7 +255,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqr2 * *> \par Contributors: * ================== diff --git a/SRC/zlaqr3.f b/SRC/zlaqr3.f index cd7eca70ae..d070eee723 100644 --- a/SRC/zlaqr3.f +++ b/SRC/zlaqr3.f @@ -252,7 +252,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqr3 * *> \par Contributors: * ================== diff --git a/SRC/zlaqr4.f b/SRC/zlaqr4.f index ee2ab611cd..32b0897939 100644 --- a/SRC/zlaqr4.f +++ b/SRC/zlaqr4.f @@ -221,7 +221,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqr4 * *> \par Contributors: * ================== diff --git a/SRC/zlaqr5.f b/SRC/zlaqr5.f index 153a8a2c6d..6ac42761c3 100644 --- a/SRC/zlaqr5.f +++ b/SRC/zlaqr5.f @@ -225,7 +225,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqr5 * *> \par Contributors: * ================== diff --git a/SRC/zlaqsb.f b/SRC/zlaqsb.f index 2ea0b2f3cc..3303d0e7eb 100644 --- a/SRC/zlaqsb.f +++ b/SRC/zlaqsb.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqhb * * ===================================================================== SUBROUTINE ZLAQSB( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, EQUED ) diff --git a/SRC/zlaqsp.f b/SRC/zlaqsp.f index 263be6bd21..14bfe4738f 100644 --- a/SRC/zlaqsp.f +++ b/SRC/zlaqsp.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laqhp * * ===================================================================== SUBROUTINE ZLAQSP( UPLO, N, AP, S, SCOND, AMAX, EQUED ) diff --git a/SRC/zlaqsy.f b/SRC/zlaqsy.f index 37872b8b26..be4088e061 100644 --- a/SRC/zlaqsy.f +++ b/SRC/zlaqsy.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYauxiliary +*> \ingroup laqhe * * ===================================================================== SUBROUTINE ZLAQSY( UPLO, N, A, LDA, S, SCOND, AMAX, EQUED ) diff --git a/SRC/zlaqz0.f b/SRC/zlaqz0.f index dcb28850a2..f75e67161e 100644 --- a/SRC/zlaqz0.f +++ b/SRC/zlaqz0.f @@ -274,7 +274,7 @@ * *> \date May 2020 * -*> \ingroup complex16GEcomputational +*> \ingroup laqz0 *> * ===================================================================== RECURSIVE SUBROUTINE ZLAQZ0( WANTS, WANTQ, WANTZ, N, ILO, IHI, A, diff --git a/SRC/zlaqz1.f b/SRC/zlaqz1.f index d8f52ad04c..d7405394ef 100644 --- a/SRC/zlaqz1.f +++ b/SRC/zlaqz1.f @@ -165,7 +165,7 @@ * *> \date May 2020 * -*> \ingroup complex16GEcomputational +*> \ingroup laqz1 *> * ===================================================================== SUBROUTINE ZLAQZ1( ILQ, ILZ, K, ISTARTM, ISTOPM, IHI, A, LDA, B, diff --git a/SRC/zlaqz2.f b/SRC/zlaqz2.f index 0256512241..d404ad164e 100644 --- a/SRC/zlaqz2.f +++ b/SRC/zlaqz2.f @@ -224,7 +224,7 @@ * *> \date May 2020 * -*> \ingroup complex16GEcomputational +*> \ingroup laqz2 *> * ===================================================================== RECURSIVE SUBROUTINE ZLAQZ2( ILSCHUR, ILQ, ILZ, N, ILO, IHI, NW, diff --git a/SRC/zlaqz3.f b/SRC/zlaqz3.f index 5c1abb52fc..1542af3599 100644 --- a/SRC/zlaqz3.f +++ b/SRC/zlaqz3.f @@ -198,7 +198,7 @@ * *> \date May 2020 * -*> \ingroup complex16GEcomputational +*> \ingroup laqz3 *> * ===================================================================== SUBROUTINE ZLAQZ3( ILSCHUR, ILQ, ILZ, N, ILO, IHI, NSHIFTS, diff --git a/SRC/zlar1v.f b/SRC/zlar1v.f index e272c33a51..a548af50bd 100644 --- a/SRC/zlar1v.f +++ b/SRC/zlar1v.f @@ -212,7 +212,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lar1v * *> \par Contributors: * ================== diff --git a/SRC/zlar2v.f b/SRC/zlar2v.f index 3d767956c2..84e98d0ae6 100644 --- a/SRC/zlar2v.f +++ b/SRC/zlar2v.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lar2v * * ===================================================================== SUBROUTINE ZLAR2V( N, X, Y, Z, INCX, C, S, INCC ) diff --git a/SRC/zlarcm.f b/SRC/zlarcm.f index 4445d6d483..a717b57d44 100644 --- a/SRC/zlarcm.f +++ b/SRC/zlarcm.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larcm * * ===================================================================== SUBROUTINE ZLARCM( M, N, A, LDA, B, LDB, C, LDC, RWORK ) diff --git a/SRC/zlarf.f b/SRC/zlarf.f index e555d18ecd..26dddeac94 100644 --- a/SRC/zlarf.f +++ b/SRC/zlarf.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larf * * ===================================================================== SUBROUTINE ZLARF( SIDE, M, N, V, INCV, TAU, C, LDC, WORK ) diff --git a/SRC/zlarfb.f b/SRC/zlarfb.f index c5f424db31..19ffd3ec42 100644 --- a/SRC/zlarfb.f +++ b/SRC/zlarfb.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larfb * *> \par Further Details: * ===================== diff --git a/SRC/zlarfb_gett.f b/SRC/zlarfb_gett.f index 17d4b33aa5..63d4390925 100644 --- a/SRC/zlarfb_gett.f +++ b/SRC/zlarfb_gett.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larfb_gett * *> \par Contributors: * ================== diff --git a/SRC/zlarfg.f b/SRC/zlarfg.f index d69796cadc..c3eda21bb0 100644 --- a/SRC/zlarfg.f +++ b/SRC/zlarfg.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larfg * * ===================================================================== SUBROUTINE ZLARFG( N, ALPHA, X, INCX, TAU ) diff --git a/SRC/zlarfgp.f b/SRC/zlarfgp.f index 77eba8e869..07b32def60 100644 --- a/SRC/zlarfgp.f +++ b/SRC/zlarfgp.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larfgp * * ===================================================================== SUBROUTINE ZLARFGP( N, ALPHA, X, INCX, TAU ) diff --git a/SRC/zlarft.f b/SRC/zlarft.f index 5ad0996fab..e151a6efbf 100644 --- a/SRC/zlarft.f +++ b/SRC/zlarft.f @@ -130,7 +130,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larft * *> \par Further Details: * ===================== diff --git a/SRC/zlarfx.f b/SRC/zlarfx.f index c617fe552b..f7920bce44 100644 --- a/SRC/zlarfx.f +++ b/SRC/zlarfx.f @@ -112,7 +112,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larfx * * ===================================================================== SUBROUTINE ZLARFX( SIDE, M, N, V, TAU, C, LDC, WORK ) diff --git a/SRC/zlarfy.f b/SRC/zlarfy.f index 23169e97d9..9f7c56430b 100644 --- a/SRC/zlarfy.f +++ b/SRC/zlarfy.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larfy * * ===================================================================== SUBROUTINE ZLARFY( UPLO, N, V, INCV, TAU, C, LDC, WORK ) diff --git a/SRC/zlargv.f b/SRC/zlargv.f index 1eef6b716c..a75f44e1a7 100644 --- a/SRC/zlargv.f +++ b/SRC/zlargv.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup largv * *> \par Further Details: * ===================== diff --git a/SRC/zlarnv.f b/SRC/zlarnv.f index d82d404ded..6752b237b7 100644 --- a/SRC/zlarnv.f +++ b/SRC/zlarnv.f @@ -81,7 +81,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larnv * *> \par Further Details: * ===================== diff --git a/SRC/zlarrv.f b/SRC/zlarrv.f index e4be63e0db..1bdf3f14b5 100644 --- a/SRC/zlarrv.f +++ b/SRC/zlarrv.f @@ -266,7 +266,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup larrv * *> \par Contributors: * ================== diff --git a/SRC/zlarscl2.f b/SRC/zlarscl2.f index e618659067..dcf68e83d0 100644 --- a/SRC/zlarscl2.f +++ b/SRC/zlarscl2.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup larscl2 * * ===================================================================== SUBROUTINE ZLARSCL2 ( M, N, D, X, LDX ) diff --git a/SRC/zlartg.f90 b/SRC/zlartg.f90 index a4f9bd4b00..566b80a260 100644 --- a/SRC/zlartg.f90 +++ b/SRC/zlartg.f90 @@ -96,7 +96,7 @@ ! !> \date December 2021 ! -!> \ingroup OTHERauxiliary +!> \ingroup lartg ! !> \par Further Details: ! ===================== @@ -195,7 +195,7 @@ subroutine ZLARTG( f, g, c, s, r ) f2 = ABSSQ( f ) g2 = ABSSQ( g ) h2 = f2 + g2 - ! safmin <= f2 <= h2 <= safmax + ! safmin <= f2 <= h2 <= safmax if( f2 >= h2 * safmin ) then ! safmin <= f2/h2 <= 1, and h2/f2 is finite c = sqrt( f2 / h2 ) @@ -251,7 +251,7 @@ subroutine ZLARTG( f, g, c, s, r ) f2 = ABSSQ( fs ) h2 = f2 + g2 end if - ! safmin <= f2 <= h2 <= safmax + ! safmin <= f2 <= h2 <= safmax if( f2 >= h2 * safmin ) then ! safmin <= f2/h2 <= 1, and h2/f2 is finite c = sqrt( f2 / h2 ) diff --git a/SRC/zlartv.f b/SRC/zlartv.f index 02f5b0d76f..5b9346e9b8 100644 --- a/SRC/zlartv.f +++ b/SRC/zlartv.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lartv * * ===================================================================== SUBROUTINE ZLARTV( N, X, INCX, Y, INCY, C, S, INCC ) diff --git a/SRC/zlarz.f b/SRC/zlarz.f index 3cfcd66255..c7995a9414 100644 --- a/SRC/zlarz.f +++ b/SRC/zlarz.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup larz * *> \par Contributors: * ================== diff --git a/SRC/zlarzb.f b/SRC/zlarzb.f index 15c809d28b..9124865d67 100644 --- a/SRC/zlarzb.f +++ b/SRC/zlarzb.f @@ -164,7 +164,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup larzb * *> \par Contributors: * ================== diff --git a/SRC/zlarzt.f b/SRC/zlarzt.f index 25d1e96f06..769ca4467e 100644 --- a/SRC/zlarzt.f +++ b/SRC/zlarzt.f @@ -133,7 +133,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup larzt * *> \par Contributors: * ================== diff --git a/SRC/zlascl.f b/SRC/zlascl.f index 4cce5ff5e0..181fa6deee 100644 --- a/SRC/zlascl.f +++ b/SRC/zlascl.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lascl * * ===================================================================== SUBROUTINE ZLASCL( TYPE, KL, KU, CFROM, CTO, M, N, A, LDA, INFO ) diff --git a/SRC/zlascl2.f b/SRC/zlascl2.f index 26406c3636..1309af8125 100644 --- a/SRC/zlascl2.f +++ b/SRC/zlascl2.f @@ -84,7 +84,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup lascl2 * * ===================================================================== SUBROUTINE ZLASCL2 ( M, N, D, X, LDX ) diff --git a/SRC/zlaset.f b/SRC/zlaset.f index 00f5f595fc..bbeeb50cfb 100644 --- a/SRC/zlaset.f +++ b/SRC/zlaset.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laset * * ===================================================================== SUBROUTINE ZLASET( UPLO, M, N, ALPHA, BETA, A, LDA ) diff --git a/SRC/zlasr.f b/SRC/zlasr.f index 07c91329c4..2c807b5598 100644 --- a/SRC/zlasr.f +++ b/SRC/zlasr.f @@ -193,7 +193,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lasr * * ===================================================================== SUBROUTINE ZLASR( SIDE, PIVOT, DIRECT, M, N, C, S, A, LDA ) diff --git a/SRC/zlaswlq.f b/SRC/zlaswlq.f index be4c48539a..0c89eeb5f7 100644 --- a/SRC/zlaswlq.f +++ b/SRC/zlaswlq.f @@ -159,6 +159,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup laswlq +*> * ===================================================================== SUBROUTINE ZLASWLQ( M, N, MB, NB, A, LDA, T, LDT, WORK, LWORK, $ INFO) diff --git a/SRC/zlaswp.f b/SRC/zlaswp.f index 13fa864905..8ec7bd80ac 100644 --- a/SRC/zlaswp.f +++ b/SRC/zlaswp.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup laswp * *> \par Further Details: * ===================== diff --git a/SRC/zlasyf.f b/SRC/zlasyf.f index 57f236d1bd..601b17ff3f 100644 --- a/SRC/zlasyf.f +++ b/SRC/zlasyf.f @@ -160,7 +160,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup lahef * *> \par Contributors: * ================== diff --git a/SRC/zlasyf_aa.f b/SRC/zlasyf_aa.f index b8b5f27607..3788fca31e 100644 --- a/SRC/zlasyf_aa.f +++ b/SRC/zlasyf_aa.f @@ -136,7 +136,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup lahef_aa * * ===================================================================== SUBROUTINE ZLASYF_AA( UPLO, J1, M, NB, A, LDA, IPIV, diff --git a/SRC/zlasyf_rk.f b/SRC/zlasyf_rk.f index ead0ab0af7..f1bbd2ab99 100644 --- a/SRC/zlasyf_rk.f +++ b/SRC/zlasyf_rk.f @@ -239,7 +239,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup lahef_rk * *> \par Contributors: * ================== diff --git a/SRC/zlasyf_rook.f b/SRC/zlasyf_rook.f index 7a9872c7c6..a2c2d87400 100644 --- a/SRC/zlasyf_rook.f +++ b/SRC/zlasyf_rook.f @@ -161,7 +161,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup lahef_rook * *> \par Contributors: * ================== diff --git a/SRC/zlat2c.f b/SRC/zlat2c.f index a413b05c14..57f0680bff 100644 --- a/SRC/zlat2c.f +++ b/SRC/zlat2c.f @@ -104,7 +104,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup _lat2_ * * ===================================================================== SUBROUTINE ZLAT2C( UPLO, N, A, LDA, SA, LDSA, INFO ) diff --git a/SRC/zlatbs.f b/SRC/zlatbs.f index bdffa1ea98..467b34fb3a 100644 --- a/SRC/zlatbs.f +++ b/SRC/zlatbs.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup latbs * *> \par Further Details: * ===================== diff --git a/SRC/zlatdf.f b/SRC/zlatdf.f index 41714a3e0f..2ee5984d09 100644 --- a/SRC/zlatdf.f +++ b/SRC/zlatdf.f @@ -134,7 +134,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup latdf * *> \par Further Details: * ===================== diff --git a/SRC/zlatps.f b/SRC/zlatps.f index 29fcb6c185..403f7b4276 100644 --- a/SRC/zlatps.f +++ b/SRC/zlatps.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup latps * *> \par Further Details: * ===================== diff --git a/SRC/zlatrd.f b/SRC/zlatrd.f index ee2a484723..71584680cf 100644 --- a/SRC/zlatrd.f +++ b/SRC/zlatrd.f @@ -140,7 +140,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup latrd * *> \par Further Details: * ===================== diff --git a/SRC/zlatrs.f b/SRC/zlatrs.f index 2276ace875..0c33ea400d 100644 --- a/SRC/zlatrs.f +++ b/SRC/zlatrs.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup latrs * *> \par Further Details: * ===================== diff --git a/SRC/zlatrs3.f b/SRC/zlatrs3.f index 231a17274a..38853af22c 100644 --- a/SRC/zlatrs3.f +++ b/SRC/zlatrs3.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERauxiliary +*> \ingroup latrs3 *> \par Further Details: * ===================== * \verbatim diff --git a/SRC/zlatrz.f b/SRC/zlatrz.f index 6fe2138170..99eb04dc46 100644 --- a/SRC/zlatrz.f +++ b/SRC/zlatrz.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup latrz * *> \par Contributors: * ================== diff --git a/SRC/zlatsqr.f b/SRC/zlatsqr.f index 8c938aebc9..4edcca1812 100644 --- a/SRC/zlatsqr.f +++ b/SRC/zlatsqr.f @@ -161,6 +161,8 @@ *> SIAM J. Sci. Comput, vol. 34, no. 1, 2012 *> \endverbatim *> +*> \ingroup latsqr +*> * ===================================================================== SUBROUTINE ZLATSQR( M, N, MB, NB, A, LDA, T, LDT, WORK, $ LWORK, INFO) diff --git a/SRC/zlaunhr_col_getrfnp.f b/SRC/zlaunhr_col_getrfnp.f index c40599a42e..62242cf90a 100644 --- a/SRC/zlaunhr_col_getrfnp.f +++ b/SRC/zlaunhr_col_getrfnp.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup launhr_col_getrfnp * *> \par Contributors: * ================== diff --git a/SRC/zlaunhr_col_getrfnp2.f b/SRC/zlaunhr_col_getrfnp2.f index fe67f1fc85..41e0e03c4b 100644 --- a/SRC/zlaunhr_col_getrfnp2.f +++ b/SRC/zlaunhr_col_getrfnp2.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup launhr_col_getrfnp2 * *> \par Contributors: * ================== diff --git a/SRC/zlauu2.f b/SRC/zlauu2.f index 7d7faebdf5..99a3a3eb63 100644 --- a/SRC/zlauu2.f +++ b/SRC/zlauu2.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lauu2 * * ===================================================================== SUBROUTINE ZLAUU2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/zlauum.f b/SRC/zlauum.f index af36aa92df..2bf2fc47e7 100644 --- a/SRC/zlauum.f +++ b/SRC/zlauum.f @@ -95,7 +95,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup lauum * * ===================================================================== SUBROUTINE ZLAUUM( UPLO, N, A, LDA, INFO ) diff --git a/SRC/zpbcon.f b/SRC/zpbcon.f index 35fa50aabc..799dcb7827 100644 --- a/SRC/zpbcon.f +++ b/SRC/zpbcon.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pbcon * * ===================================================================== SUBROUTINE ZPBCON( UPLO, N, KD, AB, LDAB, ANORM, RCOND, WORK, diff --git a/SRC/zpbequ.f b/SRC/zpbequ.f index 3d4b84a96e..9454dfb512 100644 --- a/SRC/zpbequ.f +++ b/SRC/zpbequ.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pbequ * * ===================================================================== SUBROUTINE ZPBEQU( UPLO, N, KD, AB, LDAB, S, SCOND, AMAX, INFO ) diff --git a/SRC/zpbrfs.f b/SRC/zpbrfs.f index 4c343ed3a6..afaad1c610 100644 --- a/SRC/zpbrfs.f +++ b/SRC/zpbrfs.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pbrfs * * ===================================================================== SUBROUTINE ZPBRFS( UPLO, N, KD, NRHS, AB, LDAB, AFB, LDAFB, B, diff --git a/SRC/zpbstf.f b/SRC/zpbstf.f index 1b3bb147b8..34d8e1c6b2 100644 --- a/SRC/zpbstf.f +++ b/SRC/zpbstf.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pbstf * *> \par Further Details: * ===================== diff --git a/SRC/zpbsv.f b/SRC/zpbsv.f index ef212bbc3d..d059d30787 100644 --- a/SRC/zpbsv.f +++ b/SRC/zpbsv.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup pbsv * *> \par Further Details: * ===================== diff --git a/SRC/zpbsvx.f b/SRC/zpbsvx.f index 7241023764..d54fc9f4c1 100644 --- a/SRC/zpbsvx.f +++ b/SRC/zpbsvx.f @@ -301,7 +301,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup pbsvx * *> \par Further Details: * ===================== diff --git a/SRC/zpbtf2.f b/SRC/zpbtf2.f index 39bf6c3faa..31deca7dae 100644 --- a/SRC/zpbtf2.f +++ b/SRC/zpbtf2.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pbtf2 * *> \par Further Details: * ===================== diff --git a/SRC/zpbtrf.f b/SRC/zpbtrf.f index 80afb08367..212ccb9a6e 100644 --- a/SRC/zpbtrf.f +++ b/SRC/zpbtrf.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pbtrf * *> \par Further Details: * ===================== diff --git a/SRC/zpbtrs.f b/SRC/zpbtrs.f index d9d74b70d1..a94ab66ab6 100644 --- a/SRC/zpbtrs.f +++ b/SRC/zpbtrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pbtrs * * ===================================================================== SUBROUTINE ZPBTRS( UPLO, N, KD, NRHS, AB, LDAB, B, LDB, INFO ) diff --git a/SRC/zpftrf.f b/SRC/zpftrf.f index 4d4a5116e1..e901a41806 100644 --- a/SRC/zpftrf.f +++ b/SRC/zpftrf.f @@ -204,7 +204,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pftrf * * ===================================================================== SUBROUTINE ZPFTRF( TRANSR, UPLO, N, A, INFO ) diff --git a/SRC/zpftri.f b/SRC/zpftri.f index 7ebf737694..f534d45fe3 100644 --- a/SRC/zpftri.f +++ b/SRC/zpftri.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pftri * *> \par Further Details: * ===================== diff --git a/SRC/zpftrs.f b/SRC/zpftrs.f index c63592f57a..50f78db923 100644 --- a/SRC/zpftrs.f +++ b/SRC/zpftrs.f @@ -105,7 +105,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pftrs * *> \par Further Details: * ===================== diff --git a/SRC/zpocon.f b/SRC/zpocon.f index dcfc6f64c7..709c81f4ce 100644 --- a/SRC/zpocon.f +++ b/SRC/zpocon.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup pocon * * ===================================================================== SUBROUTINE ZPOCON( UPLO, N, A, LDA, ANORM, RCOND, WORK, RWORK, diff --git a/SRC/zpoequ.f b/SRC/zpoequ.f index 9435bd08f4..0c02ad2d36 100644 --- a/SRC/zpoequ.f +++ b/SRC/zpoequ.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup poequ * * ===================================================================== SUBROUTINE ZPOEQU( N, A, LDA, S, SCOND, AMAX, INFO ) diff --git a/SRC/zpoequb.f b/SRC/zpoequb.f index fd8a000b2a..529cda962a 100644 --- a/SRC/zpoequb.f +++ b/SRC/zpoequb.f @@ -112,7 +112,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup poequb * * ===================================================================== SUBROUTINE ZPOEQUB( N, A, LDA, S, SCOND, AMAX, INFO ) diff --git a/SRC/zporfs.f b/SRC/zporfs.f index 96c6546665..f210607005 100644 --- a/SRC/zporfs.f +++ b/SRC/zporfs.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup porfs * * ===================================================================== SUBROUTINE ZPORFS( UPLO, N, NRHS, A, LDA, AF, LDAF, B, LDB, X, diff --git a/SRC/zporfsx.f b/SRC/zporfsx.f index ce43103eb7..c5a84c95e0 100644 --- a/SRC/zporfsx.f +++ b/SRC/zporfsx.f @@ -383,7 +383,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup porfsx * * ===================================================================== SUBROUTINE ZPORFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, S, B, diff --git a/SRC/zposv.f b/SRC/zposv.f index 0e91cde2ff..e24d0790a1 100644 --- a/SRC/zposv.f +++ b/SRC/zposv.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POsolve +*> \ingroup posv * * ===================================================================== SUBROUTINE ZPOSV( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) diff --git a/SRC/zposvx.f b/SRC/zposvx.f index 6c06dbd577..2b45d96c9b 100644 --- a/SRC/zposvx.f +++ b/SRC/zposvx.f @@ -297,7 +297,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POsolve +*> \ingroup posvx * * ===================================================================== SUBROUTINE ZPOSVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, EQUED, diff --git a/SRC/zposvxx.f b/SRC/zposvxx.f index 3886c66f09..4743d01a74 100644 --- a/SRC/zposvxx.f +++ b/SRC/zposvxx.f @@ -483,7 +483,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POsolve +*> \ingroup posvxx * * ===================================================================== SUBROUTINE ZPOSVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, EQUED, diff --git a/SRC/zpotf2.f b/SRC/zpotf2.f index b48f3d654e..496c5e1f8c 100644 --- a/SRC/zpotf2.f +++ b/SRC/zpotf2.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup potf2 * * ===================================================================== SUBROUTINE ZPOTF2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/zpotrf.f b/SRC/zpotrf.f index 3edae84fb8..30c6a1bd04 100644 --- a/SRC/zpotrf.f +++ b/SRC/zpotrf.f @@ -100,7 +100,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup potrf * * ===================================================================== SUBROUTINE ZPOTRF( UPLO, N, A, LDA, INFO ) diff --git a/SRC/zpotrf2.f b/SRC/zpotrf2.f index 67430f231b..4cdbb0ac1f 100644 --- a/SRC/zpotrf2.f +++ b/SRC/zpotrf2.f @@ -99,7 +99,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup potrf2 * * ===================================================================== RECURSIVE SUBROUTINE ZPOTRF2( UPLO, N, A, LDA, INFO ) diff --git a/SRC/zpotri.f b/SRC/zpotri.f index 8c94eadc2f..35e0e15595 100644 --- a/SRC/zpotri.f +++ b/SRC/zpotri.f @@ -88,7 +88,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup potri * * ===================================================================== SUBROUTINE ZPOTRI( UPLO, N, A, LDA, INFO ) diff --git a/SRC/zpotrs.f b/SRC/zpotrs.f index 78a1c32738..3dad5a688f 100644 --- a/SRC/zpotrs.f +++ b/SRC/zpotrs.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16POcomputational +*> \ingroup potrs * * ===================================================================== SUBROUTINE ZPOTRS( UPLO, N, NRHS, A, LDA, B, LDB, INFO ) diff --git a/SRC/zppcon.f b/SRC/zppcon.f index c569a497b9..bab024986f 100644 --- a/SRC/zppcon.f +++ b/SRC/zppcon.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ppcon * * ===================================================================== SUBROUTINE ZPPCON( UPLO, N, AP, ANORM, RCOND, WORK, RWORK, INFO ) diff --git a/SRC/zppequ.f b/SRC/zppequ.f index e2159e0f03..81e870fa75 100644 --- a/SRC/zppequ.f +++ b/SRC/zppequ.f @@ -110,7 +110,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ppequ * * ===================================================================== SUBROUTINE ZPPEQU( UPLO, N, AP, S, SCOND, AMAX, INFO ) diff --git a/SRC/zpprfs.f b/SRC/zpprfs.f index 769a6a0c08..8ea4dc111c 100644 --- a/SRC/zpprfs.f +++ b/SRC/zpprfs.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pprfs * * ===================================================================== SUBROUTINE ZPPRFS( UPLO, N, NRHS, AP, AFP, B, LDB, X, LDX, FERR, diff --git a/SRC/zppsv.f b/SRC/zppsv.f index f466266e49..680206ed83 100644 --- a/SRC/zppsv.f +++ b/SRC/zppsv.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup ppsv * *> \par Further Details: * ===================== diff --git a/SRC/zppsvx.f b/SRC/zppsvx.f index 60d07cbc73..c20f865e44 100644 --- a/SRC/zppsvx.f +++ b/SRC/zppsvx.f @@ -283,7 +283,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup ppsvx * *> \par Further Details: * ===================== diff --git a/SRC/zpptrf.f b/SRC/zpptrf.f index a103e5eca2..8ca436d3b8 100644 --- a/SRC/zpptrf.f +++ b/SRC/zpptrf.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pptrf * *> \par Further Details: * ===================== diff --git a/SRC/zpptri.f b/SRC/zpptri.f index a74466eb80..39d49d4af7 100644 --- a/SRC/zpptri.f +++ b/SRC/zpptri.f @@ -86,7 +86,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pptri * * ===================================================================== SUBROUTINE ZPPTRI( UPLO, N, AP, INFO ) diff --git a/SRC/zpptrs.f b/SRC/zpptrs.f index 433213d5ab..aeeae3649a 100644 --- a/SRC/zpptrs.f +++ b/SRC/zpptrs.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pptrs * * ===================================================================== SUBROUTINE ZPPTRS( UPLO, N, NRHS, AP, B, LDB, INFO ) diff --git a/SRC/zpstf2.f b/SRC/zpstf2.f index ef2536bd6c..656fbfe288 100644 --- a/SRC/zpstf2.f +++ b/SRC/zpstf2.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pstf2 * * ===================================================================== SUBROUTINE ZPSTF2( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) diff --git a/SRC/zpstrf.f b/SRC/zpstrf.f index 577934d2c8..17b2dc544a 100644 --- a/SRC/zpstrf.f +++ b/SRC/zpstrf.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup pstrf * * ===================================================================== SUBROUTINE ZPSTRF( UPLO, N, A, LDA, PIV, RANK, TOL, WORK, INFO ) diff --git a/SRC/zptcon.f b/SRC/zptcon.f index 122a091983..c9cf150206 100644 --- a/SRC/zptcon.f +++ b/SRC/zptcon.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16PTcomputational +*> \ingroup ptcon * *> \par Further Details: * ===================== diff --git a/SRC/zpteqr.f b/SRC/zpteqr.f index 897136c76b..12cb9c707a 100644 --- a/SRC/zpteqr.f +++ b/SRC/zpteqr.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16PTcomputational +*> \ingroup pteqr * * ===================================================================== SUBROUTINE ZPTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/zptrfs.f b/SRC/zptrfs.f index 43e14d585b..0ec3d87ca3 100644 --- a/SRC/zptrfs.f +++ b/SRC/zptrfs.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16PTcomputational +*> \ingroup ptrfs * * ===================================================================== SUBROUTINE ZPTRFS( UPLO, N, NRHS, D, E, DF, EF, B, LDB, X, LDX, diff --git a/SRC/zptsv.f b/SRC/zptsv.f index 191adaff6e..ea93048547 100644 --- a/SRC/zptsv.f +++ b/SRC/zptsv.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16PTsolve +*> \ingroup ptsv * * ===================================================================== SUBROUTINE ZPTSV( N, NRHS, D, E, B, LDB, INFO ) diff --git a/SRC/zptsvx.f b/SRC/zptsvx.f index 94409a7a1c..ccc74602b3 100644 --- a/SRC/zptsvx.f +++ b/SRC/zptsvx.f @@ -226,7 +226,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16PTsolve +*> \ingroup ptsvx * * ===================================================================== SUBROUTINE ZPTSVX( FACT, N, NRHS, D, E, DF, EF, B, LDB, X, LDX, diff --git a/SRC/zpttrf.f b/SRC/zpttrf.f index 75ef847c4d..75a2c62687 100644 --- a/SRC/zpttrf.f +++ b/SRC/zpttrf.f @@ -85,7 +85,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16PTcomputational +*> \ingroup pttrf * * ===================================================================== SUBROUTINE ZPTTRF( N, D, E, INFO ) diff --git a/SRC/zpttrs.f b/SRC/zpttrs.f index 41c7c9ba7c..6cd8dd24dc 100644 --- a/SRC/zpttrs.f +++ b/SRC/zpttrs.f @@ -114,7 +114,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16PTcomputational +*> \ingroup pttrs * * ===================================================================== SUBROUTINE ZPTTRS( UPLO, N, NRHS, D, E, B, LDB, INFO ) diff --git a/SRC/zptts2.f b/SRC/zptts2.f index 8ff6b1fe75..f63f6a9955 100644 --- a/SRC/zptts2.f +++ b/SRC/zptts2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16PTcomputational +*> \ingroup ptts2 * * ===================================================================== SUBROUTINE ZPTTS2( IUPLO, N, NRHS, D, E, B, LDB ) diff --git a/SRC/zrot.f b/SRC/zrot.f index 28fc8ec1de..c39a0484ec 100644 --- a/SRC/zrot.f +++ b/SRC/zrot.f @@ -35,7 +35,7 @@ *> *> \verbatim *> -*> ZROT applies a plane rotation, where the cos (C) is real and the +*> ZROT applies a plane rotation, where the cos (C) is real and the *> sin (S) is complex, and the vectors CX and CY are complex. *> \endverbatim * @@ -96,7 +96,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup rot * * ===================================================================== SUBROUTINE ZROT( N, CX, INCX, CY, INCY, C, S ) diff --git a/SRC/zspcon.f b/SRC/zspcon.f index fa497bd05d..ccf5e6a1db 100644 --- a/SRC/zspcon.f +++ b/SRC/zspcon.f @@ -111,7 +111,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hpcon * * ===================================================================== SUBROUTINE ZSPCON( UPLO, N, AP, IPIV, ANORM, RCOND, WORK, INFO ) diff --git a/SRC/zspmv.f b/SRC/zspmv.f index 8a8d3a9d0f..ed356bc337 100644 --- a/SRC/zspmv.f +++ b/SRC/zspmv.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup hpmv * * ===================================================================== SUBROUTINE ZSPMV( UPLO, N, ALPHA, AP, X, INCX, BETA, Y, INCY ) diff --git a/SRC/zspr.f b/SRC/zspr.f index 549415fa3b..2d20eb5758 100644 --- a/SRC/zspr.f +++ b/SRC/zspr.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup hpr * * ===================================================================== SUBROUTINE ZSPR( UPLO, N, ALPHA, X, INCX, AP ) diff --git a/SRC/zsprfs.f b/SRC/zsprfs.f index 9985b5749f..e3fc1bf2ed 100644 --- a/SRC/zsprfs.f +++ b/SRC/zsprfs.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hprfs * * ===================================================================== SUBROUTINE ZSPRFS( UPLO, N, NRHS, AP, AFP, IPIV, B, LDB, X, LDX, diff --git a/SRC/zspsv.f b/SRC/zspsv.f index a1c13024bb..a7eaf29e46 100644 --- a/SRC/zspsv.f +++ b/SRC/zspsv.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup hpsv * *> \par Further Details: * ===================== diff --git a/SRC/zspsvx.f b/SRC/zspsvx.f index 2cd0975651..5f833b4236 100644 --- a/SRC/zspsvx.f +++ b/SRC/zspsvx.f @@ -249,7 +249,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERsolve +*> \ingroup hpsvx * *> \par Further Details: * ===================== diff --git a/SRC/zsptrf.f b/SRC/zsptrf.f index bad30b7a42..66a41913c5 100644 --- a/SRC/zsptrf.f +++ b/SRC/zsptrf.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hptrf * *> \par Further Details: * ===================== diff --git a/SRC/zsptri.f b/SRC/zsptri.f index ba590f661c..f8740c3f01 100644 --- a/SRC/zsptri.f +++ b/SRC/zsptri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hptri * * ===================================================================== SUBROUTINE ZSPTRI( UPLO, N, AP, IPIV, WORK, INFO ) diff --git a/SRC/zsptrs.f b/SRC/zsptrs.f index 2a16cb22ac..862bace0ea 100644 --- a/SRC/zsptrs.f +++ b/SRC/zsptrs.f @@ -108,7 +108,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup hptrs * * ===================================================================== SUBROUTINE ZSPTRS( UPLO, N, NRHS, AP, IPIV, B, LDB, INFO ) diff --git a/SRC/zstedc.f b/SRC/zstedc.f index e62063a19e..900213c144 100644 --- a/SRC/zstedc.f +++ b/SRC/zstedc.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup stedc * *> \par Contributors: * ================== diff --git a/SRC/zstegr.f b/SRC/zstegr.f index 3736a0517b..8bd2c29121 100644 --- a/SRC/zstegr.f +++ b/SRC/zstegr.f @@ -249,7 +249,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup stegr * *> \par Contributors: * ================== diff --git a/SRC/zstein.f b/SRC/zstein.f index 9be9d981c1..b2429a5659 100644 --- a/SRC/zstein.f +++ b/SRC/zstein.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup stein * * ===================================================================== SUBROUTINE ZSTEIN( N, D, E, M, W, IBLOCK, ISPLIT, Z, LDZ, WORK, diff --git a/SRC/zstemr.f b/SRC/zstemr.f index b034198de0..c08c0ca2f7 100644 --- a/SRC/zstemr.f +++ b/SRC/zstemr.f @@ -320,7 +320,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup stemr * *> \par Contributors: * ================== diff --git a/SRC/zsteqr.f b/SRC/zsteqr.f index 47f4004e8d..fc41317b62 100644 --- a/SRC/zsteqr.f +++ b/SRC/zsteqr.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup steqr * * ===================================================================== SUBROUTINE ZSTEQR( COMPZ, N, D, E, Z, LDZ, WORK, INFO ) diff --git a/SRC/zsycon.f b/SRC/zsycon.f index 5b3fef621e..05f06ec786 100644 --- a/SRC/zsycon.f +++ b/SRC/zsycon.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hecon * * ===================================================================== SUBROUTINE ZSYCON( UPLO, N, A, LDA, IPIV, ANORM, RCOND, WORK, diff --git a/SRC/zsycon_3.f b/SRC/zsycon_3.f index 25c8b5e089..f545593f2c 100644 --- a/SRC/zsycon_3.f +++ b/SRC/zsycon_3.f @@ -144,7 +144,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hecon_3 * *> \par Contributors: * ================== diff --git a/SRC/zsycon_rook.f b/SRC/zsycon_rook.f index 1346f8b860..b2844879dc 100644 --- a/SRC/zsycon_rook.f +++ b/SRC/zsycon_rook.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hecon_rook * *> \par Contributors: * ================== diff --git a/SRC/zsyconv.f b/SRC/zsyconv.f index e6a1d006c1..b0d455f056 100644 --- a/SRC/zsyconv.f +++ b/SRC/zsyconv.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup syconv * * ===================================================================== SUBROUTINE ZSYCONV( UPLO, WAY, N, A, LDA, IPIV, E, INFO ) diff --git a/SRC/zsyconvf.f b/SRC/zsyconvf.f index 0958a5f77a..945c489db2 100644 --- a/SRC/zsyconvf.f +++ b/SRC/zsyconvf.f @@ -192,7 +192,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup syconvf * *> \par Contributors: * ================== diff --git a/SRC/zsyconvf_rook.f b/SRC/zsyconvf_rook.f index 62cca060b8..3d8570582b 100644 --- a/SRC/zsyconvf_rook.f +++ b/SRC/zsyconvf_rook.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup syconvf_rook * *> \par Contributors: * ================== diff --git a/SRC/zsyequb.f b/SRC/zsyequb.f index 84d5330ad3..8320dc59f8 100644 --- a/SRC/zsyequb.f +++ b/SRC/zsyequb.f @@ -117,7 +117,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup heequb * *> \par References: * ================ diff --git a/SRC/zsymv.f b/SRC/zsymv.f index d54620e26f..0884231726 100644 --- a/SRC/zsymv.f +++ b/SRC/zsymv.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYauxiliary +*> \ingroup hemv * * ===================================================================== SUBROUTINE ZSYMV( UPLO, N, ALPHA, A, LDA, X, INCX, BETA, Y, INCY ) diff --git a/SRC/zsyr.f b/SRC/zsyr.f index 27b559c90b..9d65e26575 100644 --- a/SRC/zsyr.f +++ b/SRC/zsyr.f @@ -128,7 +128,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYauxiliary +*> \ingroup her * * ===================================================================== SUBROUTINE ZSYR( UPLO, N, ALPHA, X, INCX, A, LDA ) diff --git a/SRC/zsyrfs.f b/SRC/zsyrfs.f index e62d7f8a7a..d4ee0d7f28 100644 --- a/SRC/zsyrfs.f +++ b/SRC/zsyrfs.f @@ -184,7 +184,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup herfs * * ===================================================================== SUBROUTINE ZSYRFS( UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, LDB, diff --git a/SRC/zsyrfsx.f b/SRC/zsyrfsx.f index b938ef0ead..59d6f74b3e 100644 --- a/SRC/zsyrfsx.f +++ b/SRC/zsyrfsx.f @@ -392,7 +392,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup herfsx * * ===================================================================== SUBROUTINE ZSYRFSX( UPLO, EQUED, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/zsysv.f b/SRC/zsysv.f index 44f1e25b14..eb3cedbfaa 100644 --- a/SRC/zsysv.f +++ b/SRC/zsysv.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYsolve +*> \ingroup hesv * * ===================================================================== SUBROUTINE ZSYSV( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/zsysv_aa.f b/SRC/zsysv_aa.f index 3a3af5009f..91fdc24f61 100644 --- a/SRC/zsysv_aa.f +++ b/SRC/zsysv_aa.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYsolve +*> \ingroup hesv_aa * * ===================================================================== SUBROUTINE ZSYSV_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, WORK, diff --git a/SRC/zsysv_aa_2stage.f b/SRC/zsysv_aa_2stage.f index 701d73a38e..643a12942e 100644 --- a/SRC/zsysv_aa_2stage.f +++ b/SRC/zsysv_aa_2stage.f @@ -177,7 +177,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hesv_aa_2stage * * ===================================================================== SUBROUTINE ZSYSV_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/zsysv_rk.f b/SRC/zsysv_rk.f index 8d9fb82c87..12ce51253b 100644 --- a/SRC/zsysv_rk.f +++ b/SRC/zsysv_rk.f @@ -205,7 +205,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYsolve +*> \ingroup hesv_rk * *> \par Contributors: * ================== diff --git a/SRC/zsysv_rook.f b/SRC/zsysv_rook.f index 7453395122..dded748c45 100644 --- a/SRC/zsysv_rook.f +++ b/SRC/zsysv_rook.f @@ -181,7 +181,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYsolve +*> \ingroup hesv_rook * *> \par Contributors: * ================== diff --git a/SRC/zsysvx.f b/SRC/zsysvx.f index 91c6adb79b..60d7ce074a 100644 --- a/SRC/zsysvx.f +++ b/SRC/zsysvx.f @@ -276,7 +276,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYsolve +*> \ingroup hesvx * * ===================================================================== SUBROUTINE ZSYSVX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, B, diff --git a/SRC/zsysvxx.f b/SRC/zsysvxx.f index 5cbc15d9e1..45df29af6e 100644 --- a/SRC/zsysvxx.f +++ b/SRC/zsysvxx.f @@ -496,7 +496,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYsolve +*> \ingroup hesvxx * * ===================================================================== SUBROUTINE ZSYSVXX( FACT, UPLO, N, NRHS, A, LDA, AF, LDAF, IPIV, diff --git a/SRC/zsyswapr.f b/SRC/zsyswapr.f index eb3c98c34b..892ee215aa 100644 --- a/SRC/zsyswapr.f +++ b/SRC/zsyswapr.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYauxiliary +*> \ingroup heswapr * * ===================================================================== SUBROUTINE ZSYSWAPR( UPLO, N, A, LDA, I1, I2) diff --git a/SRC/zsytf2.f b/SRC/zsytf2.f index 7542a0de16..dd56d35ede 100644 --- a/SRC/zsytf2.f +++ b/SRC/zsytf2.f @@ -127,7 +127,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetf2 * *> \par Further Details: * ===================== diff --git a/SRC/zsytf2_rk.f b/SRC/zsytf2_rk.f index d0dd3a278d..f084f3f247 100644 --- a/SRC/zsytf2_rk.f +++ b/SRC/zsytf2_rk.f @@ -208,7 +208,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetf2_rk * *> \par Further Details: * ===================== diff --git a/SRC/zsytf2_rook.f b/SRC/zsytf2_rook.f index cbfb57e266..31bad88bcf 100644 --- a/SRC/zsytf2_rook.f +++ b/SRC/zsytf2_rook.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetf2_rook * *> \par Further Details: * ===================== diff --git a/SRC/zsytrf.f b/SRC/zsytrf.f index a775a87587..cd4204b0c3 100644 --- a/SRC/zsytrf.f +++ b/SRC/zsytrf.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrf * *> \par Further Details: * ===================== diff --git a/SRC/zsytrf_aa.f b/SRC/zsytrf_aa.f index ddb19925a5..fbfb40930d 100644 --- a/SRC/zsytrf_aa.f +++ b/SRC/zsytrf_aa.f @@ -125,7 +125,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrf_aa * * ===================================================================== SUBROUTINE ZSYTRF_AA( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO) diff --git a/SRC/zsytrf_aa_2stage.f b/SRC/zsytrf_aa_2stage.f index 95b9fda0dd..0812d1f1fb 100644 --- a/SRC/zsytrf_aa_2stage.f +++ b/SRC/zsytrf_aa_2stage.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrf_aa_2stage * * ===================================================================== SUBROUTINE ZSYTRF_AA_2STAGE( UPLO, N, A, LDA, TB, LTB, IPIV, diff --git a/SRC/zsytrf_rk.f b/SRC/zsytrf_rk.f index 3b398ce6ca..65f0f2ca55 100644 --- a/SRC/zsytrf_rk.f +++ b/SRC/zsytrf_rk.f @@ -229,7 +229,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrf_rk * *> \par Further Details: * ===================== diff --git a/SRC/zsytrf_rook.f b/SRC/zsytrf_rook.f index 84a654fb89..c1f29cd439 100644 --- a/SRC/zsytrf_rook.f +++ b/SRC/zsytrf_rook.f @@ -146,7 +146,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrf_rook * *> \par Further Details: * ===================== diff --git a/SRC/zsytri.f b/SRC/zsytri.f index 32c7bf5cb7..e8db7f7523 100644 --- a/SRC/zsytri.f +++ b/SRC/zsytri.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetri * * ===================================================================== SUBROUTINE ZSYTRI( UPLO, N, A, LDA, IPIV, WORK, INFO ) diff --git a/SRC/zsytri2.f b/SRC/zsytri2.f index 5417377f01..4a208430a3 100644 --- a/SRC/zsytri2.f +++ b/SRC/zsytri2.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetri2 * * ===================================================================== SUBROUTINE ZSYTRI2( UPLO, N, A, LDA, IPIV, WORK, LWORK, INFO ) diff --git a/SRC/zsytri2x.f b/SRC/zsytri2x.f index 61814ae6d8..41f00bda51 100644 --- a/SRC/zsytri2x.f +++ b/SRC/zsytri2x.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetri2x * * ===================================================================== SUBROUTINE ZSYTRI2X( UPLO, N, A, LDA, IPIV, WORK, NB, INFO ) diff --git a/SRC/zsytri_3.f b/SRC/zsytri_3.f index 4503703d3f..d56331137b 100644 --- a/SRC/zsytri_3.f +++ b/SRC/zsytri_3.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetri_3 * *> \par Contributors: * ================== diff --git a/SRC/zsytri_3x.f b/SRC/zsytri_3x.f index 5bbd8e3090..061db0da11 100644 --- a/SRC/zsytri_3x.f +++ b/SRC/zsytri_3x.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetri_3x * *> \par Contributors: * ================== diff --git a/SRC/zsytri_rook.f b/SRC/zsytri_rook.f index 41a2f040f3..42104826ca 100644 --- a/SRC/zsytri_rook.f +++ b/SRC/zsytri_rook.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetri_rook * *> \par Contributors: * ================== diff --git a/SRC/zsytrs.f b/SRC/zsytrs.f index 81c27f72ee..cf1ec8a526 100644 --- a/SRC/zsytrs.f +++ b/SRC/zsytrs.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrs * * ===================================================================== SUBROUTINE ZSYTRS( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, INFO ) diff --git a/SRC/zsytrs2.f b/SRC/zsytrs2.f index 38986f80a1..69da8c3e91 100644 --- a/SRC/zsytrs2.f +++ b/SRC/zsytrs2.f @@ -124,7 +124,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrs2 * * ===================================================================== SUBROUTINE ZSYTRS2( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/zsytrs_3.f b/SRC/zsytrs_3.f index b9e5cbac15..3ed566b14c 100644 --- a/SRC/zsytrs_3.f +++ b/SRC/zsytrs_3.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrs_3 * *> \par Contributors: * ================== diff --git a/SRC/zsytrs_aa.f b/SRC/zsytrs_aa.f index 4dbd067761..0c7ecba0bb 100644 --- a/SRC/zsytrs_aa.f +++ b/SRC/zsytrs_aa.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrs_aa * * ===================================================================== SUBROUTINE ZSYTRS_AA( UPLO, N, NRHS, A, LDA, IPIV, B, LDB, diff --git a/SRC/zsytrs_aa_2stage.f b/SRC/zsytrs_aa_2stage.f index d43f0fa123..810ac6e7dd 100644 --- a/SRC/zsytrs_aa_2stage.f +++ b/SRC/zsytrs_aa_2stage.f @@ -131,7 +131,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrs_aa_2stage * * ===================================================================== SUBROUTINE ZSYTRS_AA_2STAGE( UPLO, N, NRHS, A, LDA, TB, LTB, diff --git a/SRC/zsytrs_rook.f b/SRC/zsytrs_rook.f index c66a723794..38394de991 100644 --- a/SRC/zsytrs_rook.f +++ b/SRC/zsytrs_rook.f @@ -113,7 +113,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup hetrs_rook * *> \par Contributors: * ================== diff --git a/SRC/ztbcon.f b/SRC/ztbcon.f index ed1f3df9fd..f4f966d456 100644 --- a/SRC/ztbcon.f +++ b/SRC/ztbcon.f @@ -135,7 +135,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tbcon * * ===================================================================== SUBROUTINE ZTBCON( NORM, UPLO, DIAG, N, KD, AB, LDAB, RCOND, WORK, diff --git a/SRC/ztbrfs.f b/SRC/ztbrfs.f index 0bd1865667..820ad9ab8e 100644 --- a/SRC/ztbrfs.f +++ b/SRC/ztbrfs.f @@ -180,7 +180,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tbrfs * * ===================================================================== SUBROUTINE ZTBRFS( UPLO, TRANS, DIAG, N, KD, NRHS, AB, LDAB, B, diff --git a/SRC/ztbtrs.f b/SRC/ztbtrs.f index e12a7e798e..c906d2669a 100644 --- a/SRC/ztbtrs.f +++ b/SRC/ztbtrs.f @@ -138,7 +138,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tbtrs * * ===================================================================== SUBROUTINE ZTBTRS( UPLO, TRANS, DIAG, N, KD, NRHS, AB, LDAB, B, diff --git a/SRC/ztfsm.f b/SRC/ztfsm.f index 538da4f071..d007415bfa 100644 --- a/SRC/ztfsm.f +++ b/SRC/ztfsm.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tfsm * *> \par Further Details: * ===================== diff --git a/SRC/ztftri.f b/SRC/ztftri.f index 7fbd81cdd6..39e1c4d1d9 100644 --- a/SRC/ztftri.f +++ b/SRC/ztftri.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tftri * *> \par Further Details: * ===================== diff --git a/SRC/ztfttp.f b/SRC/ztfttp.f index 9f5c4866a8..e7b1451d61 100644 --- a/SRC/ztfttp.f +++ b/SRC/ztfttp.f @@ -93,7 +93,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tfttp * *> \par Further Details: * ===================== diff --git a/SRC/ztfttr.f b/SRC/ztfttr.f index 511aca3360..72c58d7de0 100644 --- a/SRC/ztfttr.f +++ b/SRC/ztfttr.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tfttr * *> \par Further Details: * ===================== diff --git a/SRC/ztgevc.f b/SRC/ztgevc.f index 6dcbe582f8..00431fb403 100644 --- a/SRC/ztgevc.f +++ b/SRC/ztgevc.f @@ -211,7 +211,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup tgevc * * ===================================================================== SUBROUTINE ZTGEVC( SIDE, HOWMNY, SELECT, N, S, LDS, P, LDP, VL, diff --git a/SRC/ztgex2.f b/SRC/ztgex2.f index 3c3705c66c..f0b47ca2d7 100644 --- a/SRC/ztgex2.f +++ b/SRC/ztgex2.f @@ -153,7 +153,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEauxiliary +*> \ingroup tgex2 * *> \par Further Details: * ===================== diff --git a/SRC/ztgexc.f b/SRC/ztgexc.f index 55677317ca..563db754b1 100644 --- a/SRC/ztgexc.f +++ b/SRC/ztgexc.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GEcomputational +*> \ingroup tgexc * *> \par Contributors: * ================== diff --git a/SRC/ztgsen.f b/SRC/ztgsen.f index 25a5c6f4ed..92eaab0321 100644 --- a/SRC/ztgsen.f +++ b/SRC/ztgsen.f @@ -290,7 +290,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tgsen * *> \par Further Details: * ===================== diff --git a/SRC/ztgsja.f b/SRC/ztgsja.f index c1c5abdb18..aaba9be734 100644 --- a/SRC/ztgsja.f +++ b/SRC/ztgsja.f @@ -351,7 +351,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tgsja * *> \par Further Details: * ===================== diff --git a/SRC/ztgsna.f b/SRC/ztgsna.f index e76b4b1547..e26696e37a 100644 --- a/SRC/ztgsna.f +++ b/SRC/ztgsna.f @@ -213,7 +213,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tgsna * *> \par Further Details: * ===================== diff --git a/SRC/ztgsy2.f b/SRC/ztgsy2.f index 0cae8939ef..40c701d7d7 100644 --- a/SRC/ztgsy2.f +++ b/SRC/ztgsy2.f @@ -244,7 +244,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYauxiliary +*> \ingroup tgsy2 * *> \par Contributors: * ================== diff --git a/SRC/ztgsyl.f b/SRC/ztgsyl.f index f613671c9c..9bc1d70745 100644 --- a/SRC/ztgsyl.f +++ b/SRC/ztgsyl.f @@ -260,7 +260,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup tgsyl * *> \par Contributors: * ================== diff --git a/SRC/ztpcon.f b/SRC/ztpcon.f index e5d0b071db..e118159268 100644 --- a/SRC/ztpcon.f +++ b/SRC/ztpcon.f @@ -122,7 +122,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tpcon * * ===================================================================== SUBROUTINE ZTPCON( NORM, UPLO, DIAG, N, AP, RCOND, WORK, RWORK, diff --git a/SRC/ztplqt.f b/SRC/ztplqt.f index a27d5e13a4..7bbfd8dced 100644 --- a/SRC/ztplqt.f +++ b/SRC/ztplqt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tplqt * *> \par Further Details: * ===================== diff --git a/SRC/ztplqt2.f b/SRC/ztplqt2.f index 777e5f57e4..cc666f88a1 100644 --- a/SRC/ztplqt2.f +++ b/SRC/ztplqt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tplqt2 * *> \par Further Details: * ===================== diff --git a/SRC/ztpmlqt.f b/SRC/ztpmlqt.f index c63c05bf8e..1b33380037 100644 --- a/SRC/ztpmlqt.f +++ b/SRC/ztpmlqt.f @@ -173,7 +173,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup doubleOTHERcomputational +*> \ingroup tpmlqt * *> \par Further Details: * ===================== diff --git a/SRC/ztpmqrt.f b/SRC/ztpmqrt.f index a31bca76fa..aa7f2459a6 100644 --- a/SRC/ztpmqrt.f +++ b/SRC/ztpmqrt.f @@ -175,7 +175,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tpmqrt * *> \par Further Details: * ===================== diff --git a/SRC/ztpqrt.f b/SRC/ztpqrt.f index 83ff7409cd..428bf502f0 100644 --- a/SRC/ztpqrt.f +++ b/SRC/ztpqrt.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tpqrt * *> \par Further Details: * ===================== diff --git a/SRC/ztpqrt2.f b/SRC/ztpqrt2.f index 651ac45337..1c348dfc9b 100644 --- a/SRC/ztpqrt2.f +++ b/SRC/ztpqrt2.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tpqrt2 * *> \par Further Details: * ===================== diff --git a/SRC/ztprfb.f b/SRC/ztprfb.f index 7b1bc17a08..62aec75b94 100644 --- a/SRC/ztprfb.f +++ b/SRC/ztprfb.f @@ -194,7 +194,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERauxiliary +*> \ingroup tprfb * *> \par Further Details: * ===================== diff --git a/SRC/ztprfs.f b/SRC/ztprfs.f index 485694a565..cb6492c0e4 100644 --- a/SRC/ztprfs.f +++ b/SRC/ztprfs.f @@ -166,7 +166,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tprfs * * ===================================================================== SUBROUTINE ZTPRFS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, X, LDX, diff --git a/SRC/ztptri.f b/SRC/ztptri.f index 31284ad637..4527a08acc 100644 --- a/SRC/ztptri.f +++ b/SRC/ztptri.f @@ -91,7 +91,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tptri * *> \par Further Details: * ===================== diff --git a/SRC/ztptrs.f b/SRC/ztptrs.f index 2d7093313a..99fc33cd4a 100644 --- a/SRC/ztptrs.f +++ b/SRC/ztptrs.f @@ -123,7 +123,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tptrs * * ===================================================================== SUBROUTINE ZTPTRS( UPLO, TRANS, DIAG, N, NRHS, AP, B, LDB, INFO ) diff --git a/SRC/ztpttf.f b/SRC/ztpttf.f index bdd107d4d7..3dd0b765c2 100644 --- a/SRC/ztpttf.f +++ b/SRC/ztpttf.f @@ -92,7 +92,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tpttf * *> \par Further Details: * ===================== diff --git a/SRC/ztpttr.f b/SRC/ztpttr.f index 1529e0251a..a04b7c9448 100644 --- a/SRC/ztpttr.f +++ b/SRC/ztpttr.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tpttr * * ===================================================================== SUBROUTINE ZTPTTR( UPLO, N, AP, A, LDA, INFO ) diff --git a/SRC/ztrcon.f b/SRC/ztrcon.f index 051ab1b7c6..c69a60072e 100644 --- a/SRC/ztrcon.f +++ b/SRC/ztrcon.f @@ -129,7 +129,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trcon * * ===================================================================== SUBROUTINE ZTRCON( NORM, UPLO, DIAG, N, A, LDA, RCOND, WORK, diff --git a/SRC/ztrevc.f b/SRC/ztrevc.f index 67fc13dfcf..249449eb5f 100644 --- a/SRC/ztrevc.f +++ b/SRC/ztrevc.f @@ -196,7 +196,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trevc * *> \par Further Details: * ===================== diff --git a/SRC/ztrevc3.f b/SRC/ztrevc3.f index 64552ddd6b..1196c82705 100644 --- a/SRC/ztrevc3.f +++ b/SRC/ztrevc3.f @@ -222,7 +222,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trevc3 * *> \par Further Details: * ===================== diff --git a/SRC/ztrexc.f b/SRC/ztrexc.f index 32aae51e4b..b8bd10b152 100644 --- a/SRC/ztrexc.f +++ b/SRC/ztrexc.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trexc * * ===================================================================== SUBROUTINE ZTREXC( COMPQ, N, T, LDT, Q, LDQ, IFST, ILST, INFO ) diff --git a/SRC/ztrrfs.f b/SRC/ztrrfs.f index 8c1a4c0695..36eee7b698 100644 --- a/SRC/ztrrfs.f +++ b/SRC/ztrrfs.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trrfs * * ===================================================================== SUBROUTINE ZTRRFS( UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, X, diff --git a/SRC/ztrsen.f b/SRC/ztrsen.f index 33f7e5b95d..2c199654af 100644 --- a/SRC/ztrsen.f +++ b/SRC/ztrsen.f @@ -182,7 +182,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trsen * *> \par Further Details: * ===================== diff --git a/SRC/ztrsna.f b/SRC/ztrsna.f index 1b947ce101..47cb12cb74 100644 --- a/SRC/ztrsna.f +++ b/SRC/ztrsna.f @@ -197,7 +197,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trsna * *> \par Further Details: * ===================== diff --git a/SRC/ztrsyl.f b/SRC/ztrsyl.f index 1a493d30be..857ae3a7fc 100644 --- a/SRC/ztrsyl.f +++ b/SRC/ztrsyl.f @@ -149,7 +149,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16SYcomputational +*> \ingroup trsyl * * ===================================================================== SUBROUTINE ZTRSYL( TRANA, TRANB, ISGN, M, N, A, LDA, B, LDB, C, diff --git a/SRC/ztrsyl3.f b/SRC/ztrsyl3.f index b5a058da4e..b9f7761759 100644 --- a/SRC/ztrsyl3.f +++ b/SRC/ztrsyl3.f @@ -136,7 +136,7 @@ *> A and B are unchanged). *> \endverbatim * -*> \ingroup complex16SYcomputational +*> \ingroup trsyl3 * * ===================================================================== * References: diff --git a/SRC/ztrti2.f b/SRC/ztrti2.f index d9249d21c2..306313ca25 100644 --- a/SRC/ztrti2.f +++ b/SRC/ztrti2.f @@ -103,7 +103,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trti2 * * ===================================================================== SUBROUTINE ZTRTI2( UPLO, DIAG, N, A, LDA, INFO ) diff --git a/SRC/ztrtri.f b/SRC/ztrtri.f index 6b9134dfb0..f6f1cfe170 100644 --- a/SRC/ztrtri.f +++ b/SRC/ztrtri.f @@ -102,7 +102,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trtri * * ===================================================================== SUBROUTINE ZTRTRI( UPLO, DIAG, N, A, LDA, INFO ) diff --git a/SRC/ztrtrs.f b/SRC/ztrtrs.f index ad7f965e2f..4ecb9ece80 100644 --- a/SRC/ztrtrs.f +++ b/SRC/ztrtrs.f @@ -132,7 +132,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trtrs * * ===================================================================== SUBROUTINE ZTRTRS( UPLO, TRANS, DIAG, N, NRHS, A, LDA, B, LDB, diff --git a/SRC/ztrttf.f b/SRC/ztrttf.f index 277d72456e..b1eb814f34 100644 --- a/SRC/ztrttf.f +++ b/SRC/ztrttf.f @@ -101,7 +101,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trttf * *> \par Further Details: * ===================== diff --git a/SRC/ztrttp.f b/SRC/ztrttp.f index ba9e8ce916..ec3a44718f 100644 --- a/SRC/ztrttp.f +++ b/SRC/ztrttp.f @@ -97,7 +97,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup trttp * * ===================================================================== SUBROUTINE ZTRTTP( UPLO, N, A, LDA, AP, INFO ) diff --git a/SRC/ztzrzf.f b/SRC/ztzrzf.f index 46d39e749f..f40619692a 100644 --- a/SRC/ztzrzf.f +++ b/SRC/ztzrzf.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup tzrzf * *> \par Contributors: * ================== diff --git a/SRC/zunbdb.f b/SRC/zunbdb.f index 281ec6e45f..603a85e315 100644 --- a/SRC/zunbdb.f +++ b/SRC/zunbdb.f @@ -255,7 +255,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unbdb * *> \par Further Details: * ===================== diff --git a/SRC/zunbdb1.f b/SRC/zunbdb1.f index 2fae170de4..fba82d49a7 100644 --- a/SRC/zunbdb1.f +++ b/SRC/zunbdb1.f @@ -174,7 +174,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unbdb1 * *> \par Further Details: * ===================== diff --git a/SRC/zunbdb2.f b/SRC/zunbdb2.f index 28e78fc23c..19fee9b42a 100644 --- a/SRC/zunbdb2.f +++ b/SRC/zunbdb2.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unbdb2 * *> \par Further Details: * ===================== diff --git a/SRC/zunbdb3.f b/SRC/zunbdb3.f index 9f32a7a886..ef620fae91 100644 --- a/SRC/zunbdb3.f +++ b/SRC/zunbdb3.f @@ -172,7 +172,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unbdb3 * *> \par Further Details: * ===================== diff --git a/SRC/zunbdb4.f b/SRC/zunbdb4.f index a1db5eb793..6cbadc5c52 100644 --- a/SRC/zunbdb4.f +++ b/SRC/zunbdb4.f @@ -183,7 +183,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unbdb4 * *> \par Further Details: * ===================== diff --git a/SRC/zunbdb5.f b/SRC/zunbdb5.f index 23174fe502..6ccdde1ce4 100644 --- a/SRC/zunbdb5.f +++ b/SRC/zunbdb5.f @@ -148,7 +148,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unbdb5 * * ===================================================================== SUBROUTINE ZUNBDB5( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, diff --git a/SRC/zunbdb6.f b/SRC/zunbdb6.f index ed666e449b..ac5fa75b1a 100644 --- a/SRC/zunbdb6.f +++ b/SRC/zunbdb6.f @@ -152,7 +152,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unbdb6 * * ===================================================================== SUBROUTINE ZUNBDB6( M1, M2, N, X1, INCX1, X2, INCX2, Q1, LDQ1, Q2, diff --git a/SRC/zuncsd.f b/SRC/zuncsd.f index cc45bbc70b..585bd31a2c 100644 --- a/SRC/zuncsd.f +++ b/SRC/zuncsd.f @@ -308,7 +308,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup uncsd * * ===================================================================== RECURSIVE SUBROUTINE ZUNCSD( JOBU1, JOBU2, JOBV1T, JOBV2T, TRANS, diff --git a/SRC/zuncsd2by1.f b/SRC/zuncsd2by1.f index 399b598be0..cf2158f72c 100644 --- a/SRC/zuncsd2by1.f +++ b/SRC/zuncsd2by1.f @@ -246,7 +246,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup uncsd2by1 * * ===================================================================== SUBROUTINE ZUNCSD2BY1( JOBU1, JOBU2, JOBV1T, M, P, Q, X11, LDX11, diff --git a/SRC/zung2l.f b/SRC/zung2l.f index add5cb946b..cec0759826 100644 --- a/SRC/zung2l.f +++ b/SRC/zung2l.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ung2l * * ===================================================================== SUBROUTINE ZUNG2L( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/zung2r.f b/SRC/zung2r.f index 2823b7ebdd..b73246b2b3 100644 --- a/SRC/zung2r.f +++ b/SRC/zung2r.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ung2r * * ===================================================================== SUBROUTINE ZUNG2R( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/zungbr.f b/SRC/zungbr.f index c42a372c5b..338ed9f20d 100644 --- a/SRC/zungbr.f +++ b/SRC/zungbr.f @@ -150,7 +150,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16GBcomputational +*> \ingroup ungbr * * ===================================================================== SUBROUTINE ZUNGBR( VECT, M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/zunghr.f b/SRC/zunghr.f index c112db1930..9b29f5f4a3 100644 --- a/SRC/zunghr.f +++ b/SRC/zunghr.f @@ -119,7 +119,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unghr * * ===================================================================== SUBROUTINE ZUNGHR( N, ILO, IHI, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/zungl2.f b/SRC/zungl2.f index e7a0b59603..83308c59b1 100644 --- a/SRC/zungl2.f +++ b/SRC/zungl2.f @@ -106,7 +106,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ungl2 * * ===================================================================== SUBROUTINE ZUNGL2( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/zunglq.f b/SRC/zunglq.f index aca6bc6e72..08fbe8beb0 100644 --- a/SRC/zunglq.f +++ b/SRC/zunglq.f @@ -120,7 +120,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unglq * * ===================================================================== SUBROUTINE ZUNGLQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/zungql.f b/SRC/zungql.f index 1804ca65ff..4a3943b77c 100644 --- a/SRC/zungql.f +++ b/SRC/zungql.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ungql * * ===================================================================== SUBROUTINE ZUNGQL( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/zungqr.f b/SRC/zungqr.f index b3f2c4507f..0167255565 100644 --- a/SRC/zungqr.f +++ b/SRC/zungqr.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ungqr * * ===================================================================== SUBROUTINE ZUNGQR( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/zungr2.f b/SRC/zungr2.f index 034ff4fe41..05c5fc74ec 100644 --- a/SRC/zungr2.f +++ b/SRC/zungr2.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ungr2 * * ===================================================================== SUBROUTINE ZUNGR2( M, N, K, A, LDA, TAU, WORK, INFO ) diff --git a/SRC/zungrq.f b/SRC/zungrq.f index 40b3b2392e..7839388887 100644 --- a/SRC/zungrq.f +++ b/SRC/zungrq.f @@ -121,7 +121,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ungrq * * ===================================================================== SUBROUTINE ZUNGRQ( M, N, K, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/zungtr.f b/SRC/zungtr.f index 01e100a8cd..126de69b81 100644 --- a/SRC/zungtr.f +++ b/SRC/zungtr.f @@ -116,7 +116,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ungtr * * ===================================================================== SUBROUTINE ZUNGTR( UPLO, N, A, LDA, TAU, WORK, LWORK, INFO ) diff --git a/SRC/zungtsqr.f b/SRC/zungtsqr.f index 23e28ac5c2..6b8aa87604 100644 --- a/SRC/zungtsqr.f +++ b/SRC/zungtsqr.f @@ -157,7 +157,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ungtsqr * *> \par Contributors: * ================== diff --git a/SRC/zungtsqr_row.f b/SRC/zungtsqr_row.f index 0d32ad6ce9..96a27d260b 100644 --- a/SRC/zungtsqr_row.f +++ b/SRC/zungtsqr_row.f @@ -169,7 +169,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup ungtsqr_row * *> \par Contributors: * ================== diff --git a/SRC/zunhr_col.f b/SRC/zunhr_col.f index 52f13eab51..72ca97ce7d 100644 --- a/SRC/zunhr_col.f +++ b/SRC/zunhr_col.f @@ -241,7 +241,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unhr_col * *> \par Contributors: * ================== diff --git a/SRC/zunm22.f b/SRC/zunm22.f index cedcea73af..2582d39c57 100644 --- a/SRC/zunm22.f +++ b/SRC/zunm22.f @@ -154,7 +154,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complexOTHERcomputational +*> \ingroup unm22 * * ===================================================================== SUBROUTINE ZUNM22( SIDE, TRANS, M, N, N1, N2, Q, LDQ, C, LDC, diff --git a/SRC/zunm2l.f b/SRC/zunm2l.f index 48c2dbfc0c..0e0ed1c067 100644 --- a/SRC/zunm2l.f +++ b/SRC/zunm2l.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unm2l * * ===================================================================== SUBROUTINE ZUNM2L( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/zunm2r.f b/SRC/zunm2r.f index aec5a8bcae..77e93edf61 100644 --- a/SRC/zunm2r.f +++ b/SRC/zunm2r.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unm2r * * ===================================================================== SUBROUTINE ZUNM2R( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/zunmbr.f b/SRC/zunmbr.f index b43e881b29..482c1031d7 100644 --- a/SRC/zunmbr.f +++ b/SRC/zunmbr.f @@ -188,7 +188,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmbr * * ===================================================================== SUBROUTINE ZUNMBR( VECT, SIDE, TRANS, M, N, K, A, LDA, TAU, C, diff --git a/SRC/zunmhr.f b/SRC/zunmhr.f index 9ece71c5e7..9ecd453ea9 100644 --- a/SRC/zunmhr.f +++ b/SRC/zunmhr.f @@ -170,7 +170,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmhr * * ===================================================================== SUBROUTINE ZUNMHR( SIDE, TRANS, M, N, ILO, IHI, A, LDA, TAU, C, diff --git a/SRC/zunml2.f b/SRC/zunml2.f index f47f768b08..00385dc612 100644 --- a/SRC/zunml2.f +++ b/SRC/zunml2.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unml2 * * ===================================================================== SUBROUTINE ZUNML2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/zunmlq.f b/SRC/zunmlq.f index f2fb315440..e7db7ea439 100644 --- a/SRC/zunmlq.f +++ b/SRC/zunmlq.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmlq * * ===================================================================== SUBROUTINE ZUNMLQ( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/zunmql.f b/SRC/zunmql.f index 06353a0c75..acd6c57635 100644 --- a/SRC/zunmql.f +++ b/SRC/zunmql.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmql * * ===================================================================== SUBROUTINE ZUNMQL( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/zunmqr.f b/SRC/zunmqr.f index 2ae205f4fd..3e3efc2094 100644 --- a/SRC/zunmqr.f +++ b/SRC/zunmqr.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmqr * * ===================================================================== SUBROUTINE ZUNMQR( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/zunmr2.f b/SRC/zunmr2.f index 3685e9c7c6..f8bf7e0a4a 100644 --- a/SRC/zunmr2.f +++ b/SRC/zunmr2.f @@ -151,7 +151,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmr2 * * ===================================================================== SUBROUTINE ZUNMR2( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/zunmr3.f b/SRC/zunmr3.f index 72d23fa434..f2f64a167b 100644 --- a/SRC/zunmr3.f +++ b/SRC/zunmr3.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmr3 * *> \par Contributors: * ================== diff --git a/SRC/zunmrq.f b/SRC/zunmrq.f index e14e93bf2e..c4774965e8 100644 --- a/SRC/zunmrq.f +++ b/SRC/zunmrq.f @@ -159,7 +159,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmrq * * ===================================================================== SUBROUTINE ZUNMRQ( SIDE, TRANS, M, N, K, A, LDA, TAU, C, LDC, diff --git a/SRC/zunmrz.f b/SRC/zunmrz.f index 1ec5532846..09d60dacf0 100644 --- a/SRC/zunmrz.f +++ b/SRC/zunmrz.f @@ -168,7 +168,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmrz * *> \par Contributors: * ================== diff --git a/SRC/zunmtr.f b/SRC/zunmtr.f index 441a7c2bcc..5c9e358c27 100644 --- a/SRC/zunmtr.f +++ b/SRC/zunmtr.f @@ -163,7 +163,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup unmtr * * ===================================================================== SUBROUTINE ZUNMTR( SIDE, UPLO, TRANS, M, N, A, LDA, TAU, C, LDC, diff --git a/SRC/zupgtr.f b/SRC/zupgtr.f index 38fca71516..0040afecd7 100644 --- a/SRC/zupgtr.f +++ b/SRC/zupgtr.f @@ -107,7 +107,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup upgtr * * ===================================================================== SUBROUTINE ZUPGTR( UPLO, N, AP, TAU, Q, LDQ, WORK, INFO ) diff --git a/SRC/zupmtr.f b/SRC/zupmtr.f index c195800261..7fbfff67dc 100644 --- a/SRC/zupmtr.f +++ b/SRC/zupmtr.f @@ -142,7 +142,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup complex16OTHERcomputational +*> \ingroup upmtr * * ===================================================================== SUBROUTINE ZUPMTR( SIDE, UPLO, TRANS, M, N, AP, TAU, C, LDC, WORK, diff --git a/TESTING/LIN/serrorhr_col.f b/TESTING/LIN/serrorhr_col.f index 3b222273cc..db4fbaa90e 100644 --- a/TESTING/LIN/serrorhr_col.f +++ b/TESTING/LIN/serrorhr_col.f @@ -49,7 +49,7 @@ *> \author Univ. of Colorado Denver *> \author NAG Ltd. * -*> \ingroup singlr_lin +*> \ingroup single_lin * * ===================================================================== SUBROUTINE SERRORHR_COL( PATH, NUNIT ) From fd23cd98a3d5e358ddf27eb93daf75f752429fe9 Mon Sep 17 00:00:00 2001 From: Mark Gates Date: Mon, 3 Jul 2023 23:47:41 -0400 Subject: [PATCH 2/7] lagtm: fix matrix-vector to matrix-matrix --- SRC/clagtm.f | 2 +- SRC/dlagtm.f | 2 +- SRC/slagtm.f | 2 +- SRC/zlagtm.f | 2 +- 4 files changed, 4 insertions(+), 4 deletions(-) diff --git a/SRC/clagtm.f b/SRC/clagtm.f index 81b8f6227f..568e5b804e 100644 --- a/SRC/clagtm.f +++ b/SRC/clagtm.f @@ -37,7 +37,7 @@ *> *> \verbatim *> -*> CLAGTM performs a matrix-vector product of the form +*> CLAGTM performs a matrix-matrix product of the form *> *> B := alpha * A * X + beta * B *> diff --git a/SRC/dlagtm.f b/SRC/dlagtm.f index 782dc3ccff..7051a0f4fd 100644 --- a/SRC/dlagtm.f +++ b/SRC/dlagtm.f @@ -37,7 +37,7 @@ *> *> \verbatim *> -*> DLAGTM performs a matrix-vector product of the form +*> DLAGTM performs a matrix-matrix product of the form *> *> B := alpha * A * X + beta * B *> diff --git a/SRC/slagtm.f b/SRC/slagtm.f index 0337c7da87..853d270d2d 100644 --- a/SRC/slagtm.f +++ b/SRC/slagtm.f @@ -37,7 +37,7 @@ *> *> \verbatim *> -*> SLAGTM performs a matrix-vector product of the form +*> SLAGTM performs a matrix-matrix product of the form *> *> B := alpha * A * X + beta * B *> diff --git a/SRC/zlagtm.f b/SRC/zlagtm.f index 958d52b8f6..148a76154c 100644 --- a/SRC/zlagtm.f +++ b/SRC/zlagtm.f @@ -37,7 +37,7 @@ *> *> \verbatim *> -*> ZLAGTM performs a matrix-vector product of the form +*> ZLAGTM performs a matrix-matrix product of the form *> *> B := alpha * A * X + beta * B *> From bd9bf0bb4c0371864e8008a78aac396d9745b7cd Mon Sep 17 00:00:00 2001 From: Mark Gates Date: Mon, 3 Jul 2023 23:45:58 -0400 Subject: [PATCH 3/7] lassq: rename variable scale to match docs --- SRC/classq.f90 | 56 +++++++++++++++++++++++++------------------------- SRC/dlassq.f90 | 56 +++++++++++++++++++++++++------------------------- SRC/slassq.f90 | 56 +++++++++++++++++++++++++------------------------- SRC/zlassq.f90 | 56 +++++++++++++++++++++++++------------------------- 4 files changed, 112 insertions(+), 112 deletions(-) diff --git a/SRC/classq.f90 b/SRC/classq.f90 index cb4e7971f0..6ee856d3b2 100644 --- a/SRC/classq.f90 +++ b/SRC/classq.f90 @@ -34,15 +34,15 @@ !> !> \verbatim !> -!> CLASSQ returns the values scl and smsq such that +!> CLASSQ returns the values scale_out and sumsq_out such that !> -!> ( scl**2 )*smsq = x( 1 )**2 +...+ x( n )**2 + ( scale**2 )*sumsq, +!> (scale_out**2)*sumsq_out = x( 1 )**2 +...+ x( n )**2 + (scale**2)*sumsq, !> -!> where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is +!> where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is !> assumed to be non-negative. !> !> scale and sumsq must be supplied in SCALE and SUMSQ and -!> scl and smsq are overwritten on SCALE and SUMSQ respectively. +!> scale_out and sumsq_out are overwritten on SCALE and SUMSQ respectively. !> !> If scale * sqrt( sumsq ) > tbig then !> we require: scale >= sqrt( TINY*EPS ) / sbig on entry, @@ -72,7 +72,7 @@ !> \verbatim !> X is COMPLEX array, dimension (1+(N-1)*abs(INCX)) !> The vector for which a scaled sum of squares is computed. -!> x( i ) = X( 1 + ( i - 1 )*INCX ), 1 <= i <= n. +!> x( i ) = X( 1 + ( i - 1 )*INCX ), 1 <= i <= n. !> \endverbatim !> !> \param[in] INCX @@ -82,24 +82,24 @@ !> If INCX > 0, X(1+(i-1)*INCX) = x(i) for 1 <= i <= n !> If INCX < 0, X(1-(n-i)*INCX) = x(i) for 1 <= i <= n !> If INCX = 0, x isn't a vector so there is no need to call -!> this subroutine. If you call it anyway, it will count x(1) +!> this subroutine. If you call it anyway, it will count x(1) !> in the vector norm N times. !> \endverbatim !> !> \param[in,out] SCALE !> \verbatim !> SCALE is REAL -!> On entry, the value scale in the equation above. -!> On exit, SCALE is overwritten with scl , the scaling factor +!> On entry, the value scale in the equation above. +!> On exit, SCALE is overwritten by scale_out, the scaling factor !> for the sum of squares. !> \endverbatim !> !> \param[in,out] SUMSQ !> \verbatim !> SUMSQ is REAL -!> On entry, the value sumsq in the equation above. -!> On exit, SUMSQ is overwritten with smsq , the basic sum of -!> squares from which scl has been factored out. +!> On entry, the value sumsq in the equation above. +!> On exit, SUMSQ is overwritten by sumsq_out, the basic sum of +!> squares from which scale_out has been factored out. !> \endverbatim ! ! Authors: @@ -130,10 +130,10 @@ !> !> \endverbatim ! -!> \ingroup OTHERauxiliary +!> \ingroup lassq ! ! ===================================================================== -subroutine CLASSQ( n, x, incx, scl, sumsq ) +subroutine CLASSQ( n, x, incx, scale, sumsq ) use LA_CONSTANTS, & only: wp=>sp, zero=>szero, one=>sone, & sbig=>ssbig, ssml=>sssml, tbig=>stbig, tsml=>stsml @@ -145,7 +145,7 @@ subroutine CLASSQ( n, x, incx, scl, sumsq ) ! ! .. Scalar Arguments .. integer :: incx, n - real(wp) :: scl, sumsq + real(wp) :: scale, sumsq ! .. ! .. Array Arguments .. complex(wp) :: x(*) @@ -158,10 +158,10 @@ subroutine CLASSQ( n, x, incx, scl, sumsq ) ! ! Quick return if possible ! - if( LA_ISNAN(scl) .or. LA_ISNAN(sumsq) ) return - if( sumsq == zero ) scl = one - if( scl == zero ) then - scl = one + if( LA_ISNAN(scale) .or. LA_ISNAN(sumsq) ) return + if( sumsq == zero ) scale = one + if( scale == zero ) then + scale = one sumsq = zero end if if (n <= 0) then @@ -207,15 +207,15 @@ subroutine CLASSQ( n, x, incx, scl, sumsq ) ! Put the existing sum of squares into one of the accumulators ! if( sumsq > zero ) then - ax = scl*sqrt( sumsq ) + ax = scale*sqrt( sumsq ) if (ax > tbig) then -! We assume scl >= sqrt( TINY*EPS ) / sbig - abig = abig + (scl*sbig)**2 * sumsq +! We assume scale >= sqrt( TINY*EPS ) / sbig + abig = abig + (scale*sbig)**2 * sumsq else if (ax < tsml) then -! We assume scl <= sqrt( HUGE ) / ssml - if (notbig) asml = asml + (scl*ssml)**2 * sumsq +! We assume scale <= sqrt( HUGE ) / ssml + if (notbig) asml = asml + (scale*ssml)**2 * sumsq else - amed = amed + scl**2 * sumsq + amed = amed + scale**2 * sumsq end if end if ! @@ -229,7 +229,7 @@ subroutine CLASSQ( n, x, incx, scl, sumsq ) if (amed > zero .or. LA_ISNAN(amed)) then abig = abig + (amed*sbig)*sbig end if - scl = one / sbig + scale = one / sbig sumsq = abig else if (asml > zero) then ! @@ -245,17 +245,17 @@ subroutine CLASSQ( n, x, incx, scl, sumsq ) ymin = asml ymax = amed end if - scl = one + scale = one sumsq = ymax**2*( one + (ymin/ymax)**2 ) else - scl = one / ssml + scale = one / ssml sumsq = asml end if else ! ! Otherwise all values are mid-range or zero ! - scl = one + scale = one sumsq = amed end if return diff --git a/SRC/dlassq.f90 b/SRC/dlassq.f90 index fddd1bf38f..53f432be64 100644 --- a/SRC/dlassq.f90 +++ b/SRC/dlassq.f90 @@ -34,15 +34,15 @@ !> !> \verbatim !> -!> DLASSQ returns the values scl and smsq such that +!> DLASSQ returns the values scale_out and sumsq_out such that !> -!> ( scl**2 )*smsq = x( 1 )**2 +...+ x( n )**2 + ( scale**2 )*sumsq, +!> (scale_out**2)*sumsq_out = x( 1 )**2 +...+ x( n )**2 + (scale**2)*sumsq, !> -!> where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is +!> where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is !> assumed to be non-negative. !> !> scale and sumsq must be supplied in SCALE and SUMSQ and -!> scl and smsq are overwritten on SCALE and SUMSQ respectively. +!> scale_out and sumsq_out are overwritten on SCALE and SUMSQ respectively. !> !> If scale * sqrt( sumsq ) > tbig then !> we require: scale >= sqrt( TINY*EPS ) / sbig on entry, @@ -72,7 +72,7 @@ !> \verbatim !> X is DOUBLE PRECISION array, dimension (1+(N-1)*abs(INCX)) !> The vector for which a scaled sum of squares is computed. -!> x( i ) = X( 1 + ( i - 1 )*INCX ), 1 <= i <= n. +!> x( i ) = X( 1 + ( i - 1 )*INCX ), 1 <= i <= n. !> \endverbatim !> !> \param[in] INCX @@ -82,24 +82,24 @@ !> If INCX > 0, X(1+(i-1)*INCX) = x(i) for 1 <= i <= n !> If INCX < 0, X(1-(n-i)*INCX) = x(i) for 1 <= i <= n !> If INCX = 0, x isn't a vector so there is no need to call -!> this subroutine. If you call it anyway, it will count x(1) +!> this subroutine. If you call it anyway, it will count x(1) !> in the vector norm N times. !> \endverbatim !> !> \param[in,out] SCALE !> \verbatim !> SCALE is DOUBLE PRECISION -!> On entry, the value scale in the equation above. -!> On exit, SCALE is overwritten with scl , the scaling factor +!> On entry, the value scale in the equation above. +!> On exit, SCALE is overwritten by scale_out, the scaling factor !> for the sum of squares. !> \endverbatim !> !> \param[in,out] SUMSQ !> \verbatim !> SUMSQ is DOUBLE PRECISION -!> On entry, the value sumsq in the equation above. -!> On exit, SUMSQ is overwritten with smsq , the basic sum of -!> squares from which scl has been factored out. +!> On entry, the value sumsq in the equation above. +!> On exit, SUMSQ is overwritten by sumsq_out, the basic sum of +!> squares from which scale_out has been factored out. !> \endverbatim ! ! Authors: @@ -130,10 +130,10 @@ !> !> \endverbatim ! -!> \ingroup OTHERauxiliary +!> \ingroup lassq ! ! ===================================================================== -subroutine DLASSQ( n, x, incx, scl, sumsq ) +subroutine DLASSQ( n, x, incx, scale, sumsq ) use LA_CONSTANTS, & only: wp=>dp, zero=>dzero, one=>done, & sbig=>dsbig, ssml=>dssml, tbig=>dtbig, tsml=>dtsml @@ -145,7 +145,7 @@ subroutine DLASSQ( n, x, incx, scl, sumsq ) ! ! .. Scalar Arguments .. integer :: incx, n - real(wp) :: scl, sumsq + real(wp) :: scale, sumsq ! .. ! .. Array Arguments .. real(wp) :: x(*) @@ -158,10 +158,10 @@ subroutine DLASSQ( n, x, incx, scl, sumsq ) ! ! Quick return if possible ! - if( LA_ISNAN(scl) .or. LA_ISNAN(sumsq) ) return - if( sumsq == zero ) scl = one - if( scl == zero ) then - scl = one + if( LA_ISNAN(scale) .or. LA_ISNAN(sumsq) ) return + if( sumsq == zero ) scale = one + if( scale == zero ) then + scale = one sumsq = zero end if if (n <= 0) then @@ -198,15 +198,15 @@ subroutine DLASSQ( n, x, incx, scl, sumsq ) ! Put the existing sum of squares into one of the accumulators ! if( sumsq > zero ) then - ax = scl*sqrt( sumsq ) + ax = scale*sqrt( sumsq ) if (ax > tbig) then -! We assume scl >= sqrt( TINY*EPS ) / sbig - abig = abig + (scl*sbig)**2 * sumsq +! We assume scale >= sqrt( TINY*EPS ) / sbig + abig = abig + (scale*sbig)**2 * sumsq else if (ax < tsml) then -! We assume scl <= sqrt( HUGE ) / ssml - if (notbig) asml = asml + (scl*ssml)**2 * sumsq +! We assume scale <= sqrt( HUGE ) / ssml + if (notbig) asml = asml + (scale*ssml)**2 * sumsq else - amed = amed + scl**2 * sumsq + amed = amed + scale**2 * sumsq end if end if ! @@ -220,7 +220,7 @@ subroutine DLASSQ( n, x, incx, scl, sumsq ) if (amed > zero .or. LA_ISNAN(amed)) then abig = abig + (amed*sbig)*sbig end if - scl = one / sbig + scale = one / sbig sumsq = abig else if (asml > zero) then ! @@ -236,17 +236,17 @@ subroutine DLASSQ( n, x, incx, scl, sumsq ) ymin = asml ymax = amed end if - scl = one + scale = one sumsq = ymax**2*( one + (ymin/ymax)**2 ) else - scl = one / ssml + scale = one / ssml sumsq = asml end if else ! ! Otherwise all values are mid-range or zero ! - scl = one + scale = one sumsq = amed end if return diff --git a/SRC/slassq.f90 b/SRC/slassq.f90 index 19f49402b1..739ca5d40d 100644 --- a/SRC/slassq.f90 +++ b/SRC/slassq.f90 @@ -34,15 +34,15 @@ !> !> \verbatim !> -!> SLASSQ returns the values scl and smsq such that +!> SLASSQ returns the values scale_out and sumsq_out such that !> -!> ( scl**2 )*smsq = x( 1 )**2 +...+ x( n )**2 + ( scale**2 )*sumsq, +!> (scale_out**2)*sumsq_out = x( 1 )**2 +...+ x( n )**2 + (scale**2)*sumsq, !> -!> where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is +!> where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is !> assumed to be non-negative. !> !> scale and sumsq must be supplied in SCALE and SUMSQ and -!> scl and smsq are overwritten on SCALE and SUMSQ respectively. +!> scale_out and sumsq_out are overwritten on SCALE and SUMSQ respectively. !> !> If scale * sqrt( sumsq ) > tbig then !> we require: scale >= sqrt( TINY*EPS ) / sbig on entry, @@ -72,7 +72,7 @@ !> \verbatim !> X is REAL array, dimension (1+(N-1)*abs(INCX)) !> The vector for which a scaled sum of squares is computed. -!> x( i ) = X( 1 + ( i - 1 )*INCX ), 1 <= i <= n. +!> x( i ) = X( 1 + ( i - 1 )*INCX ), 1 <= i <= n. !> \endverbatim !> !> \param[in] INCX @@ -82,24 +82,24 @@ !> If INCX > 0, X(1+(i-1)*INCX) = x(i) for 1 <= i <= n !> If INCX < 0, X(1-(n-i)*INCX) = x(i) for 1 <= i <= n !> If INCX = 0, x isn't a vector so there is no need to call -!> this subroutine. If you call it anyway, it will count x(1) +!> this subroutine. If you call it anyway, it will count x(1) !> in the vector norm N times. !> \endverbatim !> !> \param[in,out] SCALE !> \verbatim !> SCALE is REAL -!> On entry, the value scale in the equation above. -!> On exit, SCALE is overwritten with scl , the scaling factor +!> On entry, the value scale in the equation above. +!> On exit, SCALE is overwritten by scale_out, the scaling factor !> for the sum of squares. !> \endverbatim !> !> \param[in,out] SUMSQ !> \verbatim !> SUMSQ is REAL -!> On entry, the value sumsq in the equation above. -!> On exit, SUMSQ is overwritten with smsq , the basic sum of -!> squares from which scl has been factored out. +!> On entry, the value sumsq in the equation above. +!> On exit, SUMSQ is overwritten by sumsq_out, the basic sum of +!> squares from which scale_out has been factored out. !> \endverbatim ! ! Authors: @@ -130,10 +130,10 @@ !> !> \endverbatim ! -!> \ingroup OTHERauxiliary +!> \ingroup lassq ! ! ===================================================================== -subroutine SLASSQ( n, x, incx, scl, sumsq ) +subroutine SLASSQ( n, x, incx, scale, sumsq ) use LA_CONSTANTS, & only: wp=>sp, zero=>szero, one=>sone, & sbig=>ssbig, ssml=>sssml, tbig=>stbig, tsml=>stsml @@ -145,7 +145,7 @@ subroutine SLASSQ( n, x, incx, scl, sumsq ) ! ! .. Scalar Arguments .. integer :: incx, n - real(wp) :: scl, sumsq + real(wp) :: scale, sumsq ! .. ! .. Array Arguments .. real(wp) :: x(*) @@ -158,10 +158,10 @@ subroutine SLASSQ( n, x, incx, scl, sumsq ) ! ! Quick return if possible ! - if( LA_ISNAN(scl) .or. LA_ISNAN(sumsq) ) return - if( sumsq == zero ) scl = one - if( scl == zero ) then - scl = one + if( LA_ISNAN(scale) .or. LA_ISNAN(sumsq) ) return + if( sumsq == zero ) scale = one + if( scale == zero ) then + scale = one sumsq = zero end if if (n <= 0) then @@ -198,15 +198,15 @@ subroutine SLASSQ( n, x, incx, scl, sumsq ) ! Put the existing sum of squares into one of the accumulators ! if( sumsq > zero ) then - ax = scl*sqrt( sumsq ) + ax = scale*sqrt( sumsq ) if (ax > tbig) then -! We assume scl >= sqrt( TINY*EPS ) / sbig - abig = abig + (scl*sbig)**2 * sumsq +! We assume scale >= sqrt( TINY*EPS ) / sbig + abig = abig + (scale*sbig)**2 * sumsq else if (ax < tsml) then -! We assume scl <= sqrt( HUGE ) / ssml - if (notbig) asml = asml + (scl*ssml)**2 * sumsq +! We assume scale <= sqrt( HUGE ) / ssml + if (notbig) asml = asml + (scale*ssml)**2 * sumsq else - amed = amed + scl**2 * sumsq + amed = amed + scale**2 * sumsq end if end if ! @@ -220,7 +220,7 @@ subroutine SLASSQ( n, x, incx, scl, sumsq ) if (amed > zero .or. LA_ISNAN(amed)) then abig = abig + (amed*sbig)*sbig end if - scl = one / sbig + scale = one / sbig sumsq = abig else if (asml > zero) then ! @@ -236,17 +236,17 @@ subroutine SLASSQ( n, x, incx, scl, sumsq ) ymin = asml ymax = amed end if - scl = one + scale = one sumsq = ymax**2*( one + (ymin/ymax)**2 ) else - scl = one / ssml + scale = one / ssml sumsq = asml end if else ! ! Otherwise all values are mid-range or zero ! - scl = one + scale = one sumsq = amed end if return diff --git a/SRC/zlassq.f90 b/SRC/zlassq.f90 index 9346dacac9..ec5445a125 100644 --- a/SRC/zlassq.f90 +++ b/SRC/zlassq.f90 @@ -34,15 +34,15 @@ !> !> \verbatim !> -!> ZLASSQ returns the values scl and smsq such that +!> ZLASSQ returns the values scale_out and sumsq_out such that !> -!> ( scl**2 )*smsq = x( 1 )**2 +...+ x( n )**2 + ( scale**2 )*sumsq, +!> (scale_out**2)*sumsq_out = x( 1 )**2 +...+ x( n )**2 + (scale**2)*sumsq, !> -!> where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is +!> where x( i ) = X( 1 + ( i - 1 )*INCX ). The value of sumsq is !> assumed to be non-negative. !> !> scale and sumsq must be supplied in SCALE and SUMSQ and -!> scl and smsq are overwritten on SCALE and SUMSQ respectively. +!> scale_out and sumsq_out are overwritten on SCALE and SUMSQ respectively. !> !> If scale * sqrt( sumsq ) > tbig then !> we require: scale >= sqrt( TINY*EPS ) / sbig on entry, @@ -72,7 +72,7 @@ !> \verbatim !> X is DOUBLE COMPLEX array, dimension (1+(N-1)*abs(INCX)) !> The vector for which a scaled sum of squares is computed. -!> x( i ) = X( 1 + ( i - 1 )*INCX ), 1 <= i <= n. +!> x( i ) = X( 1 + ( i - 1 )*INCX ), 1 <= i <= n. !> \endverbatim !> !> \param[in] INCX @@ -82,24 +82,24 @@ !> If INCX > 0, X(1+(i-1)*INCX) = x(i) for 1 <= i <= n !> If INCX < 0, X(1-(n-i)*INCX) = x(i) for 1 <= i <= n !> If INCX = 0, x isn't a vector so there is no need to call -!> this subroutine. If you call it anyway, it will count x(1) +!> this subroutine. If you call it anyway, it will count x(1) !> in the vector norm N times. !> \endverbatim !> !> \param[in,out] SCALE !> \verbatim !> SCALE is DOUBLE PRECISION -!> On entry, the value scale in the equation above. -!> On exit, SCALE is overwritten with scl , the scaling factor +!> On entry, the value scale in the equation above. +!> On exit, SCALE is overwritten by scale_out, the scaling factor !> for the sum of squares. !> \endverbatim !> !> \param[in,out] SUMSQ !> \verbatim !> SUMSQ is DOUBLE PRECISION -!> On entry, the value sumsq in the equation above. -!> On exit, SUMSQ is overwritten with smsq , the basic sum of -!> squares from which scl has been factored out. +!> On entry, the value sumsq in the equation above. +!> On exit, SUMSQ is overwritten by sumsq_out, the basic sum of +!> squares from which scale_out has been factored out. !> \endverbatim ! ! Authors: @@ -130,10 +130,10 @@ !> !> \endverbatim ! -!> \ingroup OTHERauxiliary +!> \ingroup lassq ! ! ===================================================================== -subroutine ZLASSQ( n, x, incx, scl, sumsq ) +subroutine ZLASSQ( n, x, incx, scale, sumsq ) use LA_CONSTANTS, & only: wp=>dp, zero=>dzero, one=>done, & sbig=>dsbig, ssml=>dssml, tbig=>dtbig, tsml=>dtsml @@ -145,7 +145,7 @@ subroutine ZLASSQ( n, x, incx, scl, sumsq ) ! ! .. Scalar Arguments .. integer :: incx, n - real(wp) :: scl, sumsq + real(wp) :: scale, sumsq ! .. ! .. Array Arguments .. complex(wp) :: x(*) @@ -158,10 +158,10 @@ subroutine ZLASSQ( n, x, incx, scl, sumsq ) ! ! Quick return if possible ! - if( LA_ISNAN(scl) .or. LA_ISNAN(sumsq) ) return - if( sumsq == zero ) scl = one - if( scl == zero ) then - scl = one + if( LA_ISNAN(scale) .or. LA_ISNAN(sumsq) ) return + if( sumsq == zero ) scale = one + if( scale == zero ) then + scale = one sumsq = zero end if if (n <= 0) then @@ -207,15 +207,15 @@ subroutine ZLASSQ( n, x, incx, scl, sumsq ) ! Put the existing sum of squares into one of the accumulators ! if( sumsq > zero ) then - ax = scl*sqrt( sumsq ) + ax = scale*sqrt( sumsq ) if (ax > tbig) then -! We assume scl >= sqrt( TINY*EPS ) / sbig - abig = abig + (scl*sbig)**2 * sumsq +! We assume scale >= sqrt( TINY*EPS ) / sbig + abig = abig + (scale*sbig)**2 * sumsq else if (ax < tsml) then -! We assume scl <= sqrt( HUGE ) / ssml - if (notbig) asml = asml + (scl*ssml)**2 * sumsq +! We assume scale <= sqrt( HUGE ) / ssml + if (notbig) asml = asml + (scale*ssml)**2 * sumsq else - amed = amed + scl**2 * sumsq + amed = amed + scale**2 * sumsq end if end if ! @@ -229,7 +229,7 @@ subroutine ZLASSQ( n, x, incx, scl, sumsq ) if (amed > zero .or. LA_ISNAN(amed)) then abig = abig + (amed*sbig)*sbig end if - scl = one / sbig + scale = one / sbig sumsq = abig else if (asml > zero) then ! @@ -245,17 +245,17 @@ subroutine ZLASSQ( n, x, incx, scl, sumsq ) ymin = asml ymax = amed end if - scl = one + scale = one sumsq = ymax**2*( one + (ymin/ymax)**2 ) else - scl = one / ssml + scale = one / ssml sumsq = asml end if else ! ! Otherwise all values are mid-range or zero ! - scl = one + scale = one sumsq = amed end if return From 303a3ecaa51c20bceed261ffd58fc6e847c0a42f Mon Sep 17 00:00:00 2001 From: Mark Gates Date: Mon, 3 Jul 2023 23:15:33 -0400 Subject: [PATCH 4/7] rotg: add description to doxygen --- BLAS/SRC/crotg.f90 | 19 +++++++++---------- BLAS/SRC/drotg.f90 | 15 +++++++-------- BLAS/SRC/srotg.f90 | 15 +++++++-------- BLAS/SRC/zrotg.f90 | 19 +++++++++---------- 4 files changed, 32 insertions(+), 36 deletions(-) diff --git a/BLAS/SRC/crotg.f90 b/BLAS/SRC/crotg.f90 index 7e4f36b072..d16c6af905 100644 --- a/BLAS/SRC/crotg.f90 +++ b/BLAS/SRC/crotg.f90 @@ -5,19 +5,16 @@ ! Online html documentation available at ! http://www.netlib.org/lapack/explore-html/ ! -! Definition: -! =========== -! -! CROTG constructs a plane rotation -! [ c s ] [ a ] = [ r ] -! [ -conjg(s) c ] [ b ] [ 0 ] -! where c is real, s is complex, and c**2 + conjg(s)*s = 1. -! !> \par Purpose: ! ============= !> !> \verbatim !> +!> CROTG constructs a plane rotation +!> [ c s ] [ a ] = [ r ] +!> [ -conjg(s) c ] [ b ] [ 0 ] +!> where c is real, s is complex, and c**2 + conjg(s)*s = 1. +!> !> The computation uses the formulas !> |x| = sqrt( Re(x)**2 + Im(x)**2 ) !> sgn(x) = x / |x| if x /= 0 @@ -33,6 +30,8 @@ !> if the signs of a and b are not the same. !> !> \endverbatim +!> +!> @see lartg, @see lartgp ! ! Arguments: ! ========== @@ -181,7 +180,7 @@ subroutine CROTG( a, b, c, s ) f2 = ABSSQ( f ) g2 = ABSSQ( g ) h2 = f2 + g2 - ! safmin <= f2 <= h2 <= safmax + ! safmin <= f2 <= h2 <= safmax if( f2 >= h2 * safmin ) then ! safmin <= f2/h2 <= 1, and h2/f2 is finite c = sqrt( f2 / h2 ) @@ -237,7 +236,7 @@ subroutine CROTG( a, b, c, s ) f2 = ABSSQ( fs ) h2 = f2 + g2 end if - ! safmin <= f2 <= h2 <= safmax + ! safmin <= f2 <= h2 <= safmax if( f2 >= h2 * safmin ) then ! safmin <= f2/h2 <= 1, and h2/f2 is finite c = sqrt( f2 / h2 ) diff --git a/BLAS/SRC/drotg.f90 b/BLAS/SRC/drotg.f90 index 8544fb451b..fa1f7c02ef 100644 --- a/BLAS/SRC/drotg.f90 +++ b/BLAS/SRC/drotg.f90 @@ -5,19 +5,16 @@ ! Online html documentation available at ! http://www.netlib.org/lapack/explore-html/ ! -! Definition: -! =========== -! -! DROTG constructs a plane rotation -! [ c s ] [ a ] = [ r ] -! [ -s c ] [ b ] [ 0 ] -! satisfying c**2 + s**2 = 1. -! !> \par Purpose: ! ============= !> !> \verbatim !> +!> DROTG constructs a plane rotation +!> [ c s ] [ a ] = [ r ] +!> [ -s c ] [ b ] [ 0 ] +!> satisfying c**2 + s**2 = 1. +!> !> The computation uses the formulas !> sigma = sgn(a) if |a| > |b| !> = sgn(b) if |b| >= |a| @@ -34,6 +31,8 @@ !> If |z| > 1, set c = 1/z and s = sqrt( 1 - c**2). !> !> \endverbatim +!> +!> @see lartg, @see lartgp ! ! Arguments: ! ========== diff --git a/BLAS/SRC/srotg.f90 b/BLAS/SRC/srotg.f90 index e35235b539..ce536a5bea 100644 --- a/BLAS/SRC/srotg.f90 +++ b/BLAS/SRC/srotg.f90 @@ -5,19 +5,16 @@ ! Online html documentation available at ! http://www.netlib.org/lapack/explore-html/ ! -! Definition: -! =========== -! -! SROTG constructs a plane rotation -! [ c s ] [ a ] = [ r ] -! [ -s c ] [ b ] [ 0 ] -! satisfying c**2 + s**2 = 1. -! !> \par Purpose: ! ============= !> !> \verbatim !> +!> SROTG constructs a plane rotation +!> [ c s ] [ a ] = [ r ] +!> [ -s c ] [ b ] [ 0 ] +!> satisfying c**2 + s**2 = 1. +!> !> The computation uses the formulas !> sigma = sgn(a) if |a| > |b| !> = sgn(b) if |b| >= |a| @@ -34,6 +31,8 @@ !> If |z| > 1, set c = 1/z and s = sqrt( 1 - c**2). !> !> \endverbatim +!> +!> @see lartg, @see lartgp ! ! Arguments: ! ========== diff --git a/BLAS/SRC/zrotg.f90 b/BLAS/SRC/zrotg.f90 index 6f07ccb16e..551bea12a5 100644 --- a/BLAS/SRC/zrotg.f90 +++ b/BLAS/SRC/zrotg.f90 @@ -5,19 +5,16 @@ ! Online html documentation available at ! http://www.netlib.org/lapack/explore-html/ ! -! Definition: -! =========== -! -! ZROTG constructs a plane rotation -! [ c s ] [ a ] = [ r ] -! [ -conjg(s) c ] [ b ] [ 0 ] -! where c is real, s is complex, and c**2 + conjg(s)*s = 1. -! !> \par Purpose: ! ============= !> !> \verbatim !> +!> ZROTG constructs a plane rotation +!> [ c s ] [ a ] = [ r ] +!> [ -conjg(s) c ] [ b ] [ 0 ] +!> where c is real, s is complex, and c**2 + conjg(s)*s = 1. +!> !> The computation uses the formulas !> |x| = sqrt( Re(x)**2 + Im(x)**2 ) !> sgn(x) = x / |x| if x /= 0 @@ -33,6 +30,8 @@ !> if the signs of a and b are not the same. !> !> \endverbatim +!> +!> @see lartg, @see lartgp ! ! Arguments: ! ========== @@ -181,7 +180,7 @@ subroutine ZROTG( a, b, c, s ) f2 = ABSSQ( f ) g2 = ABSSQ( g ) h2 = f2 + g2 - ! safmin <= f2 <= h2 <= safmax + ! safmin <= f2 <= h2 <= safmax if( f2 >= h2 * safmin ) then ! safmin <= f2/h2 <= 1, and h2/f2 is finite c = sqrt( f2 / h2 ) @@ -237,7 +236,7 @@ subroutine ZROTG( a, b, c, s ) f2 = ABSSQ( fs ) h2 = f2 + g2 end if - ! safmin <= f2 <= h2 <= safmax + ! safmin <= f2 <= h2 <= safmax if( f2 >= h2 * safmin ) then ! safmin <= f2/h2 <= 1, and h2/f2 is finite c = sqrt( f2 / h2 ) From 3c5ca872dad2b7012d395b32e18d6e610aa0d231 Mon Sep 17 00:00:00 2001 From: Mark Gates Date: Mon, 3 Jul 2023 23:27:20 -0400 Subject: [PATCH 5/7] doxygen: update config and Makefile, use same config for html and man --- CMakeLists.txt | 44 +- DOCS/Doxyfile | 50 +- DOCS/Doxyfile_man | 2578 --------------------------------------------- Makefile | 28 +- 4 files changed, 71 insertions(+), 2629 deletions(-) delete mode 100644 DOCS/Doxyfile_man diff --git a/CMakeLists.txt b/CMakeLists.txt index df253f0e18..5a40f97d48 100644 --- a/CMakeLists.txt +++ b/CMakeLists.txt @@ -673,23 +673,35 @@ if(BUILD_HTML_DOCUMENTATION OR BUILD_MAN_DOCUMENTATION) set(DOXYGEN_PROJECT_BRIEF "LAPACK: Linear Algebra PACKage") set(DOXYGEN_PROJECT_NUMBER ${LAPACK_VERSION}) set(DOXYGEN_OUTPUT_DIRECTORY ${CMAKE_CURRENT_BINARY_DIR}/DOCS) - set(PROJECT_LOGO ${CMAKE_CURRENT_SOURCE_DIR}/DOCS/lapack.png) + set(DOXYGEN_PROJECT_LOGO ${CMAKE_CURRENT_SOURCE_DIR}/DOCS/lapack.png) set(DOXYGEN_OPTIMIZE_FOR_FORTRAN YES) set(DOXYGEN_SOURCE_BROWSER YES) - set(DISTRIBUTE_GROUP_DOC YES) set(DOXYGEN_CREATE_SUBDIRS YES) set(DOXYGEN_SEPARATE_MEMBER_PAGES YES) set(DOXYGEN_EXTRACT_ALL YES) - set(DOXYGEN_FILE_PATTERNS "*.f;*.c;*.h") + set(DOXYGEN_FILE_PATTERNS *.f *.f90 *.c *.h ) set(DOXYGEN_RECURSIVE YES) set(DOXYGEN_GENERATE_TREEVIEW YES) + set(DOXYGEN_DOT_IMAGE_FORMAT svg) set(DOXYGEN_INTERACTIVE_SVG YES) - set(DOXYGEN_QUIET YES) - set(DOXYGEN_WARNINGS NO) + set(DOXYGEN_QUIET NO) + set(DOXYGEN_WARNINGS YES) + set(DOXYGEN_WARN_NO_PARAMDOC YES) + set(DOXYGEN_WARN_LOGFILE doxygen_error) set(DOXYGEN_GENERATE_HTML NO) set(DOXYGEN_GENERATE_MAN NO) + # Exclude functions that are duplicated, creating conflicts. + set(DOXYGEN_EXCLUDE .git + .github + SRC/VARIANTS + BLAS/SRC/lsame.f + BLAS/SRC/xerbla.f + BLAS/SRC/xerbla_array.f + INSTALL/slamchf77.f + INSTALL/dlamchf77.f ) + if (BUILD_HTML_DOCUMENTATION) set(DOXYGEN_GENERATE_HTML YES) set(DOXYGEN_HTML_OUTPUT explore-html) @@ -699,13 +711,21 @@ if(BUILD_HTML_DOCUMENTATION OR BUILD_MAN_DOCUMENTATION) doxygen_add_docs( html - ${PROJECT_SOURCE_DIR} + + # Doxygen INPUT = + ${PROJECT_SOURCE_DIR}/README.md + ${PROJECT_SOURCE_DIR}/BLAS + ${PROJECT_SOURCE_DIR}/CBLAS + ${PROJECT_SOURCE_DIR}/SRC + ${PROJECT_SOURCE_DIR}/INSTALL + ${PROJECT_SOURCE_DIR}/TESTING + ${PROJECT_SOURCE_DIR}/DOCS/groups-usr.dox + COMMENT "Generating html LAPACK documentation (it will take some time... time to grab a coffee)" ) endif() if (BUILD_MAN_DOCUMENTATION) set(DOXYGEN_GENERATE_MAN YES) - set(DOXYGEN_EXCLUDE SRC/VARIANTS) set(DOXYGEN_MAN_LINKS YES) set(DOXYGEN_INLINE_SOURCES NO) set(DOXYGEN_CALL_GRAPH NO) @@ -713,7 +733,15 @@ if(BUILD_HTML_DOCUMENTATION OR BUILD_MAN_DOCUMENTATION) doxygen_add_docs( man - ${PROJECT_SOURCE_DIR} + + # Doxygen INPUT = + ${PROJECT_SOURCE_DIR}/BLAS + ${PROJECT_SOURCE_DIR}/CBLAS + ${PROJECT_SOURCE_DIR}/SRC + ${PROJECT_SOURCE_DIR}/INSTALL + ${PROJECT_SOURCE_DIR}/TESTING + ${PROJECT_SOURCE_DIR}/DOCS/groups-usr.dox + COMMENT "Generating man LAPACK documentation" ) endif() diff --git a/DOCS/Doxyfile b/DOCS/Doxyfile index 97415241c4..ef251b788d 100644 --- a/DOCS/Doxyfile +++ b/DOCS/Doxyfile @@ -387,7 +387,7 @@ IDL_PROPERTY_SUPPORT = YES # all members of a group must be documented explicitly. # The default value is: NO. -DISTRIBUTE_GROUP_DOC = YES +DISTRIBUTE_GROUP_DOC = NO # If one adds a struct or class to a group and this option is enabled, then also # any nested class or struct is added to the same group. By default this option @@ -784,7 +784,7 @@ CITE_BIB_FILES = # messages are off. # The default value is: NO. -QUIET = YES +QUIET = NO # The WARNINGS tag can be used to turn on/off the warning messages that are # generated to standard error (stderr) by doxygen. If WARNINGS is set to YES @@ -817,7 +817,7 @@ WARN_IF_DOC_ERROR = YES # EXTRACT_ALL is set to YES then this flag will automatically be disabled. # The default value is: NO. -WARN_NO_PARAMDOC = NO +WARN_NO_PARAMDOC = YES # If the WARN_AS_ERROR tag is set to YES then doxygen will immediately stop when # a warning is encountered. If the WARN_AS_ERROR tag is set to FAIL_ON_WARNINGS @@ -842,7 +842,7 @@ WARN_FORMAT = "$file:$line: $text" # messages should be written. If left blank the output is written to standard # error (stderr). -WARN_LOGFILE = output_err +WARN_LOGFILE = doxygen_error #--------------------------------------------------------------------------- # Configuration options related to the input files @@ -854,8 +854,9 @@ WARN_LOGFILE = output_err # spaces. See also FILE_PATTERNS and EXTENSION_MAPPING # Note: If this tag is empty the current directory is searched. -INPUT = . \ - DOCS/groups-usr.dox +INPUT = BLAS CBLAS SRC INSTALL TESTING \ + DOCS/groups-usr.dox \ + README.md # This tag can be used to specify the character encoding of the source files # that doxygen parses. Internally doxygen uses the UTF-8 encoding. Doxygen uses @@ -902,34 +903,15 @@ RECURSIVE = YES # Note that relative paths are relative to the directory from which doxygen is # run. -EXCLUDE = CMAKE \ - DOCS \ - .svn \ - CBLAS/.svn \ - CBLAS/src/.svn \ - CBLAS/testing/.svn \ - CBLAS/example/.svn \ - CBLAS/include/.svn \ - BLAS/.svn \ - BLAS/SRC/.svn \ - BLAS/TESTING/.svn \ - SRC/.svn \ - SRC/VARIANTS/.svn \ - SRC/VARIANTS/LIB/.svn \ - SRC/VARIANTS/cholesky/.svn \ - SRC/VARIANTS/cholesky/RL/.svn \ - SRC/VARIANTS/cholesky/TOP/.svn \ - SRC/VARIANTS/lu/.svn \ - SRC/VARIANTS/lu/CR/.svn \ - SRC/VARIANTS/lu/LL/.svn \ - SRC/VARIANTS/lu/REC/.svn \ - SRC/VARIANTS/qr/.svn \ - SRC/VARIANTS/qr/LL/.svn \ - INSTALL/.svn \ - TESTING/.svn \ - TESTING/EIG/.svn \ - TESTING/MATGEN/.svn \ - TESTING/LIN/.svn +# Exclude functions that are duplicated, creating conflicts. +EXCLUDE = .git \ + .github \ + SRC/VARIANTS \ + BLAS/SRC/lsame.f \ + BLAS/SRC/xerbla.f \ + BLAS/SRC/xerbla_array.f \ + INSTALL/slamchf77.f \ + INSTALL/dlamchf77.f \ # The EXCLUDE_SYMLINKS tag can be used to select whether or not files or # directories that are symbolic links (a Unix file system feature) are excluded diff --git a/DOCS/Doxyfile_man b/DOCS/Doxyfile_man deleted file mode 100644 index 6625de4566..0000000000 --- a/DOCS/Doxyfile_man +++ /dev/null @@ -1,2578 +0,0 @@ -# Doxyfile 1.9.1 - -# This file describes the settings to be used by the documentation system -# doxygen (www.doxygen.org) for a project. -# -# All text after a double hash (##) is considered a comment and is placed in -# front of the TAG it is preceding. -# -# All text after a single hash (#) is considered a comment and will be ignored. -# The format is: -# TAG = value [value, ...] -# For lists, items can also be appended using: -# TAG += value [value, ...] -# Values that contain spaces should be placed between quotes (\" \"). - -#--------------------------------------------------------------------------- -# Project related configuration options -#--------------------------------------------------------------------------- - -# This tag specifies the encoding used for all characters in the configuration -# file that follow. The default is UTF-8 which is also the encoding used for all -# text before the first occurrence of this tag. Doxygen uses libiconv (or the -# iconv built into libc) for the transcoding. See -# https://www.gnu.org/software/libiconv/ for the list of possible encodings. -# The default value is: UTF-8. - -DOXYFILE_ENCODING = UTF-8 - -# The PROJECT_NAME tag is a single word (or a sequence of words surrounded by -# double-quotes, unless you are using Doxywizard) that should identify the -# project for which the documentation is generated. This name is used in the -# title of most generated pages and in a few other places. -# The default value is: My Project. - -PROJECT_NAME = LAPACK - -# The PROJECT_NUMBER tag can be used to enter a project or revision number. This -# could be handy for archiving the generated documentation or if some version -# control system is used. - -PROJECT_NUMBER = 3.11.0 - -# Using the PROJECT_BRIEF tag one can provide an optional one line description -# for a project that appears at the top of each page and should give viewer a -# quick idea about the purpose of the project. Keep the description short. - -PROJECT_BRIEF = "LAPACK: Linear Algebra PACKage" - -# With the PROJECT_LOGO tag one can specify a logo or an icon that is included -# in the documentation. The maximum height of the logo should not exceed 55 -# pixels and the maximum width should not exceed 200 pixels. Doxygen will copy -# the logo to the output directory. - -PROJECT_LOGO = DOCS/lapack.png - -# The OUTPUT_DIRECTORY tag is used to specify the (relative or absolute) path -# into which the generated documentation will be written. If a relative path is -# entered, it will be relative to the location where doxygen was started. If -# left blank the current directory will be used. - -OUTPUT_DIRECTORY = DOCS - -# If the CREATE_SUBDIRS tag is set to YES then doxygen will create 4096 sub- -# directories (in 2 levels) under the output directory of each output format and -# will distribute the generated files over these directories. Enabling this -# option can be useful when feeding doxygen a huge amount of source files, where -# putting all generated files in the same directory would otherwise causes -# performance problems for the file system. -# The default value is: NO. - -CREATE_SUBDIRS = NO - -# If the ALLOW_UNICODE_NAMES tag is set to YES, doxygen will allow non-ASCII -# characters to appear in the names of generated files. If set to NO, non-ASCII -# characters will be escaped, for example _xE3_x81_x84 will be used for Unicode -# U+3044. -# The default value is: NO. - -ALLOW_UNICODE_NAMES = NO - -# The OUTPUT_LANGUAGE tag is used to specify the language in which all -# documentation generated by doxygen is written. Doxygen will use this -# information to generate all constant output in the proper language. -# Possible values are: Afrikaans, Arabic, Armenian, Brazilian, Catalan, Chinese, -# Chinese-Traditional, Croatian, Czech, Danish, Dutch, English (United States), -# Esperanto, Farsi (Persian), Finnish, French, German, Greek, Hungarian, -# Indonesian, Italian, Japanese, Japanese-en (Japanese with English messages), -# Korean, Korean-en (Korean with English messages), Latvian, Lithuanian, -# Macedonian, Norwegian, Persian (Farsi), Polish, Portuguese, Romanian, Russian, -# Serbian, Serbian-Cyrillic, Slovak, Slovene, Spanish, Swedish, Turkish, -# Ukrainian and Vietnamese. -# The default value is: English. - -OUTPUT_LANGUAGE = English - -# The OUTPUT_TEXT_DIRECTION tag is used to specify the direction in which all -# documentation generated by doxygen is written. Doxygen will use this -# information to generate all generated output in the proper direction. -# Possible values are: None, LTR, RTL and Context. -# The default value is: None. - -OUTPUT_TEXT_DIRECTION = None - -# If the BRIEF_MEMBER_DESC tag is set to YES, doxygen will include brief member -# descriptions after the members that are listed in the file and class -# documentation (similar to Javadoc). Set to NO to disable this. -# The default value is: YES. - -BRIEF_MEMBER_DESC = YES - -# If the REPEAT_BRIEF tag is set to YES, doxygen will prepend the brief -# description of a member or function before the detailed description -# -# Note: If both HIDE_UNDOC_MEMBERS and BRIEF_MEMBER_DESC are set to NO, the -# brief descriptions will be completely suppressed. -# The default value is: YES. - -REPEAT_BRIEF = YES - -# This tag implements a quasi-intelligent brief description abbreviator that is -# used to form the text in various listings. Each string in this list, if found -# as the leading text of the brief description, will be stripped from the text -# and the result, after processing the whole list, is used as the annotated -# text. Otherwise, the brief description is used as-is. If left blank, the -# following values are used ($name is automatically replaced with the name of -# the entity):The $name class, The $name widget, The $name file, is, provides, -# specifies, contains, represents, a, an and the. - -ABBREVIATE_BRIEF = - -# If the ALWAYS_DETAILED_SEC and REPEAT_BRIEF tags are both set to YES then -# doxygen will generate a detailed section even if there is only a brief -# description. -# The default value is: NO. - -ALWAYS_DETAILED_SEC = NO - -# If the INLINE_INHERITED_MEMB tag is set to YES, doxygen will show all -# inherited members of a class in the documentation of that class as if those -# members were ordinary class members. Constructors, destructors and assignment -# operators of the base classes will not be shown. -# The default value is: NO. - -INLINE_INHERITED_MEMB = NO - -# If the FULL_PATH_NAMES tag is set to YES, doxygen will prepend the full path -# before files name in the file list and in the header files. If set to NO the -# shortest path that makes the file name unique will be used -# The default value is: YES. - -FULL_PATH_NAMES = NO - -# The STRIP_FROM_PATH tag can be used to strip a user-defined part of the path. -# Stripping is only done if one of the specified strings matches the left-hand -# part of the path. The tag can be used to show relative paths in the file list. -# If left blank the directory from which doxygen is run is used as the path to -# strip. -# -# Note that you can specify absolute paths here, but also relative paths, which -# will be relative from the directory where doxygen is started. -# This tag requires that the tag FULL_PATH_NAMES is set to YES. - -STRIP_FROM_PATH = - -# The STRIP_FROM_INC_PATH tag can be used to strip a user-defined part of the -# path mentioned in the documentation of a class, which tells the reader which -# header file to include in order to use a class. If left blank only the name of -# the header file containing the class definition is used. Otherwise one should -# specify the list of include paths that are normally passed to the compiler -# using the -I flag. - -STRIP_FROM_INC_PATH = - -# If the SHORT_NAMES tag is set to YES, doxygen will generate much shorter (but -# less readable) file names. This can be useful is your file systems doesn't -# support long names like on DOS, Mac, or CD-ROM. -# The default value is: NO. - -SHORT_NAMES = NO - -# If the JAVADOC_AUTOBRIEF tag is set to YES then doxygen will interpret the -# first line (until the first dot) of a Javadoc-style comment as the brief -# description. If set to NO, the Javadoc-style will behave just like regular Qt- -# style comments (thus requiring an explicit @brief command for a brief -# description.) -# The default value is: NO. - -JAVADOC_AUTOBRIEF = NO - -# If the JAVADOC_BANNER tag is set to YES then doxygen will interpret a line -# such as -# /*************** -# as being the beginning of a Javadoc-style comment "banner". If set to NO, the -# Javadoc-style will behave just like regular comments and it will not be -# interpreted by doxygen. -# The default value is: NO. - -JAVADOC_BANNER = NO - -# If the QT_AUTOBRIEF tag is set to YES then doxygen will interpret the first -# line (until the first dot) of a Qt-style comment as the brief description. If -# set to NO, the Qt-style will behave just like regular Qt-style comments (thus -# requiring an explicit \brief command for a brief description.) -# The default value is: NO. - -QT_AUTOBRIEF = NO - -# The MULTILINE_CPP_IS_BRIEF tag can be set to YES to make doxygen treat a -# multi-line C++ special comment block (i.e. a block of //! or /// comments) as -# a brief description. This used to be the default behavior. The new default is -# to treat a multi-line C++ comment block as a detailed description. Set this -# tag to YES if you prefer the old behavior instead. -# -# Note that setting this tag to YES also means that rational rose comments are -# not recognized any more. -# The default value is: NO. - -MULTILINE_CPP_IS_BRIEF = NO - -# By default Python docstrings are displayed as preformatted text and doxygen's -# special commands cannot be used. By setting PYTHON_DOCSTRING to NO the -# doxygen's special commands can be used and the contents of the docstring -# documentation blocks is shown as doxygen documentation. -# The default value is: YES. - -PYTHON_DOCSTRING = YES - -# If the INHERIT_DOCS tag is set to YES then an undocumented member inherits the -# documentation from any documented member that it re-implements. -# The default value is: YES. - -INHERIT_DOCS = YES - -# If the SEPARATE_MEMBER_PAGES tag is set to YES then doxygen will produce a new -# page for each member. If set to NO, the documentation of a member will be part -# of the file/class/namespace that contains it. -# The default value is: NO. - -SEPARATE_MEMBER_PAGES = NO - -# The TAB_SIZE tag can be used to set the number of spaces in a tab. Doxygen -# uses this value to replace tabs by spaces in code fragments. -# Minimum value: 1, maximum value: 16, default value: 4. - -TAB_SIZE = 8 - -# This tag can be used to specify a number of aliases that act as commands in -# the documentation. An alias has the form: -# name=value -# For example adding -# "sideeffect=@par Side Effects:\n" -# will allow you to put the command \sideeffect (or @sideeffect) in the -# documentation, which will result in a user-defined paragraph with heading -# "Side Effects:". You can put \n's in the value part of an alias to insert -# newlines (in the resulting output). You can put ^^ in the value part of an -# alias to insert a newline as if a physical newline was in the original file. -# When you need a literal { or } or , in the value part of an alias you have to -# escape them by means of a backslash (\), this can lead to conflicts with the -# commands \{ and \} for these it is advised to use the version @{ and @} or use -# a double escape (\\{ and \\}) - -ALIASES = - -# Set the OPTIMIZE_OUTPUT_FOR_C tag to YES if your project consists of C sources -# only. Doxygen will then generate output that is more tailored for C. For -# instance, some of the names that are used will be different. The list of all -# members will be omitted, etc. -# The default value is: NO. - -OPTIMIZE_OUTPUT_FOR_C = NO - -# Set the OPTIMIZE_OUTPUT_JAVA tag to YES if your project consists of Java or -# Python sources only. Doxygen will then generate output that is more tailored -# for that language. For instance, namespaces will be presented as packages, -# qualified scopes will look different, etc. -# The default value is: NO. - -OPTIMIZE_OUTPUT_JAVA = NO - -# Set the OPTIMIZE_FOR_FORTRAN tag to YES if your project consists of Fortran -# sources. Doxygen will then generate output that is tailored for Fortran. -# The default value is: NO. - -OPTIMIZE_FOR_FORTRAN = YES - -# Set the OPTIMIZE_OUTPUT_VHDL tag to YES if your project consists of VHDL -# sources. Doxygen will then generate output that is tailored for VHDL. -# The default value is: NO. - -OPTIMIZE_OUTPUT_VHDL = NO - -# Set the OPTIMIZE_OUTPUT_SLICE tag to YES if your project consists of Slice -# sources only. Doxygen will then generate output that is more tailored for that -# language. For instance, namespaces will be presented as modules, types will be -# separated into more groups, etc. -# The default value is: NO. - -OPTIMIZE_OUTPUT_SLICE = NO - -# Doxygen selects the parser to use depending on the extension of the files it -# parses. With this tag you can assign which parser to use for a given -# extension. Doxygen has a built-in mapping, but you can override or extend it -# using this tag. The format is ext=language, where ext is a file extension, and -# language is one of the parsers supported by doxygen: IDL, Java, JavaScript, -# Csharp (C#), C, C++, D, PHP, md (Markdown), Objective-C, Python, Slice, VHDL, -# Fortran (fixed format Fortran: FortranFixed, free formatted Fortran: -# FortranFree, unknown formatted Fortran: Fortran. In the later case the parser -# tries to guess whether the code is fixed or free formatted code, this is the -# default for Fortran type files). For instance to make doxygen treat .inc files -# as Fortran files (default is PHP), and .f files as C (default is Fortran), -# use: inc=Fortran f=C. -# -# Note: For files without extension you can use no_extension as a placeholder. -# -# Note that for custom extensions you also need to set FILE_PATTERNS otherwise -# the files are not read by doxygen. When specifying no_extension you should add -# * to the FILE_PATTERNS. -# -# Note see also the list of default file extension mappings. - -EXTENSION_MAPPING = - -# If the MARKDOWN_SUPPORT tag is enabled then doxygen pre-processes all comments -# according to the Markdown format, which allows for more readable -# documentation. See https://daringfireball.net/projects/markdown/ for details. -# The output of markdown processing is further processed by doxygen, so you can -# mix doxygen, HTML, and XML commands with Markdown formatting. Disable only in -# case of backward compatibilities issues. -# The default value is: YES. - -MARKDOWN_SUPPORT = YES - -# When the TOC_INCLUDE_HEADINGS tag is set to a non-zero value, all headings up -# to that level are automatically included in the table of contents, even if -# they do not have an id attribute. -# Note: This feature currently applies only to Markdown headings. -# Minimum value: 0, maximum value: 99, default value: 5. -# This tag requires that the tag MARKDOWN_SUPPORT is set to YES. - -TOC_INCLUDE_HEADINGS = 5 - -# When enabled doxygen tries to link words that correspond to documented -# classes, or namespaces to their corresponding documentation. Such a link can -# be prevented in individual cases by putting a % sign in front of the word or -# globally by setting AUTOLINK_SUPPORT to NO. -# The default value is: YES. - -AUTOLINK_SUPPORT = YES - -# If you use STL classes (i.e. std::string, std::vector, etc.) but do not want -# to include (a tag file for) the STL sources as input, then you should set this -# tag to YES in order to let doxygen match functions declarations and -# definitions whose arguments contain STL classes (e.g. func(std::string); -# versus func(std::string) {}). This also make the inheritance and collaboration -# diagrams that involve STL classes more complete and accurate. -# The default value is: NO. - -BUILTIN_STL_SUPPORT = NO - -# If you use Microsoft's C++/CLI language, you should set this option to YES to -# enable parsing support. -# The default value is: NO. - -CPP_CLI_SUPPORT = NO - -# Set the SIP_SUPPORT tag to YES if your project consists of sip (see: -# https://www.riverbankcomputing.com/software/sip/intro) sources only. Doxygen -# will parse them like normal C++ but will assume all classes use public instead -# of private inheritance when no explicit protection keyword is present. -# The default value is: NO. - -SIP_SUPPORT = NO - -# For Microsoft's IDL there are propget and propput attributes to indicate -# getter and setter methods for a property. Setting this option to YES will make -# doxygen to replace the get and set methods by a property in the documentation. -# This will only work if the methods are indeed getting or setting a simple -# type. If this is not the case, or you want to show the methods anyway, you -# should set this option to NO. -# The default value is: YES. - -IDL_PROPERTY_SUPPORT = YES - -# If member grouping is used in the documentation and the DISTRIBUTE_GROUP_DOC -# tag is set to YES then doxygen will reuse the documentation of the first -# member in the group (if any) for the other members of the group. By default -# all members of a group must be documented explicitly. -# The default value is: NO. - -DISTRIBUTE_GROUP_DOC = YES - -# If one adds a struct or class to a group and this option is enabled, then also -# any nested class or struct is added to the same group. By default this option -# is disabled and one has to add nested compounds explicitly via \ingroup. -# The default value is: NO. - -GROUP_NESTED_COMPOUNDS = NO - -# Set the SUBGROUPING tag to YES to allow class member groups of the same type -# (for instance a group of public functions) to be put as a subgroup of that -# type (e.g. under the Public Functions section). Set it to NO to prevent -# subgrouping. Alternatively, this can be done per class using the -# \nosubgrouping command. -# The default value is: YES. - -SUBGROUPING = YES - -# When the INLINE_GROUPED_CLASSES tag is set to YES, classes, structs and unions -# are shown inside the group in which they are included (e.g. using \ingroup) -# instead of on a separate page (for HTML and Man pages) or section (for LaTeX -# and RTF). -# -# Note that this feature does not work in combination with -# SEPARATE_MEMBER_PAGES. -# The default value is: NO. - -INLINE_GROUPED_CLASSES = NO - -# When the INLINE_SIMPLE_STRUCTS tag is set to YES, structs, classes, and unions -# with only public data fields or simple typedef fields will be shown inline in -# the documentation of the scope in which they are defined (i.e. file, -# namespace, or group documentation), provided this scope is documented. If set -# to NO, structs, classes, and unions are shown on a separate page (for HTML and -# Man pages) or section (for LaTeX and RTF). -# The default value is: NO. - -INLINE_SIMPLE_STRUCTS = NO - -# When TYPEDEF_HIDES_STRUCT tag is enabled, a typedef of a struct, union, or -# enum is documented as struct, union, or enum with the name of the typedef. So -# typedef struct TypeS {} TypeT, will appear in the documentation as a struct -# with name TypeT. When disabled the typedef will appear as a member of a file, -# namespace, or class. And the struct will be named TypeS. This can typically be -# useful for C code in case the coding convention dictates that all compound -# types are typedef'ed and only the typedef is referenced, never the tag name. -# The default value is: NO. - -TYPEDEF_HIDES_STRUCT = NO - -# The size of the symbol lookup cache can be set using LOOKUP_CACHE_SIZE. This -# cache is used to resolve symbols given their name and scope. Since this can be -# an expensive process and often the same symbol appears multiple times in the -# code, doxygen keeps a cache of pre-resolved symbols. If the cache is too small -# doxygen will become slower. If the cache is too large, memory is wasted. The -# cache size is given by this formula: 2^(16+LOOKUP_CACHE_SIZE). The valid range -# is 0..9, the default is 0, corresponding to a cache size of 2^16=65536 -# symbols. At the end of a run doxygen will report the cache usage and suggest -# the optimal cache size from a speed point of view. -# Minimum value: 0, maximum value: 9, default value: 0. - -LOOKUP_CACHE_SIZE = 0 - -# The NUM_PROC_THREADS specifies the number threads doxygen is allowed to use -# during processing. When set to 0 doxygen will based this on the number of -# cores available in the system. You can set it explicitly to a value larger -# than 0 to get more control over the balance between CPU load and processing -# speed. At this moment only the input processing can be done using multiple -# threads. Since this is still an experimental feature the default is set to 1, -# which efficively disables parallel processing. Please report any issues you -# encounter. Generating dot graphs in parallel is controlled by the -# DOT_NUM_THREADS setting. -# Minimum value: 0, maximum value: 32, default value: 1. - -NUM_PROC_THREADS = 1 - -#--------------------------------------------------------------------------- -# Build related configuration options -#--------------------------------------------------------------------------- - -# If the EXTRACT_ALL tag is set to YES, doxygen will assume all entities in -# documentation are documented, even if no documentation was available. Private -# class members and static file members will be hidden unless the -# EXTRACT_PRIVATE respectively EXTRACT_STATIC tags are set to YES. -# Note: This will also disable the warnings about undocumented members that are -# normally produced when WARNINGS is set to YES. -# The default value is: NO. - -EXTRACT_ALL = YES - -# If the EXTRACT_PRIVATE tag is set to YES, all private members of a class will -# be included in the documentation. -# The default value is: NO. - -EXTRACT_PRIVATE = NO - -# If the EXTRACT_PRIV_VIRTUAL tag is set to YES, documented private virtual -# methods of a class will be included in the documentation. -# The default value is: NO. - -EXTRACT_PRIV_VIRTUAL = NO - -# If the EXTRACT_PACKAGE tag is set to YES, all members with package or internal -# scope will be included in the documentation. -# The default value is: NO. - -EXTRACT_PACKAGE = NO - -# If the EXTRACT_STATIC tag is set to YES, all static members of a file will be -# included in the documentation. -# The default value is: NO. - -EXTRACT_STATIC = NO - -# If the EXTRACT_LOCAL_CLASSES tag is set to YES, classes (and structs) defined -# locally in source files will be included in the documentation. If set to NO, -# only classes defined in header files are included. Does not have any effect -# for Java sources. -# The default value is: YES. - -EXTRACT_LOCAL_CLASSES = YES - -# This flag is only useful for Objective-C code. If set to YES, local methods, -# which are defined in the implementation section but not in the interface are -# included in the documentation. If set to NO, only methods in the interface are -# included. -# The default value is: NO. - -EXTRACT_LOCAL_METHODS = NO - -# If this flag is set to YES, the members of anonymous namespaces will be -# extracted and appear in the documentation as a namespace called -# 'anonymous_namespace{file}', where file will be replaced with the base name of -# the file that contains the anonymous namespace. By default anonymous namespace -# are hidden. -# The default value is: NO. - -EXTRACT_ANON_NSPACES = NO - -# If this flag is set to YES, the name of an unnamed parameter in a declaration -# will be determined by the corresponding definition. By default unnamed -# parameters remain unnamed in the output. -# The default value is: YES. - -RESOLVE_UNNAMED_PARAMS = YES - -# If the HIDE_UNDOC_MEMBERS tag is set to YES, doxygen will hide all -# undocumented members inside documented classes or files. If set to NO these -# members will be included in the various overviews, but no documentation -# section is generated. This option has no effect if EXTRACT_ALL is enabled. -# The default value is: NO. - -HIDE_UNDOC_MEMBERS = NO - -# If the HIDE_UNDOC_CLASSES tag is set to YES, doxygen will hide all -# undocumented classes that are normally visible in the class hierarchy. If set -# to NO, these classes will be included in the various overviews. This option -# has no effect if EXTRACT_ALL is enabled. -# The default value is: NO. - -HIDE_UNDOC_CLASSES = NO - -# If the HIDE_FRIEND_COMPOUNDS tag is set to YES, doxygen will hide all friend -# declarations. If set to NO, these declarations will be included in the -# documentation. -# The default value is: NO. - -HIDE_FRIEND_COMPOUNDS = NO - -# If the HIDE_IN_BODY_DOCS tag is set to YES, doxygen will hide any -# documentation blocks found inside the body of a function. If set to NO, these -# blocks will be appended to the function's detailed documentation block. -# The default value is: NO. - -HIDE_IN_BODY_DOCS = NO - -# The INTERNAL_DOCS tag determines if documentation that is typed after a -# \internal command is included. If the tag is set to NO then the documentation -# will be excluded. Set it to YES to include the internal documentation. -# The default value is: NO. - -INTERNAL_DOCS = NO - -# With the correct setting of option CASE_SENSE_NAMES doxygen will better be -# able to match the capabilities of the underlying filesystem. In case the -# filesystem is case sensitive (i.e. it supports files in the same directory -# whose names only differ in casing), the option must be set to YES to properly -# deal with such files in case they appear in the input. For filesystems that -# are not case sensitive the option should be be set to NO to properly deal with -# output files written for symbols that only differ in casing, such as for two -# classes, one named CLASS and the other named Class, and to also support -# references to files without having to specify the exact matching casing. On -# Windows (including Cygwin) and MacOS, users should typically set this option -# to NO, whereas on Linux or other Unix flavors it should typically be set to -# YES. -# The default value is: system dependent. - -CASE_SENSE_NAMES = NO - -# If the HIDE_SCOPE_NAMES tag is set to NO then doxygen will show members with -# their full class and namespace scopes in the documentation. If set to YES, the -# scope will be hidden. -# The default value is: NO. - -HIDE_SCOPE_NAMES = NO - -# If the HIDE_COMPOUND_REFERENCE tag is set to NO (default) then doxygen will -# append additional text to a page's title, such as Class Reference. If set to -# YES the compound reference will be hidden. -# The default value is: NO. - -HIDE_COMPOUND_REFERENCE= NO - -# If the SHOW_INCLUDE_FILES tag is set to YES then doxygen will put a list of -# the files that are included by a file in the documentation of that file. -# The default value is: YES. - -SHOW_INCLUDE_FILES = YES - -# If the SHOW_GROUPED_MEMB_INC tag is set to YES then Doxygen will add for each -# grouped member an include statement to the documentation, telling the reader -# which file to include in order to use the member. -# The default value is: NO. - -SHOW_GROUPED_MEMB_INC = NO - -# If the FORCE_LOCAL_INCLUDES tag is set to YES then doxygen will list include -# files with double quotes in the documentation rather than with sharp brackets. -# The default value is: NO. - -FORCE_LOCAL_INCLUDES = NO - -# If the INLINE_INFO tag is set to YES then a tag [inline] is inserted in the -# documentation for inline members. -# The default value is: YES. - -INLINE_INFO = YES - -# If the SORT_MEMBER_DOCS tag is set to YES then doxygen will sort the -# (detailed) documentation of file and class members alphabetically by member -# name. If set to NO, the members will appear in declaration order. -# The default value is: YES. - -SORT_MEMBER_DOCS = YES - -# If the SORT_BRIEF_DOCS tag is set to YES then doxygen will sort the brief -# descriptions of file, namespace and class members alphabetically by member -# name. If set to NO, the members will appear in declaration order. Note that -# this will also influence the order of the classes in the class list. -# The default value is: NO. - -SORT_BRIEF_DOCS = NO - -# If the SORT_MEMBERS_CTORS_1ST tag is set to YES then doxygen will sort the -# (brief and detailed) documentation of class members so that constructors and -# destructors are listed first. If set to NO the constructors will appear in the -# respective orders defined by SORT_BRIEF_DOCS and SORT_MEMBER_DOCS. -# Note: If SORT_BRIEF_DOCS is set to NO this option is ignored for sorting brief -# member documentation. -# Note: If SORT_MEMBER_DOCS is set to NO this option is ignored for sorting -# detailed member documentation. -# The default value is: NO. - -SORT_MEMBERS_CTORS_1ST = NO - -# If the SORT_GROUP_NAMES tag is set to YES then doxygen will sort the hierarchy -# of group names into alphabetical order. If set to NO the group names will -# appear in their defined order. -# The default value is: NO. - -SORT_GROUP_NAMES = NO - -# If the SORT_BY_SCOPE_NAME tag is set to YES, the class list will be sorted by -# fully-qualified names, including namespaces. If set to NO, the class list will -# be sorted only by class name, not including the namespace part. -# Note: This option is not very useful if HIDE_SCOPE_NAMES is set to YES. -# Note: This option applies only to the class list, not to the alphabetical -# list. -# The default value is: NO. - -SORT_BY_SCOPE_NAME = NO - -# If the STRICT_PROTO_MATCHING option is enabled and doxygen fails to do proper -# type resolution of all parameters of a function it will reject a match between -# the prototype and the implementation of a member function even if there is -# only one candidate or it is obvious which candidate to choose by doing a -# simple string match. By disabling STRICT_PROTO_MATCHING doxygen will still -# accept a match between prototype and implementation in such cases. -# The default value is: NO. - -STRICT_PROTO_MATCHING = NO - -# The GENERATE_TODOLIST tag can be used to enable (YES) or disable (NO) the todo -# list. This list is created by putting \todo commands in the documentation. -# The default value is: YES. - -GENERATE_TODOLIST = YES - -# The GENERATE_TESTLIST tag can be used to enable (YES) or disable (NO) the test -# list. This list is created by putting \test commands in the documentation. -# The default value is: YES. - -GENERATE_TESTLIST = YES - -# The GENERATE_BUGLIST tag can be used to enable (YES) or disable (NO) the bug -# list. This list is created by putting \bug commands in the documentation. -# The default value is: YES. - -GENERATE_BUGLIST = YES - -# The GENERATE_DEPRECATEDLIST tag can be used to enable (YES) or disable (NO) -# the deprecated list. This list is created by putting \deprecated commands in -# the documentation. -# The default value is: YES. - -GENERATE_DEPRECATEDLIST= YES - -# The ENABLED_SECTIONS tag can be used to enable conditional documentation -# sections, marked by \if ... \endif and \cond -# ... \endcond blocks. - -ENABLED_SECTIONS = - -# The MAX_INITIALIZER_LINES tag determines the maximum number of lines that the -# initial value of a variable or macro / define can have for it to appear in the -# documentation. If the initializer consists of more lines than specified here -# it will be hidden. Use a value of 0 to hide initializers completely. The -# appearance of the value of individual variables and macros / defines can be -# controlled using \showinitializer or \hideinitializer command in the -# documentation regardless of this setting. -# Minimum value: 0, maximum value: 10000, default value: 30. - -MAX_INITIALIZER_LINES = 30 - -# Set the SHOW_USED_FILES tag to NO to disable the list of files generated at -# the bottom of the documentation of classes and structs. If set to YES, the -# list will mention the files that were used to generate the documentation. -# The default value is: YES. - -SHOW_USED_FILES = YES - -# Set the SHOW_FILES tag to NO to disable the generation of the Files page. This -# will remove the Files entry from the Quick Index and from the Folder Tree View -# (if specified). -# The default value is: YES. - -SHOW_FILES = YES - -# Set the SHOW_NAMESPACES tag to NO to disable the generation of the Namespaces -# page. This will remove the Namespaces entry from the Quick Index and from the -# Folder Tree View (if specified). -# The default value is: YES. - -SHOW_NAMESPACES = YES - -# The FILE_VERSION_FILTER tag can be used to specify a program or script that -# doxygen should invoke to get the current version for each file (typically from -# the version control system). Doxygen will invoke the program by executing (via -# popen()) the command command input-file, where command is the value of the -# FILE_VERSION_FILTER tag, and input-file is the name of an input file provided -# by doxygen. Whatever the program writes to standard output is used as the file -# version. For an example see the documentation. - -FILE_VERSION_FILTER = - -# The LAYOUT_FILE tag can be used to specify a layout file which will be parsed -# by doxygen. The layout file controls the global structure of the generated -# output files in an output format independent way. To create the layout file -# that represents doxygen's defaults, run doxygen with the -l option. You can -# optionally specify a file name after the option, if omitted DoxygenLayout.xml -# will be used as the name of the layout file. -# -# Note that if you run doxygen from a directory containing a file called -# DoxygenLayout.xml, doxygen will parse it automatically even if the LAYOUT_FILE -# tag is left empty. - -LAYOUT_FILE = - -# The CITE_BIB_FILES tag can be used to specify one or more bib files containing -# the reference definitions. This must be a list of .bib files. The .bib -# extension is automatically appended if omitted. This requires the bibtex tool -# to be installed. See also https://en.wikipedia.org/wiki/BibTeX for more info. -# For LaTeX the style of the bibliography can be controlled using -# LATEX_BIB_STYLE. To use this feature you need bibtex and perl available in the -# search path. See also \cite for info how to create references. - -CITE_BIB_FILES = - -#--------------------------------------------------------------------------- -# Configuration options related to warning and progress messages -#--------------------------------------------------------------------------- - -# The QUIET tag can be used to turn on/off the messages that are generated to -# standard output by doxygen. If QUIET is set to YES this implies that the -# messages are off. -# The default value is: NO. - -QUIET = NO - -# The WARNINGS tag can be used to turn on/off the warning messages that are -# generated to standard error (stderr) by doxygen. If WARNINGS is set to YES -# this implies that the warnings are on. -# -# Tip: Turn warnings on while writing the documentation. -# The default value is: YES. - -WARNINGS = YES - -# If the WARN_IF_UNDOCUMENTED tag is set to YES then doxygen will generate -# warnings for undocumented members. If EXTRACT_ALL is set to YES then this flag -# will automatically be disabled. -# The default value is: YES. - -WARN_IF_UNDOCUMENTED = YES - -# If the WARN_IF_DOC_ERROR tag is set to YES, doxygen will generate warnings for -# potential errors in the documentation, such as not documenting some parameters -# in a documented function, or documenting parameters that don't exist or using -# markup commands wrongly. -# The default value is: YES. - -WARN_IF_DOC_ERROR = YES - -# This WARN_NO_PARAMDOC option can be enabled to get warnings for functions that -# are documented, but have no documentation for their parameters or return -# value. If set to NO, doxygen will only warn about wrong or incomplete -# parameter documentation, but not about the absence of documentation. If -# EXTRACT_ALL is set to YES then this flag will automatically be disabled. -# The default value is: NO. - -WARN_NO_PARAMDOC = NO - -# If the WARN_AS_ERROR tag is set to YES then doxygen will immediately stop when -# a warning is encountered. If the WARN_AS_ERROR tag is set to FAIL_ON_WARNINGS -# then doxygen will continue running as if WARN_AS_ERROR tag is set to NO, but -# at the end of the doxygen process doxygen will return with a non-zero status. -# Possible values are: NO, YES and FAIL_ON_WARNINGS. -# The default value is: NO. - -WARN_AS_ERROR = NO - -# The WARN_FORMAT tag determines the format of the warning messages that doxygen -# can produce. The string should contain the $file, $line, and $text tags, which -# will be replaced by the file and line number from which the warning originated -# and the warning text. Optionally the format may contain $version, which will -# be replaced by the version of the file (if it could be obtained via -# FILE_VERSION_FILTER) -# The default value is: $file:$line: $text. - -WARN_FORMAT = "$file:$line: $text" - -# The WARN_LOGFILE tag can be used to specify a file to which warning and error -# messages should be written. If left blank the output is written to standard -# error (stderr). - -WARN_LOGFILE = output_err - -#--------------------------------------------------------------------------- -# Configuration options related to the input files -#--------------------------------------------------------------------------- - -# The INPUT tag is used to specify the files and/or directories that contain -# documented source files. You may enter file names like myfile.cpp or -# directories like /usr/src/myproject. Separate the files or directories with -# spaces. See also FILE_PATTERNS and EXTENSION_MAPPING -# Note: If this tag is empty the current directory is searched. - -INPUT = . \ - DOCS/groups-usr.dox - -# This tag can be used to specify the character encoding of the source files -# that doxygen parses. Internally doxygen uses the UTF-8 encoding. Doxygen uses -# libiconv (or the iconv built into libc) for the transcoding. See the libiconv -# documentation (see: -# https://www.gnu.org/software/libiconv/) for the list of possible encodings. -# The default value is: UTF-8. - -INPUT_ENCODING = UTF-8 - -# If the value of the INPUT tag contains directories, you can use the -# FILE_PATTERNS tag to specify one or more wildcard patterns (like *.cpp and -# *.h) to filter out the source-files in the directories. -# -# Note that for custom extensions or not directly supported extensions you also -# need to set EXTENSION_MAPPING for the extension otherwise the files are not -# read by doxygen. -# -# Note the list of default checked file patterns might differ from the list of -# default file extension mappings. -# -# If left blank the following patterns are tested:*.c, *.cc, *.cxx, *.cpp, -# *.c++, *.java, *.ii, *.ixx, *.ipp, *.i++, *.inl, *.idl, *.ddl, *.odl, *.h, -# *.hh, *.hxx, *.hpp, *.h++, *.cs, *.d, *.php, *.php4, *.php5, *.phtml, *.inc, -# *.m, *.markdown, *.md, *.mm, *.dox (to be provided as doxygen C comment), -# *.py, *.pyw, *.f90, *.f95, *.f03, *.f08, *.f18, *.f, *.for, *.vhd, *.vhdl, -# *.ucf, *.qsf and *.ice. - -FILE_PATTERNS = *.c \ - *.f \ - *.h - -# The RECURSIVE tag can be used to specify whether or not subdirectories should -# be searched for input files as well. -# The default value is: NO. - -RECURSIVE = YES - -# The EXCLUDE tag can be used to specify files and/or directories that should be -# excluded from the INPUT source files. This way you can easily exclude a -# subdirectory from a directory tree whose root is specified with the INPUT tag. -# -# Note that relative paths are relative to the directory from which doxygen is -# run. - -EXCLUDE = CMAKE \ - DOCS \ - BLAS/TESTING \ - CBLAS \ - LAPACKE/mangling \ - INSTALL \ - SRC/DEPRECATED \ - TESTING - -# The EXCLUDE_SYMLINKS tag can be used to select whether or not files or -# directories that are symbolic links (a Unix file system feature) are excluded -# from the input. -# The default value is: NO. - -EXCLUDE_SYMLINKS = NO - -# If the value of the INPUT tag contains directories, you can use the -# EXCLUDE_PATTERNS tag to specify one or more wildcard patterns to exclude -# certain files from those directories. -# -# Note that the wildcards are matched against the file with absolute path, so to -# exclude all test directories for example use the pattern */test/* - -EXCLUDE_PATTERNS = *.py \ - *.txt \ - *.in \ - *.inc \ - Makefile - -# The EXCLUDE_SYMBOLS tag can be used to specify one or more symbol names -# (namespaces, classes, functions, etc.) that should be excluded from the -# output. The symbol name can be a fully qualified name, a word, or if the -# wildcard * is used, a substring. Examples: ANamespace, AClass, -# AClass::ANamespace, ANamespace::*Test -# -# Note that the wildcards are matched against the file with absolute path, so to -# exclude all test directories use the pattern */test/* - -EXCLUDE_SYMBOLS = - -# The EXAMPLE_PATH tag can be used to specify one or more files or directories -# that contain example code fragments that are included (see the \include -# command). - -EXAMPLE_PATH = - -# If the value of the EXAMPLE_PATH tag contains directories, you can use the -# EXAMPLE_PATTERNS tag to specify one or more wildcard pattern (like *.cpp and -# *.h) to filter out the source-files in the directories. If left blank all -# files are included. - -EXAMPLE_PATTERNS = - -# If the EXAMPLE_RECURSIVE tag is set to YES then subdirectories will be -# searched for input files to be used with the \include or \dontinclude commands -# irrespective of the value of the RECURSIVE tag. -# The default value is: NO. - -EXAMPLE_RECURSIVE = NO - -# The IMAGE_PATH tag can be used to specify one or more files or directories -# that contain images that are to be included in the documentation (see the -# \image command). - -IMAGE_PATH = - -# The INPUT_FILTER tag can be used to specify a program that doxygen should -# invoke to filter for each input file. Doxygen will invoke the filter program -# by executing (via popen()) the command: -# -# -# -# where is the value of the INPUT_FILTER tag, and is the -# name of an input file. Doxygen will then use the output that the filter -# program writes to standard output. If FILTER_PATTERNS is specified, this tag -# will be ignored. -# -# Note that the filter must not add or remove lines; it is applied before the -# code is scanned, but not when the output code is generated. If lines are added -# or removed, the anchors will not be placed correctly. -# -# Note that for custom extensions or not directly supported extensions you also -# need to set EXTENSION_MAPPING for the extension otherwise the files are not -# properly processed by doxygen. - -INPUT_FILTER = - -# The FILTER_PATTERNS tag can be used to specify filters on a per file pattern -# basis. Doxygen will compare the file name with each pattern and apply the -# filter if there is a match. The filters are a list of the form: pattern=filter -# (like *.cpp=my_cpp_filter). See INPUT_FILTER for further information on how -# filters are used. If the FILTER_PATTERNS tag is empty or if none of the -# patterns match the file name, INPUT_FILTER is applied. -# -# Note that for custom extensions or not directly supported extensions you also -# need to set EXTENSION_MAPPING for the extension otherwise the files are not -# properly processed by doxygen. - -FILTER_PATTERNS = - -# If the FILTER_SOURCE_FILES tag is set to YES, the input filter (if set using -# INPUT_FILTER) will also be used to filter the input files that are used for -# producing the source files to browse (i.e. when SOURCE_BROWSER is set to YES). -# The default value is: NO. - -FILTER_SOURCE_FILES = NO - -# The FILTER_SOURCE_PATTERNS tag can be used to specify source filters per file -# pattern. A pattern will override the setting for FILTER_PATTERN (if any) and -# it is also possible to disable source filtering for a specific pattern using -# *.ext= (so without naming a filter). -# This tag requires that the tag FILTER_SOURCE_FILES is set to YES. - -FILTER_SOURCE_PATTERNS = - -# If the USE_MDFILE_AS_MAINPAGE tag refers to the name of a markdown file that -# is part of the input, its contents will be placed on the main page -# (index.html). This can be useful if you have a project on for instance GitHub -# and want to reuse the introduction page also for the doxygen output. - -USE_MDFILE_AS_MAINPAGE = - -#--------------------------------------------------------------------------- -# Configuration options related to source browsing -#--------------------------------------------------------------------------- - -# If the SOURCE_BROWSER tag is set to YES then a list of source files will be -# generated. Documented entities will be cross-referenced with these sources. -# -# Note: To get rid of all source code in the generated output, make sure that -# also VERBATIM_HEADERS is set to NO. -# The default value is: NO. - -SOURCE_BROWSER = YES - -# Setting the INLINE_SOURCES tag to YES will include the body of functions, -# classes and enums directly into the documentation. -# The default value is: NO. - -INLINE_SOURCES = NO - -# Setting the STRIP_CODE_COMMENTS tag to YES will instruct doxygen to hide any -# special comment blocks from generated source code fragments. Normal C, C++ and -# Fortran comments will always remain visible. -# The default value is: YES. - -STRIP_CODE_COMMENTS = YES - -# If the REFERENCED_BY_RELATION tag is set to YES then for each documented -# entity all documented functions referencing it will be listed. -# The default value is: NO. - -REFERENCED_BY_RELATION = NO - -# If the REFERENCES_RELATION tag is set to YES then for each documented function -# all documented entities called/used by that function will be listed. -# The default value is: NO. - -REFERENCES_RELATION = NO - -# If the REFERENCES_LINK_SOURCE tag is set to YES and SOURCE_BROWSER tag is set -# to YES then the hyperlinks from functions in REFERENCES_RELATION and -# REFERENCED_BY_RELATION lists will link to the source code. Otherwise they will -# link to the documentation. -# The default value is: YES. - -REFERENCES_LINK_SOURCE = YES - -# If SOURCE_TOOLTIPS is enabled (the default) then hovering a hyperlink in the -# source code will show a tooltip with additional information such as prototype, -# brief description and links to the definition and documentation. Since this -# will make the HTML file larger and loading of large files a bit slower, you -# can opt to disable this feature. -# The default value is: YES. -# This tag requires that the tag SOURCE_BROWSER is set to YES. - -SOURCE_TOOLTIPS = YES - -# If the USE_HTAGS tag is set to YES then the references to source code will -# point to the HTML generated by the htags(1) tool instead of doxygen built-in -# source browser. The htags tool is part of GNU's global source tagging system -# (see https://www.gnu.org/software/global/global.html). You will need version -# 4.8.6 or higher. -# -# To use it do the following: -# - Install the latest version of global -# - Enable SOURCE_BROWSER and USE_HTAGS in the configuration file -# - Make sure the INPUT points to the root of the source tree -# - Run doxygen as normal -# -# Doxygen will invoke htags (and that will in turn invoke gtags), so these -# tools must be available from the command line (i.e. in the search path). -# -# The result: instead of the source browser generated by doxygen, the links to -# source code will now point to the output of htags. -# The default value is: NO. -# This tag requires that the tag SOURCE_BROWSER is set to YES. - -USE_HTAGS = NO - -# If the VERBATIM_HEADERS tag is set the YES then doxygen will generate a -# verbatim copy of the header file for each class for which an include is -# specified. Set to NO to disable this. -# See also: Section \class. -# The default value is: YES. - -VERBATIM_HEADERS = YES - -#--------------------------------------------------------------------------- -# Configuration options related to the alphabetical class index -#--------------------------------------------------------------------------- - -# If the ALPHABETICAL_INDEX tag is set to YES, an alphabetical index of all -# compounds will be generated. Enable this if the project contains a lot of -# classes, structs, unions or interfaces. -# The default value is: YES. - -ALPHABETICAL_INDEX = YES - -# In case all classes in a project start with a common prefix, all classes will -# be put under the same header in the alphabetical index. The IGNORE_PREFIX tag -# can be used to specify a prefix (or a list of prefixes) that should be ignored -# while generating the index headers. -# This tag requires that the tag ALPHABETICAL_INDEX is set to YES. - -IGNORE_PREFIX = - -#--------------------------------------------------------------------------- -# Configuration options related to the HTML output -#--------------------------------------------------------------------------- - -# If the GENERATE_HTML tag is set to YES, doxygen will generate HTML output -# The default value is: YES. - -GENERATE_HTML = NO - -# The HTML_OUTPUT tag is used to specify where the HTML docs will be put. If a -# relative path is entered the value of OUTPUT_DIRECTORY will be put in front of -# it. -# The default directory is: html. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_OUTPUT = explore-html - -# The HTML_FILE_EXTENSION tag can be used to specify the file extension for each -# generated HTML page (for example: .htm, .php, .asp). -# The default value is: .html. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_FILE_EXTENSION = .html - -# The HTML_HEADER tag can be used to specify a user-defined HTML header file for -# each generated HTML page. If the tag is left blank doxygen will generate a -# standard header. -# -# To get valid HTML the header file that includes any scripts and style sheets -# that doxygen needs, which is dependent on the configuration options used (e.g. -# the setting GENERATE_TREEVIEW). It is highly recommended to start with a -# default header using -# doxygen -w html new_header.html new_footer.html new_stylesheet.css -# YourConfigFile -# and then modify the file new_header.html. See also section "Doxygen usage" -# for information on how to generate the default header that doxygen normally -# uses. -# Note: The header is subject to change so you typically have to regenerate the -# default header when upgrading to a newer version of doxygen. For a description -# of the possible markers and block names see the documentation. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_HEADER = - -# The HTML_FOOTER tag can be used to specify a user-defined HTML footer for each -# generated HTML page. If the tag is left blank doxygen will generate a standard -# footer. See HTML_HEADER for more information on how to generate a default -# footer and what special commands can be used inside the footer. See also -# section "Doxygen usage" for information on how to generate the default footer -# that doxygen normally uses. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_FOOTER = - -# The HTML_STYLESHEET tag can be used to specify a user-defined cascading style -# sheet that is used by each HTML page. It can be used to fine-tune the look of -# the HTML output. If left blank doxygen will generate a default style sheet. -# See also section "Doxygen usage" for information on how to generate the style -# sheet that doxygen normally uses. -# Note: It is recommended to use HTML_EXTRA_STYLESHEET instead of this tag, as -# it is more robust and this tag (HTML_STYLESHEET) will in the future become -# obsolete. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_STYLESHEET = - -# The HTML_EXTRA_STYLESHEET tag can be used to specify additional user-defined -# cascading style sheets that are included after the standard style sheets -# created by doxygen. Using this option one can overrule certain style aspects. -# This is preferred over using HTML_STYLESHEET since it does not replace the -# standard style sheet and is therefore more robust against future updates. -# Doxygen will copy the style sheet files to the output directory. -# Note: The order of the extra style sheet files is of importance (e.g. the last -# style sheet in the list overrules the setting of the previous ones in the -# list). For an example see the documentation. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_EXTRA_STYLESHEET = - -# The HTML_EXTRA_FILES tag can be used to specify one or more extra images or -# other source files which should be copied to the HTML output directory. Note -# that these files will be copied to the base HTML output directory. Use the -# $relpath^ marker in the HTML_HEADER and/or HTML_FOOTER files to load these -# files. In the HTML_STYLESHEET file, use the file name only. Also note that the -# files will be copied as-is; there are no commands or markers available. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_EXTRA_FILES = - -# The HTML_COLORSTYLE_HUE tag controls the color of the HTML output. Doxygen -# will adjust the colors in the style sheet and background images according to -# this color. Hue is specified as an angle on a colorwheel, see -# https://en.wikipedia.org/wiki/Hue for more information. For instance the value -# 0 represents red, 60 is yellow, 120 is green, 180 is cyan, 240 is blue, 300 -# purple, and 360 is red again. -# Minimum value: 0, maximum value: 359, default value: 220. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_COLORSTYLE_HUE = 220 - -# The HTML_COLORSTYLE_SAT tag controls the purity (or saturation) of the colors -# in the HTML output. For a value of 0 the output will use grayscales only. A -# value of 255 will produce the most vivid colors. -# Minimum value: 0, maximum value: 255, default value: 100. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_COLORSTYLE_SAT = 100 - -# The HTML_COLORSTYLE_GAMMA tag controls the gamma correction applied to the -# luminance component of the colors in the HTML output. Values below 100 -# gradually make the output lighter, whereas values above 100 make the output -# darker. The value divided by 100 is the actual gamma applied, so 80 represents -# a gamma of 0.8, The value 220 represents a gamma of 2.2, and 100 does not -# change the gamma. -# Minimum value: 40, maximum value: 240, default value: 80. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_COLORSTYLE_GAMMA = 80 - -# If the HTML_TIMESTAMP tag is set to YES then the footer of each generated HTML -# page will contain the date and time when the page was generated. Setting this -# to YES can help to show when doxygen was last run and thus if the -# documentation is up to date. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_TIMESTAMP = YES - -# If the HTML_DYNAMIC_MENUS tag is set to YES then the generated HTML -# documentation will contain a main index with vertical navigation menus that -# are dynamically created via JavaScript. If disabled, the navigation index will -# consists of multiple levels of tabs that are statically embedded in every HTML -# page. Disable this option to support browsers that do not have JavaScript, -# like the Qt help browser. -# The default value is: YES. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_DYNAMIC_MENUS = YES - -# If the HTML_DYNAMIC_SECTIONS tag is set to YES then the generated HTML -# documentation will contain sections that can be hidden and shown after the -# page has loaded. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_DYNAMIC_SECTIONS = NO - -# With HTML_INDEX_NUM_ENTRIES one can control the preferred number of entries -# shown in the various tree structured indices initially; the user can expand -# and collapse entries dynamically later on. Doxygen will expand the tree to -# such a level that at most the specified number of entries are visible (unless -# a fully collapsed tree already exceeds this amount). So setting the number of -# entries 1 will produce a full collapsed tree by default. 0 is a special value -# representing an infinite number of entries and will result in a full expanded -# tree by default. -# Minimum value: 0, maximum value: 9999, default value: 100. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_INDEX_NUM_ENTRIES = 100 - -# If the GENERATE_DOCSET tag is set to YES, additional index files will be -# generated that can be used as input for Apple's Xcode 3 integrated development -# environment (see: -# https://developer.apple.com/xcode/), introduced with OSX 10.5 (Leopard). To -# create a documentation set, doxygen will generate a Makefile in the HTML -# output directory. Running make will produce the docset in that directory and -# running make install will install the docset in -# ~/Library/Developer/Shared/Documentation/DocSets so that Xcode will find it at -# startup. See https://developer.apple.com/library/archive/featuredarticles/Doxy -# genXcode/_index.html for more information. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -GENERATE_DOCSET = NO - -# This tag determines the name of the docset feed. A documentation feed provides -# an umbrella under which multiple documentation sets from a single provider -# (such as a company or product suite) can be grouped. -# The default value is: Doxygen generated docs. -# This tag requires that the tag GENERATE_DOCSET is set to YES. - -DOCSET_FEEDNAME = "Doxygen generated docs" - -# This tag specifies a string that should uniquely identify the documentation -# set bundle. This should be a reverse domain-name style string, e.g. -# com.mycompany.MyDocSet. Doxygen will append .docset to the name. -# The default value is: org.doxygen.Project. -# This tag requires that the tag GENERATE_DOCSET is set to YES. - -DOCSET_BUNDLE_ID = org.doxygen.Project - -# The DOCSET_PUBLISHER_ID tag specifies a string that should uniquely identify -# the documentation publisher. This should be a reverse domain-name style -# string, e.g. com.mycompany.MyDocSet.documentation. -# The default value is: org.doxygen.Publisher. -# This tag requires that the tag GENERATE_DOCSET is set to YES. - -DOCSET_PUBLISHER_ID = org.doxygen.Publisher - -# The DOCSET_PUBLISHER_NAME tag identifies the documentation publisher. -# The default value is: Publisher. -# This tag requires that the tag GENERATE_DOCSET is set to YES. - -DOCSET_PUBLISHER_NAME = Publisher - -# If the GENERATE_HTMLHELP tag is set to YES then doxygen generates three -# additional HTML index files: index.hhp, index.hhc, and index.hhk. The -# index.hhp is a project file that can be read by Microsoft's HTML Help Workshop -# (see: -# https://www.microsoft.com/en-us/download/details.aspx?id=21138) on Windows. -# -# The HTML Help Workshop contains a compiler that can convert all HTML output -# generated by doxygen into a single compiled HTML file (.chm). Compiled HTML -# files are now used as the Windows 98 help format, and will replace the old -# Windows help format (.hlp) on all Windows platforms in the future. Compressed -# HTML files also contain an index, a table of contents, and you can search for -# words in the documentation. The HTML workshop also contains a viewer for -# compressed HTML files. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -GENERATE_HTMLHELP = NO - -# The CHM_FILE tag can be used to specify the file name of the resulting .chm -# file. You can add a path in front of the file if the result should not be -# written to the html output directory. -# This tag requires that the tag GENERATE_HTMLHELP is set to YES. - -CHM_FILE = - -# The HHC_LOCATION tag can be used to specify the location (absolute path -# including file name) of the HTML help compiler (hhc.exe). If non-empty, -# doxygen will try to run the HTML help compiler on the generated index.hhp. -# The file has to be specified with full path. -# This tag requires that the tag GENERATE_HTMLHELP is set to YES. - -HHC_LOCATION = - -# The GENERATE_CHI flag controls if a separate .chi index file is generated -# (YES) or that it should be included in the main .chm file (NO). -# The default value is: NO. -# This tag requires that the tag GENERATE_HTMLHELP is set to YES. - -GENERATE_CHI = NO - -# The CHM_INDEX_ENCODING is used to encode HtmlHelp index (hhk), content (hhc) -# and project file content. -# This tag requires that the tag GENERATE_HTMLHELP is set to YES. - -CHM_INDEX_ENCODING = - -# The BINARY_TOC flag controls whether a binary table of contents is generated -# (YES) or a normal table of contents (NO) in the .chm file. Furthermore it -# enables the Previous and Next buttons. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTMLHELP is set to YES. - -BINARY_TOC = NO - -# The TOC_EXPAND flag can be set to YES to add extra items for group members to -# the table of contents of the HTML help documentation and to the tree view. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTMLHELP is set to YES. - -TOC_EXPAND = NO - -# If the GENERATE_QHP tag is set to YES and both QHP_NAMESPACE and -# QHP_VIRTUAL_FOLDER are set, an additional index file will be generated that -# can be used as input for Qt's qhelpgenerator to generate a Qt Compressed Help -# (.qch) of the generated HTML documentation. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -GENERATE_QHP = NO - -# If the QHG_LOCATION tag is specified, the QCH_FILE tag can be used to specify -# the file name of the resulting .qch file. The path specified is relative to -# the HTML output folder. -# This tag requires that the tag GENERATE_QHP is set to YES. - -QCH_FILE = - -# The QHP_NAMESPACE tag specifies the namespace to use when generating Qt Help -# Project output. For more information please see Qt Help Project / Namespace -# (see: -# https://doc.qt.io/archives/qt-4.8/qthelpproject.html#namespace). -# The default value is: org.doxygen.Project. -# This tag requires that the tag GENERATE_QHP is set to YES. - -QHP_NAMESPACE = org.doxygen.Project - -# The QHP_VIRTUAL_FOLDER tag specifies the namespace to use when generating Qt -# Help Project output. For more information please see Qt Help Project / Virtual -# Folders (see: -# https://doc.qt.io/archives/qt-4.8/qthelpproject.html#virtual-folders). -# The default value is: doc. -# This tag requires that the tag GENERATE_QHP is set to YES. - -QHP_VIRTUAL_FOLDER = doc - -# If the QHP_CUST_FILTER_NAME tag is set, it specifies the name of a custom -# filter to add. For more information please see Qt Help Project / Custom -# Filters (see: -# https://doc.qt.io/archives/qt-4.8/qthelpproject.html#custom-filters). -# This tag requires that the tag GENERATE_QHP is set to YES. - -QHP_CUST_FILTER_NAME = - -# The QHP_CUST_FILTER_ATTRS tag specifies the list of the attributes of the -# custom filter to add. For more information please see Qt Help Project / Custom -# Filters (see: -# https://doc.qt.io/archives/qt-4.8/qthelpproject.html#custom-filters). -# This tag requires that the tag GENERATE_QHP is set to YES. - -QHP_CUST_FILTER_ATTRS = - -# The QHP_SECT_FILTER_ATTRS tag specifies the list of the attributes this -# project's filter section matches. Qt Help Project / Filter Attributes (see: -# https://doc.qt.io/archives/qt-4.8/qthelpproject.html#filter-attributes). -# This tag requires that the tag GENERATE_QHP is set to YES. - -QHP_SECT_FILTER_ATTRS = - -# The QHG_LOCATION tag can be used to specify the location (absolute path -# including file name) of Qt's qhelpgenerator. If non-empty doxygen will try to -# run qhelpgenerator on the generated .qhp file. -# This tag requires that the tag GENERATE_QHP is set to YES. - -QHG_LOCATION = - -# If the GENERATE_ECLIPSEHELP tag is set to YES, additional index files will be -# generated, together with the HTML files, they form an Eclipse help plugin. To -# install this plugin and make it available under the help contents menu in -# Eclipse, the contents of the directory containing the HTML and XML files needs -# to be copied into the plugins directory of eclipse. The name of the directory -# within the plugins directory should be the same as the ECLIPSE_DOC_ID value. -# After copying Eclipse needs to be restarted before the help appears. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -GENERATE_ECLIPSEHELP = NO - -# A unique identifier for the Eclipse help plugin. When installing the plugin -# the directory name containing the HTML and XML files should also have this -# name. Each documentation set should have its own identifier. -# The default value is: org.doxygen.Project. -# This tag requires that the tag GENERATE_ECLIPSEHELP is set to YES. - -ECLIPSE_DOC_ID = org.doxygen.Project - -# If you want full control over the layout of the generated HTML pages it might -# be necessary to disable the index and replace it with your own. The -# DISABLE_INDEX tag can be used to turn on/off the condensed index (tabs) at top -# of each HTML page. A value of NO enables the index and the value YES disables -# it. Since the tabs in the index contain the same information as the navigation -# tree, you can set this option to YES if you also set GENERATE_TREEVIEW to YES. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -DISABLE_INDEX = NO - -# The GENERATE_TREEVIEW tag is used to specify whether a tree-like index -# structure should be generated to display hierarchical information. If the tag -# value is set to YES, a side panel will be generated containing a tree-like -# index structure (just like the one that is generated for HTML Help). For this -# to work a browser that supports JavaScript, DHTML, CSS and frames is required -# (i.e. any modern browser). Windows users are probably better off using the -# HTML help feature. Via custom style sheets (see HTML_EXTRA_STYLESHEET) one can -# further fine-tune the look of the index. As an example, the default style -# sheet generated by doxygen has an example that shows how to put an image at -# the root of the tree instead of the PROJECT_NAME. Since the tree basically has -# the same information as the tab index, you could consider setting -# DISABLE_INDEX to YES when enabling this option. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -GENERATE_TREEVIEW = YES - -# The ENUM_VALUES_PER_LINE tag can be used to set the number of enum values that -# doxygen will group on one line in the generated HTML documentation. -# -# Note that a value of 0 will completely suppress the enum values from appearing -# in the overview section. -# Minimum value: 0, maximum value: 20, default value: 4. -# This tag requires that the tag GENERATE_HTML is set to YES. - -ENUM_VALUES_PER_LINE = 4 - -# If the treeview is enabled (see GENERATE_TREEVIEW) then this tag can be used -# to set the initial width (in pixels) of the frame in which the tree is shown. -# Minimum value: 0, maximum value: 1500, default value: 250. -# This tag requires that the tag GENERATE_HTML is set to YES. - -TREEVIEW_WIDTH = 250 - -# If the EXT_LINKS_IN_WINDOW option is set to YES, doxygen will open links to -# external symbols imported via tag files in a separate window. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -EXT_LINKS_IN_WINDOW = NO - -# If the HTML_FORMULA_FORMAT option is set to svg, doxygen will use the pdf2svg -# tool (see https://github.com/dawbarton/pdf2svg) or inkscape (see -# https://inkscape.org) to generate formulas as SVG images instead of PNGs for -# the HTML output. These images will generally look nicer at scaled resolutions. -# Possible values are: png (the default) and svg (looks nicer but requires the -# pdf2svg or inkscape tool). -# The default value is: png. -# This tag requires that the tag GENERATE_HTML is set to YES. - -HTML_FORMULA_FORMAT = png - -# Use this tag to change the font size of LaTeX formulas included as images in -# the HTML documentation. When you change the font size after a successful -# doxygen run you need to manually remove any form_*.png images from the HTML -# output directory to force them to be regenerated. -# Minimum value: 8, maximum value: 50, default value: 10. -# This tag requires that the tag GENERATE_HTML is set to YES. - -FORMULA_FONTSIZE = 10 - -# Use the FORMULA_TRANSPARENT tag to determine whether or not the images -# generated for formulas are transparent PNGs. Transparent PNGs are not -# supported properly for IE 6.0, but are supported on all modern browsers. -# -# Note that when changing this option you need to delete any form_*.png files in -# the HTML output directory before the changes have effect. -# The default value is: YES. -# This tag requires that the tag GENERATE_HTML is set to YES. - -FORMULA_TRANSPARENT = YES - -# The FORMULA_MACROFILE can contain LaTeX \newcommand and \renewcommand commands -# to create new LaTeX commands to be used in formulas as building blocks. See -# the section "Including formulas" for details. - -FORMULA_MACROFILE = - -# Enable the USE_MATHJAX option to render LaTeX formulas using MathJax (see -# https://www.mathjax.org) which uses client side JavaScript for the rendering -# instead of using pre-rendered bitmaps. Use this if you do not have LaTeX -# installed or if you want to formulas look prettier in the HTML output. When -# enabled you may also need to install MathJax separately and configure the path -# to it using the MATHJAX_RELPATH option. -# The default value is: NO. -# This tag requires that the tag GENERATE_HTML is set to YES. - -USE_MATHJAX = NO - -# When MathJax is enabled you can set the default output format to be used for -# the MathJax output. See the MathJax site (see: -# http://docs.mathjax.org/en/v2.7-latest/output.html) for more details. -# Possible values are: HTML-CSS (which is slower, but has the best -# compatibility), NativeMML (i.e. MathML) and SVG. -# The default value is: HTML-CSS. -# This tag requires that the tag USE_MATHJAX is set to YES. - -MATHJAX_FORMAT = HTML-CSS - -# When MathJax is enabled you need to specify the location relative to the HTML -# output directory using the MATHJAX_RELPATH option. The destination directory -# should contain the MathJax.js script. For instance, if the mathjax directory -# is located at the same level as the HTML output directory, then -# MATHJAX_RELPATH should be ../mathjax. The default value points to the MathJax -# Content Delivery Network so you can quickly see the result without installing -# MathJax. However, it is strongly recommended to install a local copy of -# MathJax from https://www.mathjax.org before deployment. -# The default value is: https://cdn.jsdelivr.net/npm/mathjax@2. -# This tag requires that the tag USE_MATHJAX is set to YES. - -MATHJAX_RELPATH = http://www.mathjax.org/mathjax - -# The MATHJAX_EXTENSIONS tag can be used to specify one or more MathJax -# extension names that should be enabled during MathJax rendering. For example -# MATHJAX_EXTENSIONS = TeX/AMSmath TeX/AMSsymbols -# This tag requires that the tag USE_MATHJAX is set to YES. - -MATHJAX_EXTENSIONS = - -# The MATHJAX_CODEFILE tag can be used to specify a file with javascript pieces -# of code that will be used on startup of the MathJax code. See the MathJax site -# (see: -# http://docs.mathjax.org/en/v2.7-latest/output.html) for more details. For an -# example see the documentation. -# This tag requires that the tag USE_MATHJAX is set to YES. - -MATHJAX_CODEFILE = - -# When the SEARCHENGINE tag is enabled doxygen will generate a search box for -# the HTML output. The underlying search engine uses javascript and DHTML and -# should work on any modern browser. Note that when using HTML help -# (GENERATE_HTMLHELP), Qt help (GENERATE_QHP), or docsets (GENERATE_DOCSET) -# there is already a search function so this one should typically be disabled. -# For large projects the javascript based search engine can be slow, then -# enabling SERVER_BASED_SEARCH may provide a better solution. It is possible to -# search using the keyboard; to jump to the search box use + S -# (what the is depends on the OS and browser, but it is typically -# , /