/dports/science/cdcl/dcl-5.4.8-C/demo/grph1/sgpack/ |
H A D | sgpk06.c | 22 static real c_b10 = 1.f; variable 82 sgswnd_(&c_b9, &c_b10, &c_b9, &c_b10); in MAIN__() 83 sgsvpt_(&c_b9, &c_b10, &c_b9, &c_b10); in MAIN__() 94 sgswnd_(&c_b9, &c_b10, &c_b9, &c_b10); in MAIN__() 106 sgswnd_(&c_b9, &c_b10, &c_b35, &c_b36); in MAIN__() 117 sgswnd_(&c_b9, &c_b10, &c_b47, &c_b48); in MAIN__() 130 sgswnd_(&c_b9, &c_b10, &c_b47, &c_b48); in MAIN__()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/kihon/ |
H A D | kihon9.c | 23 static real c_b10 = 1.f; variable 79 sgswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__() 80 sgsvpt_(&c_b7, &c_b10, &c_b13, &c_b14); in MAIN__() 86 sgswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__() 87 sgsvpt_(&c_b7, &c_b10, &c_b24, &c_b13); in MAIN__() 94 sgswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__() 95 sgsvpt_(&c_b7, &c_b10, &c_b38, &c_b24); in MAIN__() 102 sgswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__() 103 sgsvpt_(&c_b7, &c_b10, &c_b49, &c_b38); in MAIN__()
|
H A D | kihon7.c | 22 static real c_b10 = 0.f; variable 68 sgsvpt_(&c_b10, &c_b11, &c_b10, &c_b11); in MAIN__() 87 sgswnd_(&c_b6, &c_b7, &c_b35, &c_b10); in MAIN__() 93 sgswnd_(&c_b6, &c_b7, &c_b10, &c_b35); in MAIN__() 132 sgtxu_(&c_b10, &c_b10, "SGTXU", (ftnlen)5); in aplot_()
|
H A D | kihona.c | 22 static real c_b10 = 12.56636f; variable 88 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 99 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 112 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 124 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 133 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 143 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__() 152 sgswnd_(&c_b9, &c_b10, &c_b11, &c_b12); in MAIN__()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/grph1/scpack/ |
H A D | scpkt7.c | 22 static real c_b10 = 0.f; variable 71 scsorg_(&c_b9, &c_b10, &c_b10, &c_b10); in MAIN__() 75 scsobj_(&c_b10, &c_b10, &c_b10); in MAIN__()
|
H A D | scpkt8.c | 22 static real c_b10 = 0.f; variable 74 scsorg_(&c_b9, &c_b10, &c_b10, &c_b10); in MAIN__() 78 scsobj_(&c_b10, &c_b10, &c_b10); in MAIN__()
|
H A D | scpkt1.c | 21 static real c_b10 = 0.f; variable 69 scsobj_(&c_b10, &c_b10, &c_b10); in MAIN__()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/grph2/ucpack/ |
H A D | ucpk01.c | 23 static real c_b10 = 1.f; variable 76 slrat_(&c_b9, &c_b10); in MAIN__() 82 sgswnd_(&c_b14, &r__1, &c_b14, &c_b10); in MAIN__() 91 sgswnd_(&c_b14, &r__1, &c_b14, &c_b10); in MAIN__() 100 sgswnd_(&c_b14, &r__1, &c_b14, &c_b10); in MAIN__() 109 sgswnd_(&c_b14, &r__1, &c_b14, &c_b10); in MAIN__() 118 sgswnd_(&c_b14, &r__1, &c_b14, &c_b10); in MAIN__() 129 sgswnd_(&c_b14, &r__1, &c_b14, &c_b10); in MAIN__() 140 sgswnd_(&c_b14, &r__1, &c_b14, &c_b10); in MAIN__()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/grph1/slpack/ |
H A D | slpk02.c | 22 static real c_b10 = 1.f; variable 61 slrat_(&c_b10, &c_b10); in MAIN__() 66 slsttl_("page:#PAGE", "B", &c_b10, &c_b10, &c_b16, &c__2, (ftnlen)10, ( in MAIN__() 69 slsttl_("PROG.NAME", "B", &c_b15, &c_b10, &c_b16, &c__3, (ftnlen)9, ( in MAIN__()
|
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
H A D | spftrs.c | 4 static real c_b10 = 1.f; variable 265 stfsm_(transr, "L", uplo, "N", "N", n, nrhs, &c_b10, a, &b[b_offset], ldb); in spftrs_() 266 stfsm_(transr, "L", uplo, "T", "N", n, nrhs, &c_b10, a, &b[b_offset], ldb); in spftrs_() 270 stfsm_(transr, "L", uplo, "T", "N", n, nrhs, &c_b10, a, &b[b_offset], ldb); in spftrs_() 271 stfsm_(transr, "L", uplo, "N", "N", n, nrhs, &c_b10, a, &b[b_offset], ldb); in spftrs_()
|
H A D | dpftrs.c | 4 static doublereal c_b10 = 1.; variable 267 dtfsm_(transr, "L", uplo, "N", "N", n, nrhs, &c_b10, a, &b[b_offset], ldb); in dpftrs_() 268 dtfsm_(transr, "L", uplo, "T", "N", n, nrhs, &c_b10, a, &b[b_offset], ldb); in dpftrs_() 272 dtfsm_(transr, "L", uplo, "T", "N", n, nrhs, &c_b10, a, &b[b_offset], ldb); in dpftrs_() 273 dtfsm_(transr, "L", uplo, "N", "N", n, nrhs, &c_b10, a, &b[b_offset], ldb); in dpftrs_()
|
H A D | clalsd.c | 11 static real c_b10 = 1.f; variable 362 slascl_("G", &c__0, &c__0, &orgnrm, &c_b10, n, &c__1, &d__[1], n, info); in clalsd_() 363 slascl_("G", &c__0, &c__0, &orgnrm, &c_b10, &nm1, &c__1, &e[1], &nm1, info); in clalsd_() 374 slaset_("A", n, n, &c_b35, &c_b10, &rwork[irwu], n); in clalsd_() 375 slaset_("A", n, n, &c_b35, &c_b10, &rwork[irwvt], n); in clalsd_() 531 slascl_("G", &c__0, &c__0, &c_b10, &orgnrm, n, &c__1, &d__[1], n, info); in clalsd_() 533 clascl_("G", &c__0, &c__0, &orgnrm, &c_b10, n, nrhs, &b[b_offset], ldb, info); in clalsd_() 620 slaset_("A", &nsize, &nsize, &c_b35, &c_b10, &rwork[vt + st1], n); in clalsd_() 621 slaset_("A", &nsize, &nsize, &c_b35, &c_b10, &rwork[u + st1], n); in clalsd_() 834 slascl_("G", &c__0, &c__0, &c_b10, &orgnrm, n, &c__1, &d__[1], n, info); in clalsd_() [all …]
|
H A D | zlalsd.c | 11 static doublereal c_b10 = 1.; variable 358 dlascl_("G", &c__0, &c__0, &orgnrm, &c_b10, n, &c__1, &d__[1], n, info); in zlalsd_() 359 dlascl_("G", &c__0, &c__0, &orgnrm, &c_b10, &nm1, &c__1, &e[1], &nm1, info); in zlalsd_() 370 dlaset_("A", n, n, &c_b35, &c_b10, &rwork[irwu], n); in zlalsd_() 371 dlaset_("A", n, n, &c_b35, &c_b10, &rwork[irwvt], n); in zlalsd_() 527 dlascl_("G", &c__0, &c__0, &c_b10, &orgnrm, n, &c__1, &d__[1], n, info); in zlalsd_() 529 zlascl_("G", &c__0, &c__0, &orgnrm, &c_b10, n, nrhs, &b[b_offset], ldb, info); in zlalsd_() 616 dlaset_("A", &nsize, &nsize, &c_b35, &c_b10, &rwork[vt + st1], n); in zlalsd_() 617 dlaset_("A", &nsize, &nsize, &c_b35, &c_b10, &rwork[u + st1], n); in zlalsd_() 830 dlascl_("G", &c__0, &c__0, &c_b10, &orgnrm, n, &c__1, &d__[1], n, info); in zlalsd_() [all …]
|
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
H A D | zlalsd.c | 13 static doublereal c_b10 = 1.; variable 255 zlascl_("G", &c__0, &c__0, &d__[1], &c_b10, &c__1, nrhs, &b[ in zlalsd_() 320 dlaset_("A", n, n, &c_b35, &c_b10, &rwork[irwu], n, (ftnlen)1); in zlalsd_() 321 dlaset_("A", n, n, &c_b35, &c_b10, &rwork[irwvt], n, (ftnlen)1); in zlalsd_() 385 zlascl_("G", &c__0, &c__0, &d__[i__], &c_b10, &c__1, nrhs, &b[ in zlalsd_() 446 dlascl_("G", &c__0, &c__0, &c_b10, &orgnrm, n, &c__1, &d__[1], n, in zlalsd_() 449 zlascl_("G", &c__0, &c__0, &orgnrm, &c_b10, n, nrhs, &b[b_offset], in zlalsd_() 544 dlaset_("A", &nsize, &nsize, &c_b35, &c_b10, &rwork[vt + st1], in zlalsd_() 546 dlaset_("A", &nsize, &nsize, &c_b35, &c_b10, &rwork[u + st1], in zlalsd_() 572 dgemm_("T", "N", &nsize, nrhs, &nsize, &c_b10, &rwork[u + st1] in zlalsd_() [all …]
|
H A D | clalsd.c | 13 static real c_b10 = 1.f; variable 252 clascl_("G", &c__0, &c__0, &d__[1], &c_b10, &c__1, nrhs, &b[ in clalsd_() 317 slaset_("A", n, n, &c_b35, &c_b10, &rwork[irwu], n, (ftnlen)1); in clalsd_() 318 slaset_("A", n, n, &c_b35, &c_b10, &rwork[irwvt], n, (ftnlen)1); in clalsd_() 382 clascl_("G", &c__0, &c__0, &d__[i__], &c_b10, &c__1, nrhs, &b[ in clalsd_() 443 slascl_("G", &c__0, &c__0, &c_b10, &orgnrm, n, &c__1, &d__[1], n, in clalsd_() 446 clascl_("G", &c__0, &c__0, &orgnrm, &c_b10, n, nrhs, &b[b_offset], in clalsd_() 540 slaset_("A", &nsize, &nsize, &c_b35, &c_b10, &rwork[vt + st1], in clalsd_() 542 slaset_("A", &nsize, &nsize, &c_b35, &c_b10, &rwork[u + st1], in clalsd_() 568 sgemm_("T", "N", &nsize, nrhs, &nsize, &c_b10, &rwork[u + st1] in clalsd_() [all …]
|
/dports/science/cdcl/dcl-5.4.8-C/demo/grph2/uipack/ |
H A D | uipk03.c | 20 static real c_b10 = 1.f; variable 79 rnorml_(r__, rc, &c__100, &c__100, &c_b9, &c_b10); in MAIN__() 80 rnorml_(g, gc, &c__100, &c__100, &c_b13, &c_b10); in MAIN__() 81 rnorml_(b, bc, &c__100, &c__100, &c_b9, &c_b10); in MAIN__() 93 grswnd_(&c_b28, &c_b10, &c_b28, &c_b10); in MAIN__()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/math1/clsplib/ |
H A D | cslb01.c | 20 static real c_b10 = 1.f; variable 79 rnorml_(r__, rc, &c__100, &c__100, &c_b9, &c_b10); in MAIN__() 80 rnorml_(g, gc, &c__100, &c__100, &c_b13, &c_b10); in MAIN__() 81 rnorml_(b, bc, &c__100, &c__100, &c_b9, &c_b10); in MAIN__() 93 grswnd_(&c_b28, &c_b10, &c_b28, &c_b10); in MAIN__()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/uxyz/ |
H A D | uxyz6.c | 24 static real c_b10 = 0.f; variable 71 grswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__() 77 uxsttl_("B", "LONGITUDE", &c_b10, (ftnlen)1, (ftnlen)9); in MAIN__() 82 uysttl_("R", "DAY NUMBER", &c_b10, (ftnlen)1, (ftnlen)10); in MAIN__() 83 uxmttl_("T", "UXAXDV/UCYACL", &c_b10, (ftnlen)1, (ftnlen)13); in MAIN__()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/rakuraku/miss/ |
H A D | miss1.c | 23 static real c_b10 = 1.f; variable 83 grswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__() 88 grswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__() 96 grswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__() 101 grswnd_(&c_b7, &c_b8, &c_b9, &c_b10); in MAIN__()
|
/dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/superlu/SuperLU_4.1/TESTING/MATGEN/ |
H A D | slaror.c | 11 static real c_b10 = 1.f; variable 191 slaset_("Full", m, n, &c_b9, &c_b10, &a[a_offset], lda); in slaror_() 223 x[kbeg + nxfrm] = r_sign(&c_b10, &r__1); in slaror_() 240 sgemv_("T", &ixfrm, n, &c_b10, &a[kbeg + a_dim1], lda, &x[kbeg], & in slaror_() 252 sgemv_("N", m, &ixfrm, &c_b10, &a[kbeg * a_dim1 + 1], lda, &x[ in slaror_() 263 x[nxfrm * 2] = r_sign(&c_b10, &r__1); in slaror_()
|
H A D | dlaror.c | 11 static doublereal c_b10 = 1.; variable 195 dlaset_("Full", m, n, &c_b9, &c_b10, &a[a_offset], lda); in dlaror_() 227 x[kbeg + nxfrm] = d_sign(&c_b10, &d__1); in dlaror_() 244 dgemv_("T", &ixfrm, n, &c_b10, &a[kbeg + a_dim1], lda, &x[kbeg], & in dlaror_() 256 dgemv_("N", m, &ixfrm, &c_b10, &a[kbeg * a_dim1 + 1], lda, &x[ in dlaror_() 267 x[nxfrm * 2] = d_sign(&c_b10, &d__1); in dlaror_()
|
/dports/math/superlu/superlu-5.2.2/TESTING/MATGEN/ |
H A D | slaror.c | 11 static real c_b10 = 1.f; variable 190 slaset_slu("Full", m, n, &c_b9, &c_b10, &a[a_offset], lda); in slaror_slu() 222 x[kbeg + nxfrm] = r_sign(&c_b10, &r__1); in slaror_slu() 239 sgemv_("T", &ixfrm, n, &c_b10, &a[kbeg + a_dim1], lda, &x[kbeg], & in slaror_slu() 251 sgemv_("N", m, &ixfrm, &c_b10, &a[kbeg * a_dim1 + 1], lda, &x[ in slaror_slu() 262 x[nxfrm * 2] = r_sign(&c_b10, &r__1); in slaror_slu()
|
H A D | dlaror.c | 11 static doublereal c_b10 = 1.; variable 194 dlaset_slu("Full", m, n, &c_b9, &c_b10, &a[a_offset], lda); in dlaror_slu() 226 x[kbeg + nxfrm] = d_sign(&c_b10, &d__1); in dlaror_slu() 243 dgemv_("T", &ixfrm, n, &c_b10, &a[kbeg + a_dim1], lda, &x[kbeg], & in dlaror_slu() 255 dgemv_("N", m, &ixfrm, &c_b10, &a[kbeg * a_dim1 + 1], lda, &x[ in dlaror_slu() 266 x[nxfrm * 2] = d_sign(&c_b10, &d__1); in dlaror_slu()
|
/dports/science/cdcl/dcl-5.4.8-C/demo/grph2/udegpk/ |
H A D | u2df02.c | 20 static real c_b10 = 0.f; variable 101 grswnd_(&c_b10, &c_b11, uy1, &uy1[18]); in MAIN__() 107 uxsttl_("B", "LONGITUDE", &c_b10, (ftnlen)1, (ftnlen)9); in MAIN__() 110 uysttl_("L", "LATITUDE", &c_b10, (ftnlen)1, (ftnlen)8); in MAIN__() 111 uwsgxb_(&c_b10, &c_b11, &c__19); in MAIN__()
|
H A D | u2df03.c | 20 static real c_b10 = 0.f; variable 98 grswnd_(&c_b10, &c_b11, uy1, &uy1[18]); in MAIN__() 104 uxsttl_("B", "LONGITUDE", &c_b10, (ftnlen)1, (ftnlen)9); in MAIN__() 107 uysttl_("L", "LATITUDE", &c_b10, (ftnlen)1, (ftnlen)8); in MAIN__()
|