/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
H A D | dtprfb.c | 4 static doublereal c_b12 = 1.; variable 382 …dgemm_("T", "N", l, n, &i__1, &c_b12, &v[v_offset], ldv, &b[b_offset], ldb, &c_b12, &work[work_off… in dtprfb_() 398 dtrmm_("L", "U", trans, "N", k, n, &c_b12, &t[t_offset], ldt, &work[ work_offset], ldwork); in dtprfb_() 463 …dgemm_("N", "N", m, l, &i__1, &c_b12, &b[b_offset], ldb, &v[v_offset], ldv, &c_b12, &work[work_off… in dtprfb_() 479 dtrmm_("R", "U", trans, "N", m, k, &c_b12, &t[t_offset], ldt, &work[ work_offset], ldwork); in dtprfb_() 545 …dgemm_("T", "N", l, n, &i__1, &c_b12, &v[mp + kp * v_dim1], ldv, &b[ mp + b_dim1], ldb, &c_b12, &w… in dtprfb_() 626 …dgemm_("N", "N", m, l, &i__1, &c_b12, &b[np * b_dim1 + 1], ldb, &v[np + kp * v_dim1], ldv, &c_b12,… in dtprfb_() 707 …dgemm_("N", "N", l, n, &i__1, &c_b12, &v[v_offset], ldv, &b[b_offset], ldb, &c_b12, &work[work_off… in dtprfb_() 787 …dgemm_("N", "T", m, l, &i__1, &c_b12, &b[b_offset], ldb, &v[v_offset], ldv, &c_b12, &work[work_off… in dtprfb_() 868 …dgemm_("N", "N", l, n, &i__1, &c_b12, &v[kp + mp * v_dim1], ldv, &b[ mp + b_dim1], ldb, &c_b12, &w… in dtprfb_() [all …]
|
H A D | stprfb.c | 4 static real c_b12 = 1.f; variable 382 …sgemm_("T", "N", l, n, &i__1, &c_b12, &v[v_offset], ldv, &b[b_offset], ldb, &c_b12, &work[work_off… in stprfb_() 398 strmm_("L", "U", trans, "N", k, n, &c_b12, &t[t_offset], ldt, &work[ work_offset], ldwork); in stprfb_() 463 …sgemm_("N", "N", m, l, &i__1, &c_b12, &b[b_offset], ldb, &v[v_offset], ldv, &c_b12, &work[work_off… in stprfb_() 479 strmm_("R", "U", trans, "N", m, k, &c_b12, &t[t_offset], ldt, &work[ work_offset], ldwork); in stprfb_() 545 …sgemm_("T", "N", l, n, &i__1, &c_b12, &v[mp + kp * v_dim1], ldv, &b[ mp + b_dim1], ldb, &c_b12, &w… in stprfb_() 626 …sgemm_("N", "N", m, l, &i__1, &c_b12, &b[np * b_dim1 + 1], ldb, &v[np + kp * v_dim1], ldv, &c_b12,… in stprfb_() 707 …sgemm_("N", "N", l, n, &i__1, &c_b12, &v[v_offset], ldv, &b[b_offset], ldb, &c_b12, &work[work_off… in stprfb_() 787 …sgemm_("N", "T", m, l, &i__1, &c_b12, &b[b_offset], ldb, &v[v_offset], ldv, &c_b12, &work[work_off… in stprfb_() 868 …sgemm_("N", "N", l, n, &i__1, &c_b12, &v[kp + mp * v_dim1], ldv, &b[ mp + b_dim1], ldb, &c_b12, &w… in stprfb_() [all …]
|
H A D | zpftri.c | 9 static doublereal c_b12 = 1.; variable 317 zherk_("L", "C", &n1, &n2, &c_b12, &a[n1], n, &c_b12, a, n); in zpftri_() 327 zherk_("L", "N", &n1, &n2, &c_b12, a, n, &c_b12, &a[n2], n); in zpftri_() 340 zherk_("U", "N", &n1, &n2, &c_b12, &a[n1 * n1], &n1, &c_b12, a, &n1); in zpftri_() 349 zherk_("U", "C", &n1, &n2, &c_b12, a, &n2, &c_b12, &a[n2 * n2] , &n2); in zpftri_() 370 zherk_("L", "C", &k, &k, &c_b12, &a[k + 1], &i__1, &c_b12, &a[ 1], &i__2); in zpftri_() 386 zherk_("L", "N", &k, &k, &c_b12, a, &i__1, &c_b12, &a[k + 1], &i__2); in zpftri_() 404 zherk_("U", "N", &k, &k, &c_b12, &a[k * (k + 1)], &k, &c_b12, &a[k], &k); in zpftri_() 415 zherk_("U", "C", &k, &k, &c_b12, a, &k, &c_b12, &a[k * (k + 1) ], &k); in zpftri_()
|
H A D | cpftri.c | 9 static real c_b12 = 1.f; variable 319 cherk_("L", "C", &n1, &n2, &c_b12, &a[n1], n, &c_b12, a, n); in cpftri_() 329 cherk_("L", "N", &n1, &n2, &c_b12, a, n, &c_b12, &a[n2], n); in cpftri_() 342 cherk_("U", "N", &n1, &n2, &c_b12, &a[n1 * n1], &n1, &c_b12, a, &n1); in cpftri_() 351 cherk_("U", "C", &n1, &n2, &c_b12, a, &n2, &c_b12, &a[n2 * n2] , &n2); in cpftri_() 372 cherk_("L", "C", &k, &k, &c_b12, &a[k + 1], &i__1, &c_b12, &a[ 1], &i__2); in cpftri_() 388 cherk_("L", "N", &k, &k, &c_b12, a, &i__1, &c_b12, &a[k + 1], &i__2); in cpftri_() 406 cherk_("U", "N", &k, &k, &c_b12, &a[k * (k + 1)], &k, &c_b12, &a[k], &k); in cpftri_() 417 cherk_("U", "C", &k, &k, &c_b12, a, &k, &c_b12, &a[k * (k + 1) ], &k); in cpftri_()
|
H A D | spftrf.c | 4 static real c_b12 = 1.f; variable 294 strsm_("R", "L", "T", "N", &n2, &n1, &c_b12, a, n, &a[n1], n); in spftrf_() 295 ssyrk_("U", "N", &n2, &n1, &c_b15, &a[n1], n, &c_b12, &a[*n], n); in spftrf_() 312 strsm_("L", "L", "N", "N", &n1, &n2, &c_b12, &a[n2], n, a, n); in spftrf_() 313 ssyrk_("U", "T", &n2, &n1, &c_b15, a, n, &c_b12, &a[n1], n); in spftrf_() 335 strsm_("L", "U", "T", "N", &n1, &n2, &c_b12, a, &n1, &a[n1 * n1], &n1); in spftrf_() 355 ssyrk_("L", "N", &n2, &n1, &c_b15, a, &n2, &c_b12, &a[n1 * n2] , &n2); in spftrf_() 386 ssyrk_("U", "N", &k, &k, &c_b15, &a[k + 1], &i__1, &c_b12, a, &i__2); in spftrf_() 410 ssyrk_("U", "T", &k, &k, &c_b15, a, &i__1, &c_b12, &a[k], & i__2); in spftrf_() 434 ssyrk_("L", "T", &k, &k, &c_b15, &a[k * (k + 1)], &k, &c_b12, a, &k); in spftrf_() [all …]
|
H A D | dpftrf.c | 4 static doublereal c_b12 = 1.; variable 294 dtrsm_("R", "L", "T", "N", &n2, &n1, &c_b12, a, n, &a[n1], n); in dpftrf_() 295 dsyrk_("U", "N", &n2, &n1, &c_b15, &a[n1], n, &c_b12, &a[*n], n); in dpftrf_() 312 dtrsm_("L", "L", "N", "N", &n1, &n2, &c_b12, &a[n2], n, a, n); in dpftrf_() 313 dsyrk_("U", "T", &n2, &n1, &c_b15, a, n, &c_b12, &a[n1], n); in dpftrf_() 335 dtrsm_("L", "U", "T", "N", &n1, &n2, &c_b12, a, &n1, &a[n1 * n1], &n1); in dpftrf_() 355 dsyrk_("L", "N", &n2, &n1, &c_b15, a, &n2, &c_b12, &a[n1 * n2] , &n2); in dpftrf_() 386 dsyrk_("U", "N", &k, &k, &c_b15, &a[k + 1], &i__1, &c_b12, a, &i__2); in dpftrf_() 410 dsyrk_("U", "T", &k, &k, &c_b15, a, &i__1, &c_b12, &a[k], & i__2); in dpftrf_() 434 dsyrk_("L", "T", &k, &k, &c_b15, &a[k * (k + 1)], &k, &c_b12, a, &k); in dpftrf_() [all …]
|
H A D | dggsvp.c | 4 static doublereal c_b12 = 0.; variable 390 dlaset_("Full", p, p, &c_b12, &c_b12, &v[v_offset], ldv); in dggsvp_() 418 dlaset_("Full", &i__1, n, &c_b12, &c_b12, &b[*l + 1 + b_dim1], ldb); in dggsvp_() 423 dlaset_("Full", n, n, &c_b12, &c_b22, &q[q_offset], ldq); in dggsvp_() 439 dlaset_("Full", l, &i__1, &c_b12, &c_b12, &b[b_offset], ldb); in dggsvp_() 496 dlaset_("Full", m, m, &c_b12, &c_b12, &u[u_offset], ldu); in dggsvp_() 536 dlaset_("Full", &i__1, &i__2, &c_b12, &c_b12, &a[*k + 1 + a_dim1], lda); in dggsvp_() 551 dlaset_("Full", k, &i__1, &c_b12, &c_b12, &a[a_offset], lda); in dggsvp_()
|
H A D | sggsvp.c | 4 static real c_b12 = 0.f; variable 390 slaset_("Full", p, p, &c_b12, &c_b12, &v[v_offset], ldv); in sggsvp_() 418 slaset_("Full", &i__1, n, &c_b12, &c_b12, &b[*l + 1 + b_dim1], ldb); in sggsvp_() 423 slaset_("Full", n, n, &c_b12, &c_b22, &q[q_offset], ldq); in sggsvp_() 439 slaset_("Full", l, &i__1, &c_b12, &c_b12, &b[b_offset], ldb); in sggsvp_() 496 slaset_("Full", m, m, &c_b12, &c_b12, &u[u_offset], ldu); in sggsvp_() 536 slaset_("Full", &i__1, &i__2, &c_b12, &c_b12, &a[*k + 1 + a_dim1], lda); in sggsvp_() 551 slaset_("Full", k, &i__1, &c_b12, &c_b12, &a[a_offset], lda); in sggsvp_()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/kihon/ |
H A D | kihona.c | 24 static real c_b12 = 1.f; variable 88 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 89 sgsvpt_(&c_b9, &c_b12, &c_b15, &c_b12); in MAIN__() 99 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 100 sgsvpt_(&c_b9, &c_b12, &vymin, &vymax); in MAIN__() 112 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 113 sgsvpt_(&c_b9, &c_b12, &vymin, &vymax); in MAIN__() 124 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 125 sgsvpt_(&c_b9, &c_b12, &c_b47, &c_b48); in MAIN__() 133 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() [all …]
|
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/map3d/ |
H A D | map3d4.c | 23 static real c_b12 = 0.f; variable 69 sgsvpt_(&c_b12, &c_b13, &c_b12, &c_b13); in MAIN__() 79 sgsvpt_(&c_b12, &c_b13, &c_b12, &c_b13); in MAIN__() 82 scspln_(&c__1, &c__3, &c_b12); in MAIN__() 87 sgsvpt_(&c_b12, &c_b13, &c_b12, &c_b13); in MAIN__() 133 sgtxu_(&c_b12, &c_b12, "DENNOU", (ftnlen)6); in aplot_() 137 sgtxu_(&c_b12, &c_b66, cttl, (ftnlen)2); in aplot_()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/grph1/sgpack/ |
H A D | sgksx3.c | 23 static real c_b12 = .1f; variable 83 slmgn_(&c_b12, &c_b12, &c_b12, &c_b12); in MAIN__() 89 sgsvpt_(&c_b12, &c_b21, &c_b12, &c_b21); in MAIN__() 103 sgsvpt_(&c_b12, &c_b21, &c_b12, &c_b21); in MAIN__()
|
H A D | sgpk08.c | 22 static real c_b12 = 1.f; variable 89 sgswnd_(&c_b11, &c_b12, &c_b11, &c_b12); in MAIN__() 96 sgsvpt_(&c_b15, &c_b16, &c_b16, &c_b12); in MAIN__() 101 sgsvpt_(&c_b16, &c_b12, &c_b15, &c_b16); in MAIN__() 105 sgsvpt_(&c_b16, &c_b12, &c_b16, &c_b12); in MAIN__()
|
/dports/astro/pykep/pykep-2.6/src/third_party/cspice/ |
H A D | zzekeri1.c | 12 static doublereal c_b12 = 0.; variable 600 c_b12, ikey, null, (ftnlen)1)) { in zzekeri1_() 610 " ", &c_b12, ikey, null, (ftnlen)1) && *recptr < begptr) { in zzekeri1_() 627 c_b12, ikey, null, (ftnlen)1)) { in zzekeri1_() 636 " ", &c_b12, ikey, null, (ftnlen)1) && endptr <= *recptr) { in zzekeri1_() 666 " ", &c_b12, ikey, null, (ftnlen)1)) { in zzekeri1_() 673 c__3, " ", &c_b12, ikey, null, (ftnlen)1)) { in zzekeri1_()
|
/dports/astro/py-pykep/pykep-2.6/src/third_party/cspice/ |
H A D | zzekeri1.c | 12 static doublereal c_b12 = 0.; variable 600 c_b12, ikey, null, (ftnlen)1)) { in zzekeri1_() 610 " ", &c_b12, ikey, null, (ftnlen)1) && *recptr < begptr) { in zzekeri1_() 627 c_b12, ikey, null, (ftnlen)1)) { in zzekeri1_() 636 " ", &c_b12, ikey, null, (ftnlen)1) && endptr <= *recptr) { in zzekeri1_() 666 " ", &c_b12, ikey, null, (ftnlen)1)) { in zzekeri1_() 673 c__3, " ", &c_b12, ikey, null, (ftnlen)1)) { in zzekeri1_()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/grph1/scpack/ |
H A D | scpkt6.c | 22 static real c_b12 = 0.f; variable 81 scsorg_(&c_b11, &c_b12, &c_b12, &c_b12); in MAIN__() 85 scsobj_(&c_b12, &c_b12, &c_b12); in MAIN__()
|
H A D | scpkt2.c | 23 static real c_b12 = 1.f; variable 68 sgswnd_(&c_b11, &c_b12, &c_b11, &c_b12); in MAIN__() 69 sgsvpt_(&c_b11, &c_b12, &c_b11, &c_b12); in MAIN__()
|
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/single/ |
H A D | sggsvp.c | 20 static real c_b12 = (float)0.; variable 352 slaset_("Full", p, p, &c_b12, &c_b12, &v[v_offset], ldv, (ftnlen)4); in sggsvp_() 384 slaset_("Full", &i__1, n, &c_b12, &c_b12, &b[*l + 1 + b_dim1], ldb, ( in sggsvp_() 394 slaset_("Full", n, n, &c_b12, &c_b22, &q[q_offset], ldq, (ftnlen)4); in sggsvp_() 429 slaset_("Full", l, &i__1, &c_b12, &c_b12, &b[b_offset], ldb, (ftnlen) in sggsvp_() 502 slaset_("Full", m, m, &c_b12, &c_b12, &u[u_offset], ldu, (ftnlen)4); in sggsvp_() 550 slaset_("Full", &i__1, &i__2, &c_b12, &c_b12, &a[*k + 1 + a_dim1], in sggsvp_() 580 slaset_("Full", k, &i__1, &c_b12, &c_b12, &a[a_offset], lda, (ftnlen) in sggsvp_()
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
H A D | sggsvp.c | 10 static real c_b12 = 0.f; variable 283 slaset_("Full", p, p, &c_b12, &c_b12, &v[v_offset], ldv, (ftnlen)4); in sggsvp_() 306 slaset_("Full", &i__1, n, &c_b12, &c_b12, &b[*l + 1 + b_dim1], ldb, ( in sggsvp_() 314 slaset_("Full", n, n, &c_b12, &c_b22, &q[q_offset], ldq, (ftnlen)4); in sggsvp_() 340 slaset_("Full", l, &i__1, &c_b12, &c_b12, &b[b_offset], ldb, (ftnlen) in sggsvp_() 396 slaset_("Full", m, m, &c_b12, &c_b12, &u[u_offset], ldu, (ftnlen)4); in sggsvp_() 432 slaset_("Full", &i__1, &i__2, &c_b12, &c_b12, &a[*k + 1 + a_dim1], in sggsvp_() 456 slaset_("Full", k, &i__1, &c_b12, &c_b12, &a[a_offset], lda, (ftnlen) in sggsvp_()
|
H A D | dggsvp.c | 10 static doublereal c_b12 = 0.; variable 287 dlaset_("Full", p, p, &c_b12, &c_b12, &v[v_offset], ldv, (ftnlen)4); in dggsvp_() 310 dlaset_("Full", &i__1, n, &c_b12, &c_b12, &b[*l + 1 + b_dim1], ldb, ( in dggsvp_() 318 dlaset_("Full", n, n, &c_b12, &c_b22, &q[q_offset], ldq, (ftnlen)4); in dggsvp_() 344 dlaset_("Full", l, &i__1, &c_b12, &c_b12, &b[b_offset], ldb, (ftnlen) in dggsvp_() 400 dlaset_("Full", m, m, &c_b12, &c_b12, &u[u_offset], ldu, (ftnlen)4); in dggsvp_() 436 dlaset_("Full", &i__1, &i__2, &c_b12, &c_b12, &a[*k + 1 + a_dim1], in dggsvp_() 460 dlaset_("Full", k, &i__1, &c_b12, &c_b12, &a[a_offset], lda, (ftnlen) in dggsvp_()
|
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/single/ |
H A D | sggsvp.c | 20 static real c_b12 = (float)0.; variable 352 slaset_("Full", p, p, &c_b12, &c_b12, &v[v_offset], ldv, (ftnlen)4); in sggsvp_() 384 slaset_("Full", &i__1, n, &c_b12, &c_b12, &b[*l + 1 + b_dim1], ldb, ( in sggsvp_() 394 slaset_("Full", n, n, &c_b12, &c_b22, &q[q_offset], ldq, (ftnlen)4); in sggsvp_() 429 slaset_("Full", l, &i__1, &c_b12, &c_b12, &b[b_offset], ldb, (ftnlen) in sggsvp_() 502 slaset_("Full", m, m, &c_b12, &c_b12, &u[u_offset], ldu, (ftnlen)4); in sggsvp_() 550 slaset_("Full", &i__1, &i__2, &c_b12, &c_b12, &a[*k + 1 + a_dim1], in sggsvp_() 580 slaset_("Full", k, &i__1, &c_b12, &c_b12, &a[a_offset], lda, (ftnlen) in sggsvp_()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/layout/ |
H A D | lay2.c | 21 static real c_b12 = 0.f; variable 60 slsttl_("FIGURE TITLE", "T", &c_b12, &c_b12, &c_b14, &c__1, (ftnlen)12, ( in MAIN__() 64 slsttl_("#DATE #TIME", "B", &c_b12, &c_b12, &c_b20, &c__3, (ftnlen)11, ( in MAIN__()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/miss/ |
H A D | miss1.c | 25 static real c_b12 = .9f; variable 84 grsvpt_(&c_b11, &c_b12, &c_b13, &c_b12); in MAIN__() 89 grsvpt_(&c_b11, &c_b12, &c_b23, &c_b13); in MAIN__() 97 grsvpt_(&c_b11, &c_b12, &c_b36, &c_b23); in MAIN__() 102 grsvpt_(&c_b11, &c_b12, &c_b11, &c_b36); in MAIN__()
|
/dports/science/ergo/ergo-3.8/source/matrix/template_lapack/lapack/ |
H A D | template_lapack_getrs.h | 106 Treal c_b12 = 1.; in template_lapack_getrs() local 160 template_blas_trsm("Left", "Lower", "No transpose", "Unit", n, nrhs, &c_b12, &a[ in template_lapack_getrs() 165 template_blas_trsm("Left", "Upper", "No transpose", "Non-unit", n, nrhs, &c_b12, & in template_lapack_getrs() 173 template_blas_trsm("Left", "Upper", "Transpose", "Non-unit", n, nrhs, &c_b12, &a[ in template_lapack_getrs() 178 template_blas_trsm("Left", "Lower", "Transpose", "Unit", n, nrhs, &c_b12, &a[ in template_lapack_getrs()
|
/dports/math/igraph/igraph-0.9.5/vendor/lapack/ |
H A D | dgetrs.c | 18 static doublereal c_b12 = 1.; variable 215 igraphdtrsm_("Left", "Lower", "No transpose", "Unit", n, nrhs, &c_b12, &a[ in igraphdgetrs_() 220 igraphdtrsm_("Left", "Upper", "No transpose", "Non-unit", n, nrhs, &c_b12, & in igraphdgetrs_() 228 igraphdtrsm_("Left", "Upper", "Transpose", "Non-unit", n, nrhs, &c_b12, &a[ in igraphdgetrs_() 233 igraphdtrsm_("Left", "Lower", "Transpose", "Unit", n, nrhs, &c_b12, &a[ in igraphdgetrs_()
|
/dports/science/hypre/hypre-2.23.0/src/lapack/ |
H A D | dgetrs.c | 75 static doublereal c_b12 = 1.; in dgetrs_() local 135 dtrsm_("Left", "Lower", "No transpose", "Unit", n, nrhs, &c_b12, &a[ in dgetrs_() 140 dtrsm_("Left", "Upper", "No transpose", "Non-unit", n, nrhs, &c_b12, & in dgetrs_() 148 dtrsm_("Left", "Upper", "Transpose", "Non-unit", n, nrhs, &c_b12, &a[ in dgetrs_() 153 dtrsm_("Left", "Lower", "Transpose", "Unit", n, nrhs, &c_b12, &a[ in dgetrs_()
|