Home
last modified time | relevance | path

Searched refs:c_b18 (Results 1 – 25 of 123) sorted by relevance

12345

/dports/science/cdcl/dcl-5.4.8-C/demo/grph1/sgpack/
H A Dsgpk02.c23 static real c_b18 = .8f; variable
76 sglnzu_(&c_b17, &c_b18, &c_b18, &c_b17, &c__2); in MAIN__()
78 sglnu_(&c_b17, &c_b17, &c_b18, &c_b18); in MAIN__()
89 sglnzu_(&c_b17, &c_b18, &c_b18, &c_b17, &c__2); in MAIN__()
90 sglnu_(&c_b17, &c_b17, &c_b18, &c_b18); in MAIN__()
99 sglnzu_(&c_b17, &c_b18, &c_b18, &c_b17, &c__2); in MAIN__()
100 sglnu_(&c_b17, &c_b17, &c_b18, &c_b18); in MAIN__()
109 sglnzu_(&c_b17, &c_b18, &c_b18, &c_b17, &c__2); in MAIN__()
110 sglnu_(&c_b17, &c_b17, &c_b18, &c_b18); in MAIN__()
121 sglnzu_(&c_b17, &c_b18, &c_b18, &c_b17, &c__2); in MAIN__()
[all …]
H A Dsgfont.c22 static real c_b18 = 0.f; variable
94 sgswnd_(&c_b18, &c_b19, &c_b18, &c_b19); in MAIN__()
95 sgsvpt_(&c_b22, &c_b23, &c_b18, &c_b25); in MAIN__()
101 sglnzu_(&r__1, &c_b18, &r__2, &c_b19, &c__2); in MAIN__()
104 sglnzu_(&c_b18, &r__1, &c_b19, &r__2, &c__2); in MAIN__()
H A Dsgltyp.c24 static real c_b18 = .1f; variable
93 sgtxzv_(&c_b18, y, cttl, &c_b19, &c__0, &c_n1, &c__3, (ftnlen)16); in MAIN__()
101 sgtxzv_(&c_b18, &r__1, ch__1, &c_b26, &c__0, &c_n1, &c__3, ( in MAIN__()
/dports/science/cdcl/dcl-5.4.8-C/demo/grph1/slpack/
H A Dslpk03.c26 static real c_b18 = .02f; variable
69 slsttl_("FIGURE TITLE", "T", &c_b8, &c_b17, &c_b18, &c__1, (ftnlen)12, ( in MAIN__()
71 slsttl_("page:#PAGE", "B", &c_b12, &c_b12, &c_b18, &c__2, (ftnlen)10, ( in MAIN__()
73 slsttl_("PROG.NAME", "B", &c_b17, &c_b12, &c_b18, &c__3, (ftnlen)9, ( in MAIN__()
77 sgtxzv_(&c_b33, &c_b18, "LOWER LEFT", &c_b18, &c__0, &c_n1, &c__3, ( in MAIN__()
79 sgtxzv_(&c_b33, &c_b41, "UPPER LEFT", &c_b18, &c__0, &c_n1, &c__3, ( in MAIN__()
81 sgtxzv_(&c_b47, &c_b18, "LOWER RIGHT", &c_b18, &c__0, &c__1, &c__3, ( in MAIN__()
83 sgtxzv_(&c_b47, &c_b41, "UPPER RIGHT", &c_b18, &c__0, &c__1, &c__3, ( in MAIN__()
/dports/science/cdcl/dcl-5.4.8-C/demo/grph2/ucpack/
H A Ducpk01.c27 static real c_b18 = .9f; variable
83 sgsvpt_(&c_b17, &c_b18, &c_b17, &c_b20); in MAIN__()
92 sgsvpt_(&c_b17, &c_b18, &c_b17, &c_b20); in MAIN__()
101 sgsvpt_(&c_b17, &c_b18, &c_b17, &c_b20); in MAIN__()
110 sgsvpt_(&c_b17, &c_b18, &c_b17, &c_b20); in MAIN__()
119 sgsvpt_(&c_b17, &c_b18, &c_b17, &c_b20); in MAIN__()
130 sgsvpt_(&c_b17, &c_b18, &c_b17, &c_b20); in MAIN__()
141 sgsvpt_(&c_b17, &c_b18, &c_b17, &c_b20); in MAIN__()
H A Ducpk02.c27 static real c_b18 = .14f; variable
84 sgsvpt_(&c_b17, &c_b18, &c_b19, &c_b20); in MAIN__()
93 sgsvpt_(&c_b17, &c_b18, &c_b19, &c_b20); in MAIN__()
102 sgsvpt_(&c_b17, &c_b18, &c_b19, &c_b20); in MAIN__()
111 sgsvpt_(&c_b17, &c_b18, &c_b19, &c_b20); in MAIN__()
120 sgsvpt_(&c_b17, &c_b18, &c_b19, &c_b20); in MAIN__()
131 sgsvpt_(&c_b17, &c_b18, &c_b19, &c_b20); in MAIN__()
142 sgsvpt_(&c_b17, &c_b18, &c_b19, &c_b20); in MAIN__()
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/
H A Ddpbtrf.c6 static doublereal c_b18 = 1.; variable
286 …dtrsm_("Left", "Upper", "Transpose", "Non-unit", &ib, &i2, &c_b18, &ab[*kd + 1 + i__ * ab_dim1], &… in dpbtrf_()
290 …e", &i2, &ib, &c_b21, &ab[* kd + 1 - ib + (i__ + ib) * ab_dim1], &i__3, & c_b18, &ab[*kd + 1 + (i_… in dpbtrf_()
312 …dtrsm_("Left", "Upper", "Transpose", "Non-unit", &ib, &i3, &c_b18, &ab[*kd + 1 + i__ * ab_dim1], &… in dpbtrf_()
318 …, &c_b21, &ab[*kd + 1 - ib + (i__ + ib) * ab_dim1], &i__3, work, &c__33, &c_b18, & ab[ib + 1 + (i_… in dpbtrf_()
322 …dsyrk_("Upper", "Transpose", &i3, &ib, &c_b21, work, & c__33, &c_b18, &ab[*kd + 1 + (i__ + *kd) * … in dpbtrf_()
410 …dtrsm_("Right", "Lower", "Transpose", "Non-unit", &i2, &ib, &c_b18, &ab[i__ * ab_dim1 + 1], &i__3,… in dpbtrf_()
414 …, "No Transpose", &i2, &ib, &c_b21, &ab[ ib + 1 + i__ * ab_dim1], &i__3, &c_b18, &ab[( i__ + ib) *… in dpbtrf_()
436 …dtrsm_("Right", "Lower", "Transpose", "Non-unit", &i3, &ib, &c_b18, &ab[i__ * ab_dim1 + 1], &i__3,… in dpbtrf_()
442 …&i3, &i2, &ib, &c_b21, work, &c__33, &ab[ib + 1 + i__ * ab_dim1], &i__3, &c_b18, &ab[*kd + 1 - ib … in dpbtrf_()
[all …]
H A Dspbtrf.c6 static real c_b18 = 1.f; variable
284 …strsm_("Left", "Upper", "Transpose", "Non-unit", &ib, &i2, &c_b18, &ab[*kd + 1 + i__ * ab_dim1], &… in spbtrf_()
288 …e", &i2, &ib, &c_b21, &ab[* kd + 1 - ib + (i__ + ib) * ab_dim1], &i__3, & c_b18, &ab[*kd + 1 + (i_… in spbtrf_()
310 …strsm_("Left", "Upper", "Transpose", "Non-unit", &ib, &i3, &c_b18, &ab[*kd + 1 + i__ * ab_dim1], &… in spbtrf_()
316 …, &c_b21, &ab[*kd + 1 - ib + (i__ + ib) * ab_dim1], &i__3, work, &c__33, &c_b18, & ab[ib + 1 + (i_… in spbtrf_()
320 …ssyrk_("Upper", "Transpose", &i3, &ib, &c_b21, work, & c__33, &c_b18, &ab[*kd + 1 + (i__ + *kd) * … in spbtrf_()
408 …strsm_("Right", "Lower", "Transpose", "Non-unit", &i2, &ib, &c_b18, &ab[i__ * ab_dim1 + 1], &i__3,… in spbtrf_()
412 …, "No Transpose", &i2, &ib, &c_b21, &ab[ ib + 1 + i__ * ab_dim1], &i__3, &c_b18, &ab[( i__ + ib) *… in spbtrf_()
434 …strsm_("Right", "Lower", "Transpose", "Non-unit", &i3, &ib, &c_b18, &ab[i__ * ab_dim1 + 1], &i__3,… in spbtrf_()
440 …&i3, &i2, &ib, &c_b21, work, &c__33, &ab[ib + 1 + i__ * ab_dim1], &i__3, &c_b18, &ab[*kd + 1 - ib … in spbtrf_()
[all …]
H A Ddtftri.c5 static doublereal c_b18 = 1.; variable
316 dtrmm_("L", "U", "T", diag, &n2, &n1, &c_b18, &a[*n], n, &a[ n1], n); in dtftri_()
338 dtrmm_("R", "U", "N", diag, &n1, &n2, &c_b18, &a[n1], n, a, n); in dtftri_()
363 dtrmm_("R", "L", "T", diag, &n1, &n2, &c_b18, &a[1], &n1, &a[ n1 * n1], &n1); in dtftri_()
384 dtrmm_("L", "L", "N", diag, &n2, &n1, &c_b18, &a[n1 * n2], & n2, a, &n2); in dtftri_()
420 dtrmm_("L", "U", "T", diag, &k, &k, &c_b18, a, &i__1, &a[k + 1], &i__2) ; in dtftri_()
448 dtrmm_("R", "U", "N", diag, &k, &k, &c_b18, &a[k], &i__1, a, & i__2); in dtftri_()
475 dtrmm_("R", "L", "T", diag, &k, &k, &c_b18, a, &k, &a[k * (k + 1)], &k) ; in dtftri_()
498 dtrmm_("L", "L", "N", diag, &k, &k, &c_b18, &a[k * k], &k, a, &k); in dtftri_()
H A Dstftri.c5 static real c_b18 = 1.f; variable
314 strmm_("L", "U", "T", diag, &n2, &n1, &c_b18, &a[*n], n, &a[ n1], n); in stftri_()
336 strmm_("R", "U", "N", diag, &n1, &n2, &c_b18, &a[n1], n, a, n); in stftri_()
361 strmm_("R", "L", "T", diag, &n1, &n2, &c_b18, &a[1], &n1, &a[ n1 * n1], &n1); in stftri_()
382 strmm_("L", "L", "N", diag, &n2, &n1, &c_b18, &a[n1 * n2], & n2, a, &n2); in stftri_()
418 strmm_("L", "U", "T", diag, &k, &k, &c_b18, a, &i__1, &a[k + 1], &i__2) ; in stftri_()
446 strmm_("R", "U", "N", diag, &k, &k, &c_b18, &a[k], &i__1, a, & i__2); in stftri_()
473 strmm_("R", "L", "T", diag, &k, &k, &c_b18, a, &k, &a[k * (k + 1)], &k) ; in stftri_()
496 strmm_("L", "L", "N", diag, &k, &k, &c_b18, &a[k * k], &k, a, &k); in stftri_()
H A Dsstedc.c8 static real c_b18 = 1.f; variable
390 slaset_("Full", n, n, &c_b17, &c_b18, &z__[z_offset], ldz); in sstedc_()
431 slascl_("G", &c__0, &c__0, &orgnrm, &c_b18, &m, &c__1, &d__[ start], &m, info); in sstedc_()
434 slascl_("G", &c__0, &c__0, &orgnrm, &c_b18, &i__1, &c__1, &e[ start], &i__2, info); in sstedc_()
450 slascl_("G", &c__0, &c__0, &c_b18, &orgnrm, &m, &c__1, &d__[ start], &m, info); in sstedc_()
461 …sgemm_("N", "N", n, &m, &m, &c_b18, &work[storez], n, & work[1], &m, &c_b17, &z__[start * z_dim1 +… in sstedc_()
H A Ddstedc.c8 static doublereal c_b18 = 1.; variable
393 dlaset_("Full", n, n, &c_b17, &c_b18, &z__[z_offset], ldz); in dstedc_()
434 dlascl_("G", &c__0, &c__0, &orgnrm, &c_b18, &m, &c__1, &d__[ start], &m, info); in dstedc_()
437 dlascl_("G", &c__0, &c__0, &orgnrm, &c_b18, &i__1, &c__1, &e[ start], &i__2, info); in dstedc_()
453 dlascl_("G", &c__0, &c__0, &c_b18, &orgnrm, &m, &c__1, &d__[ start], &m, info); in dstedc_()
464 …dgemm_("N", "N", n, &m, &m, &c_b18, &work[storez], n, & work[1], &m, &c_b17, &z__[start * z_dim1 +… in dstedc_()
/dports/science/cdcl/dcl-5.4.8-C/demo/grph2/uxyzpk/
H A Duxyz08.c29 static real c_b18 = 0.f; variable
78 uzrset_("UXUSER", &c_b18, (ftnlen)6); in MAIN__()
79 uzrset_("UYUSER", &c_b18, (ftnlen)6); in MAIN__()
84 uxsttl_("B", "LONGITUDE", &c_b18, (ftnlen)1, (ftnlen)9); in MAIN__()
87 uysttl_("L", "LATITUDE", &c_b18, (ftnlen)1, (ftnlen)8); in MAIN__()
88 uxmttl_("T", "UXAXDV/UYAXDV", &c_b18, (ftnlen)1, (ftnlen)13); in MAIN__()
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/
H A Ddpbtrf.c12 static doublereal c_b18 = 1.; variable
255 &i2, &c_b18, &ab[*kd + 1 + i__ * ab_dim1], & in dpbtrf_()
266 c_b18, &ab[*kd + 1 + (i__ + ib) * ab_dim1], & in dpbtrf_()
289 &i3, &c_b18, &ab[*kd + 1 + i__ * ab_dim1], & in dpbtrf_()
300 ab_dim1], &i__3, work, &c__33, &c_b18, & in dpbtrf_()
309 c__33, &c_b18, &ab[*kd + 1 + (i__ + *kd) * in dpbtrf_()
394 &ib, &c_b18, &ab[i__ * ab_dim1 + 1], &i__3, & in dpbtrf_()
403 ib + 1 + i__ * ab_dim1], &i__3, &c_b18, &ab[( in dpbtrf_()
427 &ib, &c_b18, &ab[i__ * ab_dim1 + 1], &i__3, in dpbtrf_()
438 ab_dim1], &i__3, &c_b18, &ab[*kd + 1 - ib in dpbtrf_()
[all …]
H A Dspbtrf.c12 static real c_b18 = 1.f; variable
254 &i2, &c_b18, &ab[*kd + 1 + i__ * ab_dim1], & in spbtrf_()
265 c_b18, &ab[*kd + 1 + (i__ + ib) * ab_dim1], & in spbtrf_()
288 &i3, &c_b18, &ab[*kd + 1 + i__ * ab_dim1], & in spbtrf_()
299 ab_dim1], &i__3, work, &c__33, &c_b18, & in spbtrf_()
308 c__33, &c_b18, &ab[*kd + 1 + (i__ + *kd) * in spbtrf_()
393 &ib, &c_b18, &ab[i__ * ab_dim1 + 1], &i__3, & in spbtrf_()
402 ib + 1 + i__ * ab_dim1], &i__3, &c_b18, &ab[( in spbtrf_()
426 &ib, &c_b18, &ab[i__ * ab_dim1 + 1], &i__3, in spbtrf_()
437 ab_dim1], &i__3, &c_b18, &ab[*kd + 1 - ib in spbtrf_()
[all …]
/dports/science/cdcl/dcl-5.4.8-C/demo/grph2/ulpack/
H A Dulpk02.c28 static real c_b18 = .13f; variable
89 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
100 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
110 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
120 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
130 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
140 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
151 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
H A Dulpk02n.c29 static real c_b18 = .13f; variable
90 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
101 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
111 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
121 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
131 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
141 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
152 sgsvpt_(&c_b18, &c_b19, &c_b20, &c_b21); in MAIN__()
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/map3d/
H A Dmap3d5.c27 static real c_b18 = 0.f; variable
111 scspln_(&c__1, &c__2, &c_b18); in MAIN__()
117 uxsttl_("B", "X-axis", &c_b18, (ftnlen)1, (ftnlen)6); in MAIN__()
120 uysttl_("L", "Y-axis", &c_b18, (ftnlen)1, (ftnlen)6); in MAIN__()
141 sgswnd_(&c_b7, &c_b8, &c_b18, &c_b68); in MAIN__()
142 sgsvpt_(&c_b11, &c_b12, &c_b18, &c_b72); in MAIN__()
149 uysttl_("L", "Z-axis", &c_b18, (ftnlen)1, (ftnlen)6); in MAIN__()
/dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/arpack/
H A Ddsaitr.c42 static doublereal c_b18 = 1.; variable
628 dlascl_("General", &i__, &i__, rnorm, &c_b18, n, &c__1, &v[j * v_dim1 in dsaitr_()
631 dlascl_("General", &i__, &i__, rnorm, &c_b18, n, &c__1, &workd[ipj], in dsaitr_()
796 dgemv_("T", n, &j, &c_b18, &v[v_offset], ldv, &workd[ipj], &c__1, & in dsaitr_()
801 dgemv_("T", n, &j, &c_b18, &v[v_offset], ldv, &workd[ivj], &c__1, & in dsaitr_()
812 dgemv_("N", n, &j, &c_b51, &v[v_offset], ldv, &workd[irj], &c__1, &c_b18, in dsaitr_()
952 dgemv_("T", n, &j, &c_b18, &v[v_offset], ldv, &workd[ipj], &c__1, &c_b43, in dsaitr_()
964 dgemv_("N", n, &j, &c_b51, &v[v_offset], ldv, &workd[irj], &c__1, &c_b18, in dsaitr_()
/dports/misc/vxl/vxl-3.3.2/v3p/netlib/arpack/
H A Ddsaitr.c42 static doublereal c_b18 = 1.; variable
628 dlascl_("General", &i__, &i__, rnorm, &c_b18, n, &c__1, &v[j * v_dim1 in dsaitr_()
631 dlascl_("General", &i__, &i__, rnorm, &c_b18, n, &c__1, &workd[ipj], in dsaitr_()
796 dgemv_("T", n, &j, &c_b18, &v[v_offset], ldv, &workd[ipj], &c__1, & in dsaitr_()
801 dgemv_("T", n, &j, &c_b18, &v[v_offset], ldv, &workd[ivj], &c__1, & in dsaitr_()
812 dgemv_("N", n, &j, &c_b51, &v[v_offset], ldv, &workd[irj], &c__1, &c_b18, in dsaitr_()
952 dgemv_("T", n, &j, &c_b18, &v[v_offset], ldv, &workd[ipj], &c__1, &c_b43, in dsaitr_()
964 dgemv_("N", n, &j, &c_b51, &v[v_offset], ldv, &workd[irj], &c__1, &c_b18, in dsaitr_()
/dports/science/cdcl/dcl-5.4.8-C/src/math1/gt2dlib/
H A Dg2ibl2.c18 static real c_b18 = 1.f; variable
91 if (lrge1_(&p1, &c_b2) && lrle1_(&p1, &c_b18)) { in g2ibl2_()
93 } else if (lrge1_(&p2, &c_b2) && lrle1_(&p2, &c_b18)) { in g2ibl2_()
133 if (lrge1_(&p1, &c_b2) && lrle1_(&p1, &c_b18)) { in g2ibl2_()
135 } else if (lrge1_(&p2, &c_b2) && lrle1_(&p2, &c_b18)) { in g2ibl2_()
183 if (lrge1_(&p1, &c_b2) && lrle1_(&p1, &c_b18)) { in g2ibl2_()
185 } else if (lrge1_(&p2, &c_b2) && lrle1_(&p2, &c_b18)) { in g2ibl2_()
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/layout/
H A Dlay2.c23 static real c_b18 = -1.f; variable
62 slsttl_("PROGRAM.NAME", "B", &c_b18, &c_b19, &c_b20, &c__2, (ftnlen)12, ( in MAIN__()
66 slsttl_("page:#PAGE", "B", &c_b19, &c_b18, &c_b20, &c__4, (ftnlen)10, ( in MAIN__()
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/uxyz/
H A Duxyz6.c27 static real c_b18 = 60.f; variable
75 uxaxdv_("B", &c_b17, &c_b18, (ftnlen)1); in MAIN__()
76 uxaxdv_("T", &c_b17, &c_b18, (ftnlen)1); in MAIN__()
/dports/science/cdcl/dcl-5.4.8-C/demo/grph2/udegpk/
H A Du2df06.c26 static real c_b18 = .8f; variable
92 grsvpt_(&c_b17, &c_b18, &c_b17, &c_b18); in MAIN__()
/dports/science/gromacs/gromacs-2021.4/src/gromacs/linearalgebra/gmx_lapack/
H A Dstrtri.cpp18 float c_b18 = 1.; in F77_FUNC() local
67 c_b18, &a[a_offset], lda, &a[j * a_dim1 + 1], lda); in F77_FUNC()
86 &c_b18, &a[j + jb + (j + jb) * a_dim1], lda, &a[j in F77_FUNC()

12345