1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144
|
/* Copyright INRIA/ENPC */
#include "../machine.h"
/** only used to force the linker to load all calelm functions **/
Lapack_contents(x)
int x;
{
if ( x== 1)
{
C2F(dgebak)();
C2F(dgebal)();
C2F(dgelq2)();
C2F(dgelqf)();
C2F(dgels)();
C2F(dgeqpf)();
C2F(dgeqr2)();
C2F(dgeqrf)();
C2F(dgerfs)();
C2F(dgerq2)();
C2F(dgerqf)();
C2F(dgetrs)();
C2F(dggbak)();
C2F(dggbal)();
C2F(dlabad)();
C2F(dlacon)();
C2F(dlacpy)();
C2F(dlae2)();
C2F(dlaev2)();
C2F(dlaic1)();
C2F(dlamch)();
C2F(dlange)();
C2F(dlansp)();
C2F(dlanst)();
C2F(dlantr)();
C2F(dlapmt)();
C2F(dlapy2)();
C2F(dlarf)();
C2F(dlarfb)();
C2F(dlarfg)();
C2F(dlarft)();
C2F(dlartg)();
C2F(dlascl)();
C2F(dlaset)();
C2F(dlasr)();
C2F(dlasrt)();
C2F(dlassq)();
C2F(dlaswp)();
C2F(dlatrs)();
C2F(dlatzm)();
C2F(dopgtr)();
C2F(dorg2l)();
C2F(dorg2r)();
C2F(dorgqr)();
C2F(dorgrq)();
C2F(dorm2r)();
C2F(dormr2)();
C2F(dorml2)();
C2F(dormlq)();
C2F(dormqr)();
C2F(dormrq)();
C2F(dpptrf)();
C2F(drscl)();
C2F(dspev)();
C2F(dspgst)();
C2F(dspgv)();
C2F(dsptrd)();
C2F(dsptrf)();
C2F(dsteqr)();
C2F(dsterf)();
C2F(dtrcon)();
C2F(dtzrqf)();
C2F(ilaenv)();
C2F(lsame)();
C2F(slamch)();
C2F(dlansy)();
C2F(dgees)();
C2F(dgehrd)();
C2F(dorghr)();
C2F(dhseqr)();
C2F(dtrsen)();
C2F(dlahrd)();
C2F(dgehd2)();
C2F(dlahqr)();
C2F(dlanhs)();
C2F(dlarfx)();
C2F(dtrexc)();
C2F(dtrsyl)();
C2F(dlanv2)();
C2F(dlaexc)();
C2F(dlaln2)();
C2F(dlasy2)();
C2F(dladiv)();
C2F(dgeesx)();
C2F(dgesvx)();
C2F(dgeequ)();
C2F(dlaqge)();
C2F(dgetrf)();
C2F(dgecon)();
C2F(dgetf2)();
C2F(dsytrf)();
C2F(dlasyf)();
C2F(dsytf2)();
C2F(dsytri)();
C2F(dlasv2)();
C2F(dtrti2)();
C2F(dlapy3)();
C2F(dgelsx)();
C2F(dgetri)();
C2F(dtrtri)();
C2F(dgebrd)();
C2F(dorgbr)();
C2F(dbdsqr)();
C2F(dlabrd)();
C2F(dgebd2)();
C2F(dorglq)();
C2F(dlasq1)();
C2F(dlas2)();
C2F(dorgl2)();
C2F(dlasq2)();
C2F(dlasq3)();
C2F(dlasq4)();
C2F(dormhr)();
C2F(dpotrf)();
C2F(dpocon)();
C2F(dsycon)();
C2F(dsytrs)();
C2F(dsyev)();
C2F(dsytrd)();
C2F(dorgtr)();
C2F(dorgql)();
C2F(dpotrs)();
C2F(dgeqlf)();
C2F(dormql)();
C2F(dgghrd)();
C2F(dhgeqz)();
C2F(dtgevc)();
C2F(dgges)();
C2F(dgegs)();
C2F(dgesvd)();
C2F(dormhr)();
}
}
|