| /dports/graphics/O2-tools/O2-tools-2.01/libsrc/siplib/ |
| H A D | projprof.c | 38 long sip_projprofile(SIPImage *image,long *rden,long *cden){ in sip_projprofile() argument
53 if ( cden != 0 ){ in sip_projprofile()
54 for ( x=0 ; x<width ; x++ ) cden[x] = 0; in sip_projprofile()
65 if ( (mask & dc) != 0 ){ ++rsum; ++cden[x]; } in sip_projprofile()
72 cden[x] += d; in sip_projprofile()
106 long *cden,SIPRectangle *area){ in sip_projprofile_area() argument
123 if ( cden != 0 ){ in sip_projprofile_area()
124 for ( x=0 ; x<width ; x++ ) cden[x] = 0; in sip_projprofile_area()
137 if ( (mask & dc) != 0 ){ ++rsum; ++cden[x]; } in sip_projprofile_area()
144 cden[x] += d; in sip_projprofile_area()
|
| /dports/science/ergo/ergo-3.8/source/matrix/template_lapack/lapack/ |
| H A D | template_lapack_rscl.h | 82 Treal cden; in template_lapack_rscl() local
102 cden = *sa; in template_lapack_rscl()
106 cden1 = cden * smlnum; in template_lapack_rscl()
114 cden = cden1; in template_lapack_rscl()
115 } else if (absMACRO(cnum1) > absMACRO(cden)) { in template_lapack_rscl()
126 mul = cnum / cden; in template_lapack_rscl()
|
| /dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/c/ |
| H A D | zdrscl.c | 75 doublereal mul, cden; in zdrscl_() local
117 cden = *sa; in zdrscl_()
120 cden1 = cden * smlnum; in zdrscl_()
127 cden = cden1; in zdrscl_()
129 else if (f2c_abs(cnum1) > f2c_abs(cden)) in zdrscl_()
139 mul = cnum / cden; in zdrscl_()
|
| H A D | srscl.c | 75 real mul, cden; in srscl_() local
115 cden = *sa; in srscl_()
118 cden1 = cden * smlnum; in srscl_()
125 cden = cden1; in srscl_()
127 else if (f2c_abs(cnum1) > f2c_abs(cden)) in srscl_()
137 mul = cnum / cden; in srscl_()
|
| H A D | drscl.c | 75 doublereal mul, cden; in drscl_() local
115 cden = *sa; in drscl_()
118 cden1 = cden * smlnum; in drscl_()
125 cden = cden1; in drscl_()
127 else if (f2c_abs(cnum1) > f2c_abs(cden)) in drscl_()
137 mul = cnum / cden; in drscl_()
|
| H A D | csrscl.c | 75 real mul, cden; in csrscl_() local
117 cden = *sa; in csrscl_()
120 cden1 = cden * smlnum; in csrscl_()
127 cden = cden1; in csrscl_()
129 else if (f2c_abs(cnum1) > f2c_abs(cden)) in csrscl_()
139 mul = cnum / cden; in csrscl_()
|
| /dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/double/ |
| H A D | drscl.c | 22 doublereal mul, cden; in drscl_() local
114 cden = *sa; in drscl_()
121 cden1 = cden * smlnum; in drscl_()
134 cden = cden1; in drscl_()
136 } else if (abs(cnum1) > abs(cden)) { in drscl_()
152 mul = cnum / cden; in drscl_()
|
| /dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/lapack/complex16/ |
| H A D | zdrscl.c | 22 doublereal mul, cden; in zdrscl_() local
115 cden = *sa; in zdrscl_()
122 cden1 = cden * smlnum; in zdrscl_()
135 cden = cden1; in zdrscl_()
137 } else if (abs(cnum1) > abs(cden)) { in zdrscl_()
153 mul = cnum / cden; in zdrscl_()
|
| /dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/lapack/ |
| H A D | csrscl.c | 10 static real mul, cden; in csrscl_() local
87 cden = *sa; in csrscl_()
91 cden1 = cden * smlnum; in csrscl_()
99 cden = cden1; in csrscl_()
100 } else if (dabs(cnum1) > dabs(cden)) { in csrscl_()
111 mul = cnum / cden; in csrscl_()
|
| H A D | zdrscl.c | 11 static doublereal mul, cden; in zdrscl_() local
88 cden = *sa; in zdrscl_()
92 cden1 = cden * smlnum; in zdrscl_()
100 cden = cden1; in zdrscl_()
101 } else if (abs(cnum1) > abs(cden)) { in zdrscl_()
112 mul = cnum / cden; in zdrscl_()
|
| H A D | drscl.c | 11 static doublereal mul, cden; in drscl_() local
87 cden = *sa; in drscl_()
91 cden1 = cden * smlnum; in drscl_()
99 cden = cden1; in drscl_()
100 } else if (abs(cnum1) > abs(cden)) { in drscl_()
111 mul = cnum / cden; in drscl_()
|
| H A D | srscl.c | 10 static real mul, cden; in srscl_() local
86 cden = *sa; in srscl_()
90 cden1 = cden * smlnum; in srscl_()
98 cden = cden1; in srscl_()
99 } else if (dabs(cnum1) > dabs(cden)) { in srscl_()
110 mul = cnum / cden; in srscl_()
|
| /dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/complex16/ |
| H A D | zdrscl.c | 22 doublereal mul, cden; in zdrscl_() local
115 cden = *sa; in zdrscl_()
122 cden1 = cden * smlnum; in zdrscl_()
135 cden = cden1; in zdrscl_()
137 } else if (abs(cnum1) > abs(cden)) { in zdrscl_()
153 mul = cnum / cden; in zdrscl_()
|
| /dports/misc/vxl/vxl-3.3.2/v3p/netlib/lapack/double/ |
| H A D | drscl.c | 22 doublereal mul, cden; in drscl_() local
114 cden = *sa; in drscl_()
121 cden1 = cden * smlnum; in drscl_()
134 cden = cden1; in drscl_()
136 } else if (abs(cnum1) > abs(cden)) { in drscl_()
152 mul = cnum / cden; in drscl_()
|
| /dports/security/aws-iam-authenticator/aws-iam-authenticator-0.5.2/vendor/gonum.org/v1/gonum/lapack/gonum/ |
| H A D | drscl.go | 36 cden := a
41 cden1 := cden * smlnum
49 cden = cden1
50 case math.Abs(cnum1) > math.Abs(cden):
55 mul = cnum / cden
|
| /dports/www/carbonapi/carbonapi-0.14.1/vendor/gonum.org/v1/gonum/lapack/gonum/ |
| H A D | drscl.go | 36 cden := a
41 cden1 := cden * smlnum
49 cden = cden1
50 case math.Abs(cnum1) > math.Abs(cden):
55 mul = cnum / cden
|
| /dports/www/grafana8/grafana-8.3.6/vendor/gonum.org/v1/gonum/lapack/gonum/ |
| H A D | drscl.go | 36 cden := a
41 cden1 := cden * smlnum
49 cden = cden1
50 case math.Abs(cnum1) > math.Abs(cden):
55 mul = cnum / cden
|
| /dports/sysutils/kubectl/kubernetes-1.22.2/vendor/gonum.org/v1/gonum/lapack/gonum/ |
| H A D | drscl.go | 36 cden := a
41 cden1 := cden * smlnum
49 cden = cden1
50 case math.Abs(cnum1) > math.Abs(cden):
55 mul = cnum / cden
|
| /dports/sysutils/istio/istio-1.6.7/vendor/github.com/openshift/api/vendor/gonum.org/v1/gonum/lapack/gonum/ |
| H A D | drscl.go | 36 cden := a
41 cden1 := cden * smlnum
49 cden = cden1
50 case math.Abs(cnum1) > math.Abs(cden):
55 mul = cnum / cden
|
| /dports/math/givaro/givaro-4.1.1/src/kernel/rational/ |
| H A D | givratcompare.C | 37 int cden = absCompare(a.den, b.den) ; in absCompare() local
39 if ( (cnum == -1) && (cden == 1) ) in absCompare()
41 if ( (cnum == 1) && (cden == -1) ) in absCompare()
44 return -cden ; in absCompare()
45 if (cden == 0) in absCompare()
|
| /dports/math/e-antic/e-antic-1.0.0-rc.13/libeantic/upstream/antic/nf_elem/ |
| H A D | add.c | 97 const fmpz * const cden = QNF_ELEM_DENREF(c); in _nf_elem_add_qf() local
105 if (fmpz_equal(bden, cden)) in _nf_elem_add_qf()
136 if (!fmpz_is_one(bden) && !fmpz_is_one(cden)) in _nf_elem_add_qf()
137 fmpz_gcd(d, bden, cden); in _nf_elem_add_qf()
141 fmpz_mul(anum, bnum, cden); in _nf_elem_add_qf()
142 fmpz_mul(anum + 1, bnum + 1, cden); in _nf_elem_add_qf()
143 fmpz_mul(anum + 2, bnum + 2, cden); in _nf_elem_add_qf()
147 fmpz_mul(aden, bden, cden); in _nf_elem_add_qf()
157 fmpz_divexact(cden1, cden, d); in _nf_elem_add_qf()
|
| H A D | sub.c | 97 const fmpz * const cden = QNF_ELEM_DENREF(c); in _nf_elem_sub_qf() local
105 if (fmpz_equal(bden, cden)) in _nf_elem_sub_qf()
135 if (!fmpz_is_one(bden) && !fmpz_is_one(cden)) in _nf_elem_sub_qf()
136 fmpz_gcd(d, bden, cden); in _nf_elem_sub_qf()
140 fmpz_mul(anum, bnum, cden); in _nf_elem_sub_qf()
141 fmpz_mul(anum + 1, bnum + 1, cden); in _nf_elem_sub_qf()
142 fmpz_mul(anum + 2, bnum + 2, cden); in _nf_elem_sub_qf()
146 fmpz_mul(aden, bden, cden); in _nf_elem_sub_qf()
156 fmpz_divexact(cden1, cden, d); in _nf_elem_sub_qf()
|
| /dports/math/e-antic/antic-f4e8a60/nf_elem/ |
| H A D | add.c | 97 const fmpz * const cden = QNF_ELEM_DENREF(c); in _nf_elem_add_qf() local
105 if (fmpz_equal(bden, cden)) in _nf_elem_add_qf()
136 if (!fmpz_is_one(bden) && !fmpz_is_one(cden)) in _nf_elem_add_qf()
137 fmpz_gcd(d, bden, cden); in _nf_elem_add_qf()
141 fmpz_mul(anum, bnum, cden); in _nf_elem_add_qf()
142 fmpz_mul(anum + 1, bnum + 1, cden); in _nf_elem_add_qf()
143 fmpz_mul(anum + 2, bnum + 2, cden); in _nf_elem_add_qf()
147 fmpz_mul(aden, bden, cden); in _nf_elem_add_qf()
157 fmpz_divexact(cden1, cden, d); in _nf_elem_add_qf()
|
| /dports/math/antic/antic-0.2.4/nf_elem/ |
| H A D | add.c | 97 const fmpz * const cden = QNF_ELEM_DENREF(c); in _nf_elem_add_qf() local
105 if (fmpz_equal(bden, cden)) in _nf_elem_add_qf()
136 if (!fmpz_is_one(bden) && !fmpz_is_one(cden)) in _nf_elem_add_qf()
137 fmpz_gcd(d, bden, cden); in _nf_elem_add_qf()
141 fmpz_mul(anum, bnum, cden); in _nf_elem_add_qf()
142 fmpz_mul(anum + 1, bnum + 1, cden); in _nf_elem_add_qf()
143 fmpz_mul(anum + 2, bnum + 2, cden); in _nf_elem_add_qf()
147 fmpz_mul(aden, bden, cden); in _nf_elem_add_qf()
157 fmpz_divexact(cden1, cden, d); in _nf_elem_add_qf()
|
| H A D | sub.c | 97 const fmpz * const cden = QNF_ELEM_DENREF(c); in _nf_elem_sub_qf() local
105 if (fmpz_equal(bden, cden)) in _nf_elem_sub_qf()
135 if (!fmpz_is_one(bden) && !fmpz_is_one(cden)) in _nf_elem_sub_qf()
136 fmpz_gcd(d, bden, cden); in _nf_elem_sub_qf()
140 fmpz_mul(anum, bnum, cden); in _nf_elem_sub_qf()
141 fmpz_mul(anum + 1, bnum + 1, cden); in _nf_elem_sub_qf()
142 fmpz_mul(anum + 2, bnum + 2, cden); in _nf_elem_sub_qf()
146 fmpz_mul(aden, bden, cden); in _nf_elem_sub_qf()
156 fmpz_divexact(cden1, cden, d); in _nf_elem_sub_qf()
|