/dports/science/cdcl/dcl-5.4.8-C/demo/misc1/chklib/ |
H A D | chkl01.c | 31 logical L__1; in MAIN__() local 84 L__1 = lchrb_(ch, (ftnlen)4); in MAIN__() 93 L__1 = lchrb_(ch, (ftnlen)4); in MAIN__() 105 L__1 = lchrc_(ch, (ftnlen)4); in MAIN__() 114 L__1 = lchrc_(ch, (ftnlen)4); in MAIN__() 126 L__1 = lchrs_(ch, (ftnlen)4); in MAIN__() 135 L__1 = lchrs_(ch, (ftnlen)4); in MAIN__() 147 L__1 = lchrl_(ch, (ftnlen)4); in MAIN__() 156 L__1 = lchrl_(ch, (ftnlen)4); in MAIN__() 168 L__1 = lchrd_(ch, (ftnlen)4); in MAIN__() [all …]
|
/dports/science/cdcl/dcl-5.4.8-C/demo/math1/lrllib/ |
H A D | lrll01.c | 31 logical L__1; in MAIN__() local 64 L__1 = lreq_(&x[i__ - 1], &y[i__ - 1]); in MAIN__() 65 do_fio(&c__1, (char *)&L__1, (ftnlen)sizeof(logical)); in MAIN__() 69 L__1 = lrne_(&x[i__ - 1], &y[i__ - 1]); in MAIN__() 70 do_fio(&c__1, (char *)&L__1, (ftnlen)sizeof(logical)); in MAIN__() 74 L__1 = lrlt_(&x[i__ - 1], &y[i__ - 1]); in MAIN__() 75 do_fio(&c__1, (char *)&L__1, (ftnlen)sizeof(logical)); in MAIN__() 79 L__1 = lrle_(&x[i__ - 1], &y[i__ - 1]); in MAIN__() 80 do_fio(&c__1, (char *)&L__1, (ftnlen)sizeof(logical)); in MAIN__() 84 L__1 = lrgt_(&x[i__ - 1], &y[i__ - 1]); in MAIN__() [all …]
|
H A D | lrll02.c | 30 logical L__1; in MAIN__() local 66 L__1 = lreqa_(&x[i__ - 1], &y[i__ - 1], &epsl); in MAIN__() 67 do_fio(&c__1, (char *)&L__1, (ftnlen)sizeof(logical)); in MAIN__() 71 L__1 = lrnea_(&x[i__ - 1], &y[i__ - 1], &epsl); in MAIN__() 72 do_fio(&c__1, (char *)&L__1, (ftnlen)sizeof(logical)); in MAIN__() 76 L__1 = lrlta_(&x[i__ - 1], &y[i__ - 1], &epsl); in MAIN__() 77 do_fio(&c__1, (char *)&L__1, (ftnlen)sizeof(logical)); in MAIN__() 81 L__1 = lrlea_(&x[i__ - 1], &y[i__ - 1], &epsl); in MAIN__() 82 do_fio(&c__1, (char *)&L__1, (ftnlen)sizeof(logical)); in MAIN__() 86 L__1 = lrgta_(&x[i__ - 1], &y[i__ - 1], &epsl); in MAIN__() [all …]
|
/dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/superlu/SuperLU_4.1/TESTING/MATGEN/ |
H A D | dlatms.c | 24 logical L__1; in dlatms_() local 623 L__1 = jr > jkl; in dlatms_() 660 L__1 = jch > jku + jkl; in dlatms_() 699 L__1 = jc > jku; in dlatms_() 736 L__1 = jch > jkl + jku; in dlatms_() 786 L__1 = jc + jkl < *m; in dlatms_() 864 L__1 = jr + jku < *n; in dlatms_() 951 L__1 = jc > k; in dlatms_() 986 L__1 = jch > k; in dlatms_() 1063 L__1 = *n - jc > k; in dlatms_() [all …]
|
H A D | slatms.c | 23 logical L__1; in slatms_() local 619 L__1 = jr > jkl; in slatms_() 656 L__1 = jch > jku + jkl; in slatms_() 695 L__1 = jc > jku; in slatms_() 732 L__1 = jch > jkl + jku; in slatms_() 782 L__1 = jc + jkl < *m; in slatms_() 860 L__1 = jr + jku < *n; in slatms_() 947 L__1 = jc > k; in slatms_() 982 L__1 = jch > k; in slatms_() 1059 L__1 = *n - jc > k; in slatms_() [all …]
|
H A D | zlatms.c | 25 logical L__1; in zlatms_() local 672 L__1 = jr > jkl; in zlatms_() 733 L__1 = jch > jku + jkl; in zlatms_() 777 L__1 = jc > jku; in zlatms_() 837 L__1 = jch > jkl + jku; in zlatms_() 892 L__1 = jc + jkl < *m; in zlatms_() 996 L__1 = jr + jku < *n; in zlatms_() 1127 L__1 = jc > k; in zlatms_() 1185 L__1 = jch > k; in zlatms_() 1300 L__1 = *n - jc > k; in zlatms_() [all …]
|
H A D | clatms.c | 26 logical L__1; in clatms_() local 669 L__1 = jr > jkl; in clatms_() 732 L__1 = jch > jku + jkl; in clatms_() 776 L__1 = jc > jku; in clatms_() 838 L__1 = jch > jkl + jku; in clatms_() 893 L__1 = jc + jkl < *m; in clatms_() 997 L__1 = jr + jku < *n; in clatms_() 1128 L__1 = jc > k; in clatms_() 1187 L__1 = jch > k; in clatms_() 1302 L__1 = *n - jc > k; in clatms_() [all …]
|
/dports/math/superlu/superlu-5.2.2/TESTING/MATGEN/ |
H A D | slatms.c | 23 logical L__1; in slatms_slu() local 618 L__1 = jr > jkl; in slatms_slu() 655 L__1 = jch > jku + jkl; in slatms_slu() 694 L__1 = jc > jku; in slatms_slu() 731 L__1 = jch > jkl + jku; in slatms_slu() 781 L__1 = jc + jkl < *m; in slatms_slu() 859 L__1 = jr + jku < *n; in slatms_slu() 946 L__1 = jc > k; in slatms_slu() 981 L__1 = jch > k; in slatms_slu() 1058 L__1 = *n - jc > k; in slatms_slu() [all …]
|
H A D | dlatms.c | 24 logical L__1; in dlatms_slu() local 622 L__1 = jr > jkl; in dlatms_slu() 659 L__1 = jch > jku + jkl; in dlatms_slu() 698 L__1 = jc > jku; in dlatms_slu() 735 L__1 = jch > jkl + jku; in dlatms_slu() 785 L__1 = jc + jkl < *m; in dlatms_slu() 863 L__1 = jr + jku < *n; in dlatms_slu() 950 L__1 = jc > k; in dlatms_slu() 985 L__1 = jch > k; in dlatms_slu() 1062 L__1 = *n - jc > k; in dlatms_slu() [all …]
|
H A D | zlatms.c | 25 logical L__1; in zlatms_slu() local 672 L__1 = jr > jkl; in zlatms_slu() 733 L__1 = jch > jku + jkl; in zlatms_slu() 777 L__1 = jc > jku; in zlatms_slu() 837 L__1 = jch > jkl + jku; in zlatms_slu() 892 L__1 = jc + jkl < *m; in zlatms_slu() 996 L__1 = jr + jku < *n; in zlatms_slu() 1127 L__1 = jc > k; in zlatms_slu() 1185 L__1 = jch > k; in zlatms_slu() 1300 L__1 = *n - jc > k; in zlatms_slu() [all …]
|
H A D | clatms.c | 26 logical L__1; in clatms_slu() local 669 L__1 = jr > jkl; in clatms_slu() 732 L__1 = jch > jku + jkl; in clatms_slu() 776 L__1 = jc > jku; in clatms_slu() 838 L__1 = jch > jkl + jku; in clatms_slu() 893 L__1 = jc + jkl < *m; in clatms_slu() 997 L__1 = jr + jku < *n; in clatms_slu() 1128 L__1 = jc > k; in clatms_slu() 1187 L__1 = jch > k; in clatms_slu() 1302 L__1 = *n - jc > k; in clatms_slu() [all …]
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph1/oldsrc/ |
H A D | sgsclp.c | 23 logical L__1; in sgsclp_0_() local 41 L__1 = *iclip == 1; in sgsclp_0_() 42 sglset_("LCLIP", &L__1, (ftnlen)5); in sgsclp_0_()
|
/dports/science/cdcl/dcl-5.4.8-C/src/grph1/sgpack/ |
H A D | sgstrf.c | 30 logical L__1, L__2; in sgstrf_() local 117 L__1 = ldeg && itr == 6; in sgstrf_() 119 stsrad_(&L__1, &L__2); in sgstrf_()
|
/dports/science/ergo/ergo-3.8/source/matrix/template_lapack/lapack/ |
H A D | template_lapack_larrv.h | 56 logical L__1; in template_lapack_larrv() local 812 L__1 = ! usedbs; in template_lapack_larrv() 816 ibegin + windex * z_dim1], &L__1, &negcnt, & in template_lapack_larrv() 909 L__1 = ! usedbs; in template_lapack_larrv() 914 * z_dim1], &L__1, &negcnt, &ztz, & in template_lapack_larrv()
|
/dports/science/madness/madness-ebb3fd7/src/madness/external/elemental/external/pmrrr/src/lapack/ |
H A D | odrrv.c | 31 int L__1; in odrrv() local 802 L__1 = ! usedbs; in odrrv() 806 ibegin + windex * z_dim1], &L__1, &negcnt, & in odrrv() 899 L__1 = ! usedbs; in odrrv() 904 * z_dim1], &L__1, &negcnt, &ztz, & in odrrv()
|
/dports/games/dungeon/dungeon-3.2_1/ |
H A D | DSUB.C | 494 logical ret_val, L__1; local 579 L__1 = full != 0; 580 princr_(L__1, play_1.here);
|
/dports/math/igraph/igraph-0.9.5/vendor/lapack/ |
H A D | dlarrv.c | 311 logical L__1; in igraphdlarrv_() local 920 L__1 = ! usedbs; in igraphdlarrv_() 924 ibegin + windex * z_dim1], &L__1, &negcnt, & in igraphdlarrv_() 1017 L__1 = ! usedbs; in igraphdlarrv_() 1022 * z_dim1], &L__1, &negcnt, &ztz, & in igraphdlarrv_()
|
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
H A D | slarrv.c | 278 logical L__1; in slarrv_() local 944 L__1 = ! usedbs; in slarrv_() 945 … indlld + ibegin - 1], pivmin, &gaptol, &z__[ ibegin + windex * z_dim1], &L__1, &negcnt, & ztz, &m… in slarrv_() 1057 L__1 = ! usedbs; in slarrv_() 1058 …k[indlld + ibegin - 1], pivmin, &gaptol, &z__[ibegin + windex * z_dim1], &L__1, &negcnt, &ztz, & m… in slarrv_()
|
H A D | dlarrv.c | 278 logical L__1; in dlarrv_() local 949 L__1 = ! usedbs; in dlarrv_() 950 … indlld + ibegin - 1], pivmin, &gaptol, &z__[ ibegin + windex * z_dim1], &L__1, &negcnt, & ztz, &m… in dlarrv_() 1062 L__1 = ! usedbs; in dlarrv_() 1063 …k[indlld + ibegin - 1], pivmin, &gaptol, &z__[ibegin + windex * z_dim1], &L__1, &negcnt, &ztz, & m… in dlarrv_()
|
H A D | clarrv.c | 284 logical L__1; in clarrv_() local 1001 L__1 = ! usedbs; in clarrv_() 1002 … indlld + ibegin - 1], pivmin, &gaptol, &z__[ ibegin + windex * z_dim1], &L__1, &negcnt, & ztz, &m… in clarrv_() 1114 L__1 = ! usedbs; in clarrv_() 1115 …k[indlld + ibegin - 1], pivmin, &gaptol, &z__[ibegin + windex * z_dim1], &L__1, &negcnt, &ztz, & m… in clarrv_()
|
H A D | zlarrv.c | 284 logical L__1; in zlarrv_() local 1002 L__1 = ! usedbs; in zlarrv_() 1003 … indlld + ibegin - 1], pivmin, &gaptol, &z__[ ibegin + windex * z_dim1], &L__1, &negcnt, & ztz, &m… in zlarrv_() 1115 L__1 = ! usedbs; in zlarrv_() 1116 …k[indlld + ibegin - 1], pivmin, &gaptol, &z__[ibegin + windex * z_dim1], &L__1, &negcnt, &ztz, & m… in zlarrv_()
|
/dports/biology/protomol/protomol/framework/base/ |
H A D | fft.c | 1521 int L__1; in zfft2d_() local 1533 L__1 = *x * *y > 32768; in zfft2d_() 1534 zfftm1d_(sign, x, y, &a[a_offset], &const1, lda, &coeff[1], &L__1); in zfft2d_()
|
/dports/print/texlive-base/texlive-20150521-source/utils/pmx/pmx-2.7.0/ |
H A D | pmxab.c | 7087 logical L__1; in docrd_() local 7324 L__1 = bit_test(comtrill_1.icrdat[icrd - 1],31); in docrd_() 24104 logical L__1; in make2bar_() local 25744 L__1 = ! comgrace_1.upg[ig - 1]; in make2bar_() 25746 endslur_(&stemup, &L__1, &all_1.nolev[ in make2bar_() 25866 all_1.ibmcnt[commvl_1.ivx - 1], &L__1, soutq, in make2bar_() 25892 L__1 = bit_test(all_1.nacc[commvl_1.ivx + ip * 24 - in make2bar_() 25900 ihornb, nornb, &all_1.stemlen, &L__1, & in make2bar_() 25916 * 24 - 25] - 1], &L__1, &c_false); in make2bar_() 25992 all_1.beamon[commvl_1.ivx - 1], &L__1, ( in make2bar_() [all …]
|
/dports/audio/praat/praat-6.2.03/external/clapack/ |
H A D | lapack_dlar.cpp | 6330 bool L__1; in dlarrv_() local 7080 L__1 = ! usedbs; in dlarrv_() 7084 ibegin + windex * z_dim1], &L__1, &negcnt, & in dlarrv_() 7177 L__1 = ! usedbs; in dlarrv_() 7182 * z_dim1], &L__1, &negcnt, &ztz, & in dlarrv_()
|