Home
last modified time | relevance | path

Searched refs:indin1 (Results 1 – 4 of 4) sorted by relevance

/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/
H A Dclarrv.c39 static integer iindc1, iindc2, indin1, indin2; in clarrv_() local
218 indin1 = *n * 5 + 1; in clarrv_()
370 work[indin1 + k - 1] = z__[i__5].r; in clarrv_()
377 newlst, &work[1], &work[indin1], &work[ in clarrv_()
H A Dzlarrv.c41 static integer indin1, indin2; in zlarrv_() local
227 indin1 = *n * 5 + 1; in zlarrv_()
379 work[indin1 + k - 1] = z__[i__5].r; in zlarrv_()
386 newlst, &work[1], &work[indin1], &work[ in zlarrv_()
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/
H A Dclarrv.c312 integer iindc1, iindc2, indin1, indin2; in clarrv_() local
389 indin1 = *n * 3 + 1; in clarrv_()
812 …&wgap[wbegin], &werr[wbegin], &spdiam, &lgap, &rgap, pivmin, &tau, &work[indin1], &work[ indin2], … in clarrv_()
822 i__6 = indin1 + k - 1; in clarrv_()
836 i__5 = indin1 + in - 1; in clarrv_()
H A Dzlarrv.c312 integer iindc1, iindc2, indin1, indin2; in zlarrv_() local
390 indin1 = *n * 3 + 1; in zlarrv_()
813 …&wgap[wbegin], &werr[wbegin], &spdiam, &lgap, &rgap, pivmin, &tau, &work[indin1], &work[ indin2], … in zlarrv_()
823 i__6 = indin1 + k - 1; in zlarrv_()
837 i__5 = indin1 + in - 1; in zlarrv_()