Lines Matching refs:REAL
53 REAL
55 REAL *p,
59 REAL range )
61 REAL tmp[MAXORDER][MAXCOORDS];
62 REAL mag[MAXORDER];
85 REAL fac = 1;
86 REAL invt = 1.0 / range;
91 REAL max = 0.0;
104 REAL
106 REAL *dist,
107 REAL *p,
114 REAL srange,
115 REAL trange,
118 REAL tmp[MAXORDER][MAXORDER][MAXCOORDS];
119 REAL mag[MAXORDER][MAXORDER];
124 REAL *tp = &tmp[0][0][0];
125 REAL *mp = &mag[0][0];
143 REAL *ti = tp;
144 REAL *qi = p;
145 REAL *til = tp + idist;
147 REAL *tj = ti;
148 REAL *qj = qi;
149 REAL *tjl = ti + jdist;
164 REAL *til = tp + idist - istride;
165 const REAL *till = til - ( spartial * istride );
167 for( REAL *ti = tp; ti != til; ti += istride )
168 for( REAL *tj = ti, *tjl = tj + jdist; tj != tjl; tj += jstride )
175 REAL *tjl = tp + jdist - jstride;
176 const REAL *tjll = tjl - ( tpartial * jstride );
178 for( REAL *tj = tp; tj != tjl; tj += jstride )
179 for( REAL *ti = tj, *til = ti + id; ti != til; ti += istride )
185 REAL max = 0.0;
189 for( REAL *ti = tp, *mi = mp, *til = tp + id; ti != til; ti += istride, mi += mistride )
190 for( REAL *tj = ti, *mj = mi, *tjl = ti + jd; tj != tjl; tj += jstride, mj += mjstride ) {
201 REAL fac = 1.0;
203 REAL invs = 1.0 / srange;
204 REAL invt = 1.0 / trange;