Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Annotation of /branches/ein16/synth/d2/test_eval.py
ViewVC logotype

Annotation of /branches/ein16/synth/d2/test_eval.py

Parent Directory Parent Directory | Revision Log Revision Log


Revision 4444 - (view) (download) (as text)

1 : cchiw 3915 import sympy
2 :     from sympy import *
3 :     #symbols
4 :     x,y,z =symbols('x y z')
5 : cchiw 3865 import sys
6 :     import re
7 : cchiw 4188 import math
8 : cchiw 3915 from obj_ty import *
9 :     from obj_apply import *
10 :     from obj_operator import *
11 : cchiw 3939 from obj_field import *
12 : cchiw 3865
13 : cchiw 3874
14 : cchiw 3865
15 : cchiw 3915 # *************************** unary operators ***************************
16 : cchiw 3939 # binary operators
17 :     def fn_add(exp1,exp2):
18 :     return exp1+exp2
19 :     def fn_subtract(exp1,exp2):
20 :     return exp1-exp2
21 : cchiw 4243 def fn_modulate(exp1,exp2):
22 :     return exp1*exp2
23 : cchiw 3939 # scaling operator
24 : cchiw 3998 def fn_multiplication(exp_s, t):
25 : cchiw 3939 exp_t = field.get_data(t)
26 :     ityp1 = field.get_ty(t)
27 :     shape1 = fty.get_shape(ityp1)
28 : cchiw 3946 #print "exp_s",exp_s,"exp_t",exp_t
29 : cchiw 3939 if(field.is_Scalar(t)):
30 :     return exp_s* exp_t
31 :     elif(field.is_Vector(t)):
32 :     [n1] = shape1 #vector
33 :     rtn = []
34 :     for i in range(n1):
35 :     rtn.append(exp_s*exp_t[i])
36 :     return rtn
37 :     elif(field.is_Matrix(t)):
38 :     [n1,n2] = shape1
39 :     rtn = []
40 :     for i in range(n1):
41 : cchiw 3946 tmp = []
42 : cchiw 3939 for j in range(n2):
43 : cchiw 3946 tmp.append(exp_s*exp_t[i][j])
44 :     rtn.append(tmp)
45 : cchiw 3939 return rtn
46 :     elif(field.is_Ten3(t)):
47 :     [n1,n2,n3] = shape1
48 :     rtn = []
49 :     for i in range(n1):
50 : cchiw 3946 tmpI = []
51 : cchiw 3939 for j in range(n2):
52 : cchiw 3946 tmpJ = []
53 : cchiw 3939 for k in range(n3):
54 : cchiw 3946 tmpJ.append(exp_s*exp_t[i][j][k])
55 :     tmpI.append(tmpJ)
56 :     rtn.append(tmpI)
57 : cchiw 3939 return rtn
58 :     else:
59 :     raise "unsupported scaling"
60 : cchiw 3865
61 : cchiw 3998 #scaling of a field
62 :     def fn_scaling(fld1, fld2):
63 :     def get_sca():
64 :     if(field.is_Scalar(fld1)):
65 :     return (fld1, fld2)
66 :     else:
67 :     return (fld2, fld1)
68 :     (s, t) = get_sca()
69 :     exp_s = field.get_data(s)
70 :     return fn_multiplication(exp_s, t)
71 :    
72 :     #division of a field
73 :     def fn_division(t, s):
74 :     if(field.is_Scalar(s)):
75 :     exp_s = (1/field.get_data(s))
76 :     return fn_multiplication(exp_s, t)
77 :     else:
78 :     raise Exception ("err second arg in division should be a scalar")
79 :    
80 : cchiw 4236
81 :     # sine of field
82 :     def fn_negation(exp):
83 :     return -1*exp
84 :    
85 : cchiw 3939 def fn_cross(fld1, fld2):
86 :     exp1 = field.get_data(fld1)
87 :     ityp1 = field.get_ty(fld1)
88 :     exp2 = field.get_data(fld2)
89 :     ityp2 = field.get_ty(fld2)
90 :     #print " exp1: ",exp1," exp2: ",exp2
91 :     # vectors
92 :     n1 = fty.get_vecLength(ityp1) #vector
93 :     n2 = fty.get_vecLength(ityp2)
94 :     if(n1==2):
95 :     return (exp1[0]*exp2[1]) -(exp1[1]*exp2[0])
96 :     elif(n1==3):
97 :     x0= (exp1[1]*exp2[2]) -(exp1[2]*exp2[1])
98 :     x1= (exp1[2]*exp2[0]) -(exp1[0]*exp2[2])
99 :     x2= (exp1[0]*exp2[1]) -(exp1[1]*exp2[0])
100 :     return [x0,x1,x2]
101 :     else:
102 :     raise "unsupported type for cross product"
103 :    
104 : cchiw 3915 #gradient of field
105 :     def fn_grad(exp, dim):
106 :     if (dim==1):
107 : cchiw 4230 return diff(exp,x)
108 : cchiw 3915 elif (dim==2):
109 :     return [diff(exp,x), diff(exp,y)]
110 :     elif (dim==3):
111 :     return [diff(exp,x), diff(exp,y), diff(exp,z)]
112 :     else:
113 :     raise "dimension not supported"
114 : cchiw 3874
115 : cchiw 3939 #evaluate divergence
116 :     def fn_divergence(fld):
117 :     exp = field.get_data(fld)
118 :     ityp = field.get_ty(fld)
119 :     #print " exp1: ",exp1," exp2: ",exp2
120 :     # vectors
121 :     n1 = fty.get_vecLength(ityp) #vector
122 :     if(n1==2):
123 :     return diff(exp[0],x)+diff(exp[1],y)
124 :     elif(n1==3):
125 :    
126 :     return diff(exp[0],x)+diff(exp[1],y)+diff(exp[2],z)
127 :     else:
128 :     raise "unsupported type for divergence"
129 : cchiw 3874
130 : cchiw 3939 #evaluate cross product
131 :     def fn_curl(fld):
132 :     exp = field.get_data(fld)
133 :     ityp = field.get_ty(fld)
134 :     dim = field.get_dim(fld)
135 :     n = fty.get_vecLength(ityp) #vector
136 :     if(n!=dim):
137 :     raise (" type not supported for curl")
138 :     if(n==2):
139 :     return diff(exp[1], x) - diff(exp[0], y)
140 :     elif(n==3):
141 :     x0= diff(exp[2],y) - diff(exp[1],z)
142 :     x1= diff(exp[0],z) - diff(exp[2],x)
143 :     x2= diff(exp[1],x) - diff(exp[0],y)
144 :     return [x0,x1,x2]
145 :     else:
146 :     raise "unsupported type for cross product"
147 : cchiw 3874
148 : cchiw 3939 #evaluate jacob
149 :     def fn_jacob(fld):
150 : cchiw 4411 #print "inside jacob"
151 : cchiw 3939 exp = field.get_data(fld)
152 :     ityp = field.get_ty(fld)
153 :     dim = field.get_dim(fld)
154 :     #print " exp1: ",exp1," exp2: ",exp2
155 : cchiw 4411 shape = fty.get_shape(ityp)
156 : cchiw 3939 # vectors
157 : cchiw 4411 if(field.is_VectorField (fld)):
158 :     print "found a vector"
159 :     [n] = shape #vector
160 :     if(n!=dim):
161 :     raise (" type not supported for jacob")
162 :     if(dim==2):
163 :     return [[diff(exp[0],x), diff(exp[0],y)],
164 :     [diff(exp[1],x), diff(exp[1],y)]]
165 :     elif(dim==3):
166 :     return [[diff(exp[0],x), diff(exp[0],y), diff(exp[0],z)],
167 :     [diff(exp[1],x), diff(exp[1],y), diff(exp[1],z)],
168 :     [diff(exp[2],x), diff(exp[2],y), diff(exp[2],z)]]
169 :     else:
170 :     raise (" type not supported for jacob")
171 :     elif(field.is_Matrix (fld)):
172 :     #print "inside matrix"
173 :     [n,m] = shape #vector
174 :     if(n!=dim and n!=m):
175 :     raise (" type not supported for jacob")
176 :     elif(dim==2):
177 :     e_00 = exp[0][0]
178 :     e_10 = exp[1][0]
179 :     e_01 = exp[0][1]
180 :     e_11 = exp[1][1]
181 :     f_00 = [diff(e_00,x), diff(e_00,y)]
182 :     f_01 = [diff(e_01,x), diff(e_01,y)]
183 :     f_10 = [diff(e_10,x), diff(e_10,y)]
184 :     f_11 = [diff(e_11,x), diff(e_11,y)]
185 :     return [[f_00,f_01],[f_10,f_11]]
186 :     elif(dim==3):
187 :     e_00 = exp[0][0]
188 :     e_10 = exp[1][0]
189 :     e_20 = exp[2][0]
190 :     e_01 = exp[0][1]
191 :     e_11 = exp[1][1]
192 :     e_21 = exp[2][1]
193 :     e_02 = exp[0][2]
194 :     e_12 = exp[1][2]
195 :     e_22 = exp[2][2]
196 :     def diff_d3(e):
197 :     return [diff(e,x), diff(e,y), diff(e,z)]
198 :     f_00 = diff_d3(e_00)
199 :     f_01 = diff_d3(e_01)
200 :     f_02 = diff_d3(e_02)
201 :     f_10 = diff_d3(e_10)
202 :     f_11 = diff_d3(e_11)
203 :     f_12 = diff_d3(e_12)
204 :     f_20 = diff_d3(e_20)
205 :     f_21 = diff_d3(e_21)
206 :     f_22 = diff_d3(e_22)
207 :     return [[f_00,f_01,f_02],[f_10,f_11,f_12],[f_20,f_21,f_22]]
208 :     else:
209 :     raise (" type not supported for jacob")
210 : cchiw 3939 else:
211 : cchiw 3998 raise "unsupported type for jacob"
212 : cchiw 3939
213 : cchiw 3998 #evaluate norm
214 :     def fn_norm(fld, dim):
215 :     exp = field.get_data(fld)
216 :     ityp = field.get_ty(fld)
217 :     dim = field.get_dim(fld)
218 :     #print " exp1: ",exp1," exp2: ",exp2
219 :     # vectors
220 :     def iter (es):
221 :     sum = 0
222 :     for i in es:
223 : cchiw 4334 t=i*i
224 :     #print "t",t
225 :     sum+=t
226 : cchiw 4210 #print "\nsum",sum
227 : cchiw 4250 rtn = sqrt(sum)
228 : cchiw 4210 #print "\nrtn",rtn
229 : cchiw 4188 return rtn
230 : cchiw 3998 if(field.is_Scalar(fld)):
231 :     [] = fty.get_shape(ityp)
232 : cchiw 4334 #print "scalar exp:",exp
233 : cchiw 4343 t =(sqrt(exp*exp))
234 : cchiw 4334 #print "t",t
235 :     return t
236 : cchiw 3998 elif(field.is_Vector(fld)):
237 :     [n] = fty.get_shape(ityp)
238 :     rtn = []
239 :     for i in range(n):
240 :     rtn.append(exp[i])
241 :     return iter(rtn)
242 :     elif(field.is_Matrix(fld)):
243 :     [n, m] = fty.get_shape(ityp)
244 :     rtn = []
245 :     for i in range(n):
246 :     for j in range(m):
247 :     rtn.append(exp[i][j])
248 :     return iter(rtn)
249 :     elif(field.is_Ten3(fld)):
250 :     [n, m, p] = fty.get_shape(ityp)
251 :     rtn = []
252 :     for i in range(n):
253 :     for j in range(m):
254 :     for k in range(p):
255 :     rtn.append(exp[i][j][k])
256 :     return iter(rtn)
257 :     else:
258 :     raise "unsupported type for norm"
259 : cchiw 3939
260 : cchiw 3998 #evaluate norm
261 :     def fn_normalize(fld, dim):
262 :     exp = field.get_data(fld)
263 :     ityp = field.get_ty(fld)
264 :     dim = field.get_dim(fld)
265 :     #print " exp1: ",exp1," exp2: ",exp2
266 :     norm = fn_norm(fld, dim)
267 :     if(field.is_Scalar(fld)):
268 :     #print "scal",exp
269 :     return exp
270 :     elif(field.is_Vector(fld)):
271 :     [n] = fty.get_shape(ityp)
272 :     rtn = []
273 :     for i in range(n):
274 :     rtn.append(exp[i]/norm)
275 :     #print "vec",rtn
276 :     return rtn
277 :     elif(field.is_Matrix(fld)):
278 :     [n, m] = fty.get_shape(ityp)
279 :     rtn = []
280 :     for i in range(n):
281 :     rtni = []
282 :     for j in range(m):
283 :     rtni.append(exp[i][j]/norm)
284 :     rtn.append(rtni)
285 :     #print "matrix:",rtn
286 :     return rtn
287 :     elif(field.is_Ten3(fld)):
288 :     [n, m, p] = fty.get_shape(ityp)
289 :     rtn = []
290 :     for i in range(n):
291 :     rtni = []
292 :     for j in range(m):
293 :     rtnj = []
294 :     for k in range(p):
295 :     rtnj.append(exp[i][j][k]/norm)
296 :     rtni.append( rtnj)
297 :     rtn.append( rtni)
298 :     #print "ten3",rtn
299 :     return rtn
300 :     else:
301 :     raise "unsupported type for norm"
302 :    
303 : cchiw 4237 #[0]
304 :     def fn_slicev0(fld1):
305 :     exp1 = field.get_data(fld1)
306 :     ityp1 = field.get_ty(fld1)
307 :     return exp1[0]
308 :    
309 :    
310 : cchiw 3998 #evaluate slice
311 : cchiw 4237 #[1]
312 :     def fn_slicev1(fld1):
313 : cchiw 3998 exp1 = field.get_data(fld1)
314 :     ityp1 = field.get_ty(fld1)
315 : cchiw 4237 return exp1[1]
316 :    
317 :     #evaluate slice
318 :     #[1,:]
319 :     def fn_slicem0(fld1):
320 :     exp1 = field.get_data(fld1)
321 :     ityp1 = field.get_ty(fld1)
322 : cchiw 3998 rtn=[]
323 :     if(fty.is_Matrix(ityp1)):
324 :     [n2,n3] = fty.get_shape(ityp1)
325 : cchiw 4237 for i in range(n3):
326 :     rtn.append(exp1[1][i])
327 : cchiw 3998 return rtn
328 :     else:
329 :     raise "unsupported type for slice"
330 :    
331 : cchiw 4237 #evaluate slice
332 :     #[:,0]
333 :     def fn_slicem1(fld1):
334 :     exp1 = field.get_data(fld1)
335 :     ityp1 = field.get_ty(fld1)
336 :     rtn=[]
337 :     if(fty.is_Matrix(ityp1)):
338 :     [n2,n3] = fty.get_shape(ityp1)
339 :     for i in range(n2):
340 :     rtn.append(exp1[i][0])
341 :     return rtn
342 :     else:
343 :     raise "unsupported type for slice"
344 :    
345 : cchiw 4243 #evaluate slice
346 :     #[:,1,:]
347 :     def fn_slicet0(fld1):
348 :     exp1 = field.get_data(fld1)
349 :     ityp1 = field.get_ty(fld1)
350 :     rtn=[]
351 :     if(fty.is_Ten3(ityp1)):
352 :     [n1, n2,n3] = fty.get_shape(ityp1)
353 :     for i in range(n1):
354 :     rtnj=[]
355 :     for j in range(n3):
356 :     rtnj.append(exp1[i][1][j])
357 :     rtn.append(rtnj)
358 :     return rtn
359 :     else:
360 :     raise "unsupported type for slice"
361 : cchiw 4237
362 : cchiw 4243 #evaluate slice
363 :     #[1,0,:]
364 :     def fn_slicet1(fld1):
365 :     exp1 = field.get_data(fld1)
366 :     ityp1 = field.get_ty(fld1)
367 :     rtn=[]
368 :     if(fty.is_Ten3(ityp1)):
369 :     [n1, n2, n3] = fty.get_shape(ityp1)
370 :     for i in range(n3):
371 :     rtn.append(exp1[1][0][i])
372 :     return rtn
373 :     else:
374 :     raise "unsupported type for slice"
375 :    
376 :    
377 :    
378 :    
379 : cchiw 3998 #evaluate trace
380 :     def fn_trace(fld):
381 :     exp = field.get_data(fld)
382 :     ityp = field.get_ty(fld)
383 :     rtn=[]
384 :     if(field.is_Matrix(fld)):
385 :     [n, m] = fty.get_shape(ityp)
386 :     if (n!=m):
387 :     raise Exception("matrix is not identitical")
388 :     rtn = exp[0][0]+exp[1][1]
389 :     if(n==2):
390 :     return rtn
391 :     elif(n==3):
392 :     return rtn+exp[2][2]
393 :     else:
394 :     raise "unsupported matrix field"
395 :     else:
396 :     raise "unsupported trace"
397 :    
398 :     #evaluate transpose
399 :     def fn_transpose(fld):
400 :     exp = field.get_data(fld)
401 :     ityp = field.get_ty(fld)
402 :     if(field.is_Matrix(fld)):
403 :     [n, m] = fty.get_shape(ityp)
404 :     rtn = []
405 :     for i in range(n):
406 :     rtni = []
407 :     for j in range(m):
408 :     rtni.append(exp[j][i])
409 :     rtn.append(rtni)
410 :     return rtn
411 :     else:
412 :     raise "unsupported transpose"
413 :    
414 : cchiw 4247 def fn_doubledot(fld1, fld2):
415 :     exp1 = field.get_data(fld1)
416 :     exp2 = field.get_data(fld2)
417 :     ityp1 = field.get_ty(fld1)
418 : cchiw 4308 if(field.is_Matrix(fld1)):
419 :     rtn = 0
420 :     [n, m] = fty.get_shape(ityp1)
421 :     for i in range(n):
422 : cchiw 4247 for j in range(m):
423 : cchiw 4248 rtn+=exp1[i][j]*exp2[i][j]
424 : cchiw 4308 return rtn
425 :     elif(field.is_Ten3(fld1)):
426 :     rtn = []
427 :     [n, m, l] = fty.get_shape(ityp1)
428 :     for i in range(n):
429 :     for j in range(m):
430 :     for k in range(l):
431 :     rtn.append(exp1[i][j][k]*exp2[i][j][k])
432 :     return rtn
433 :     else:
434 :     raise "unsupported double dot"
435 : cchiw 4247
436 :    
437 :    
438 : cchiw 3998 #evaluate det
439 :     def fn_det(fld):
440 :     exp = field.get_data(fld)
441 :     ityp = field.get_ty(fld)
442 :     rtn=[]
443 :     if(field.is_Matrix(fld)):
444 :     [n, m] = fty.get_shape(ityp)
445 :     if (n!=m):
446 :     raise Exception("matrix is not identitical")
447 :     a = exp[0][0]
448 :     d = exp[1][1]
449 :     c = exp[1][0]
450 :     b = exp[0][1]
451 :     if(n==2):
452 :     return a*d-b*c
453 :     elif(n==3):
454 :     a = exp[0][0]
455 :     b = exp[0][1]
456 :     c = exp[0][2]
457 :     d = exp[1][0]
458 :     e = exp[1][1]
459 :     f = exp[1][2]
460 :     g = exp[2][0]
461 :     h = exp[2][1]
462 :     i = exp[2][2]
463 :     return a*(e*i-f*h)-b*(d*i-f*g)+c*(d*h-e*g)
464 :     else:
465 :     raise "unsupported matrix field"
466 :     else:
467 :     raise "unsupported trace"
468 :    
469 : cchiw 4411 #evaluate det
470 :     def fn_inverse(fld):
471 :     exp = field.get_data(fld)
472 :     ityp = field.get_ty(fld)
473 :     rtn=[]
474 :     if(field.is_Matrix(fld)):
475 :     [n, m] = fty.get_shape(ityp)
476 :     if (n!=m):
477 :     raise Exception("matrix is not identitical")
478 :     a = exp[0][0]
479 :     d = exp[1][1]
480 :     c = exp[1][0]
481 :     b = exp[0][1]
482 :     if(n==2):
483 :     denom = a*d-b*c
484 :     return [[d/denom,-b/denom],[-c/denom, a/denom]]
485 :     elif(n==3):
486 :     a = exp[0][0]
487 :     b = exp[0][1]
488 :     c = exp[0][2]
489 :     d = exp[1][0]
490 :     e = exp[1][1]
491 :     f = exp[1][2]
492 :     g = exp[2][0]
493 :     h = exp[2][1]
494 :     i = exp[2][2]
495 :     denom = a*(e*i-f*h)-b*(d*i-f*g)+c*(d*h-e*g)
496 :     num1 = [(e*i - f*h), -(b*i - c*h), (b*f - c*e)]
497 :     num2 = [-(d*i - f*g), (a*i -c*g), -(a*f - c*d)]
498 :     num3 = [(d*h - e*g), -(a*h - b*g),(a*e - b*d)]
499 :     num =[num1,num2,num3]
500 :    
501 :     rtn = []
502 :     for i in range(n):
503 :     tmp = []
504 :     for j in range(n):
505 :     tmp.append(num[i][j]/denom)
506 :     rtn.append(tmp)
507 :     return rtn
508 :     else:
509 :     raise "unsupported matrix field"
510 :     else:
511 :     raise "unsupported trace"
512 : cchiw 3998
513 : cchiw 4411
514 :    
515 :    
516 :    
517 : cchiw 3939 #evaluate outer product
518 :     def fn_outer(fld1, fld2):
519 :     exp1 = field.get_data(fld1)
520 :     ityp1 = field.get_ty(fld1)
521 :     exp2 = field.get_data(fld2)
522 :     ityp2 = field.get_ty(fld2)
523 : cchiw 4268 ashape = fty.get_shape(ityp1)
524 :     bshape = fty.get_shape(ityp2)
525 :     x= "ashape", ashape, "bshape", bshape
526 : cchiw 3946 #print "exp1",exp1,"ityp1",ityp1.name,"-length",len(exp1)
527 :     #print "exp2",exp2,"ityp2",ityp2.name,"-length",len(exp2)
528 : cchiw 4268 rtn = []
529 : cchiw 3939 if(fty.is_Vector(ityp1)):
530 : cchiw 4268 [n1] = fty.get_shape(ityp1)
531 : cchiw 3939 if(fty.is_Vector(ityp2)):
532 :     #both vectors
533 : cchiw 4268 [n2] = fty.get_shape(ityp2)
534 : cchiw 3939 for i in range(n1):
535 : cchiw 3946 tmpI = []
536 : cchiw 3939 for j in range(n2):
537 : cchiw 3946 tmpI.append(exp1[i]*exp2[j])
538 :     rtn.append(tmpI)
539 : cchiw 3939 return rtn
540 :     elif(fty.is_Matrix(ityp2)):
541 :     [n2,n3] = fty.get_shape(ityp2)
542 :     for i in range(n1):
543 : cchiw 3946 tmpI = []
544 : cchiw 3939 for j in range(n2):
545 : cchiw 3946 tmpJ = []
546 : cchiw 3939 for k in range(n3):
547 : cchiw 3946 tmpJ.append(exp1[i]*exp2[j][k])
548 :     tmpI.append(tmpJ)
549 :     rtn.append(tmpI)
550 : cchiw 3939 return rtn
551 :     elif(fty.is_Matrix(ityp1)):
552 :     [n1,n2] = fty.get_shape(ityp1)
553 :     if(fty.is_Vector(ityp2)):
554 : cchiw 4268 [n3] = fty.get_shape(ityp2)
555 : cchiw 3939 for i in range(n1):
556 : cchiw 3946 tmpI = []
557 : cchiw 3939 for j in range(n2):
558 : cchiw 3946 tmpJ = []
559 : cchiw 3939 for k in range(n3):
560 : cchiw 3946 tmpJ.append(exp1[i][j]*exp2[k])
561 :     tmpI.append(tmpJ)
562 :     rtn.append(tmpI)
563 : cchiw 3939 return rtn
564 :     elif(fty.is_Matrix(ityp2)):
565 : cchiw 4268 [n3, n4] = fty.get_shape(ityp2)
566 : cchiw 3939 for i in range(n1):
567 : cchiw 3946 tmpI = []
568 : cchiw 3939 for j in range(n2):
569 : cchiw 3946 tmpJ = []
570 : cchiw 3939 for k in range(n3):
571 : cchiw 3946 tmpK = []
572 : cchiw 3939 for l in range(n4):
573 : cchiw 3946 tmpK.append(exp1[i][j]*exp2[k][l])
574 :     tmpJ.append(tmpK)
575 :     tmpI.append(tmpJ)
576 :     rtn.append(tmpI)
577 : cchiw 3939 return rtn
578 :     else:
579 :     raise "outer product is not supported"
580 :     else:
581 :     raise "outer product is not supported"
582 :     #evaluate inner product
583 :     def fn_inner(fld1, fld2):
584 :     exp1 = field.get_data(fld1)
585 :     ityp1 = field.get_ty(fld1)
586 :     exp2 = field.get_data(fld2)
587 :     ityp2 = field.get_ty(fld2)
588 : cchiw 4268 ashape = fty.get_shape(ityp1)
589 :     bshape = fty.get_shape(ityp2)
590 :     x= "ashape", ashape, "bshape", bshape
591 : cchiw 3939 if(fty.is_Vector(ityp1)):
592 : cchiw 4268 [a1] = fty.get_shape(ityp1)
593 : cchiw 3939 if(fty.is_Vector(ityp2)):
594 :     #length of vetors
595 :     rtn=0
596 : cchiw 4269 [b1] = fty.get_shape(ityp2)
597 : cchiw 4268 if(a1!=b1):
598 :     raise x
599 :     for s in range(a1):
600 :     rtn += exp1[s]*exp2[s]
601 : cchiw 3939 return rtn
602 :     elif(fty.is_Matrix(ityp2)):
603 : cchiw 4268 [b1,b2] = fty.get_shape(ityp2)
604 : cchiw 3939 rtn=[]
605 : cchiw 4268 if(a1!=b1):
606 :     raise x
607 :     for i in range(b2):
608 : cchiw 3939 sumrtn=0
609 : cchiw 4268 for s in range(a1):
610 :     sumrtn += exp1[s]*exp2[s][i]
611 : cchiw 3939 rtn.append(sumrtn)
612 :     return rtn
613 :     elif(fty.is_Ten3(ityp2)):
614 : cchiw 4268 [b1, b2, b3] = fty.get_shape(ityp2)
615 : cchiw 3946 rtn = []
616 : cchiw 4268 if(a1!=b1):
617 :     raise x
618 :     for i in range(b2):
619 : cchiw 3946 tmpJ = []
620 : cchiw 4268 for j in range(b3):
621 : cchiw 3939 sumrtn=0
622 : cchiw 4268 for s in range(a1):
623 :     sumrtn += exp1[s]*exp2[s][i][j]
624 : cchiw 3946 tmpJ.append(sumrtn)
625 :     rtn.append(tmpJ)
626 :     return rtn
627 : cchiw 3939 else:
628 :     raise "inner product is not supported"
629 :     elif(fty.is_Matrix(ityp1)):
630 : cchiw 4268 [a1,a2] = fty.get_shape(ityp1)
631 : cchiw 3939 if(fty.is_Vector(ityp2)):
632 : cchiw 4268 [b1] = fty.get_shape(ityp2)
633 :     if(a2!=b1):
634 :     raise x
635 : cchiw 3939 rtn=[]
636 : cchiw 4268 for i in range(a1):
637 : cchiw 3939 sumrtn=0
638 : cchiw 4268 for s in range(a2):
639 :     sumrtn += exp1[i][s]*exp2[s]
640 : cchiw 3939 rtn.append(sumrtn)
641 :     return rtn
642 : cchiw 4308 elif(fty.is_Matrix(ityp2)):
643 : cchiw 4261 [b1,b2] = fty.get_shape(ityp2)
644 :     rtn=[]
645 : cchiw 4268 if(a2!=b1):
646 :     raise x
647 : cchiw 4261 for i in range(a1):
648 :     rtnj = []
649 :     for j in range(b2):
650 :     sumrtn=0
651 :     for s in range(a2):
652 : cchiw 4268 sumrtn += exp1[i][s]*exp2[s][j]
653 : cchiw 4261 rtnj.append(sumrtn)
654 :     rtn.append(rtnj)
655 :     return rtn
656 : cchiw 4308 elif(fty.is_Ten3(ityp2)):
657 :     [b1,b2, b3] = fty.get_shape(ityp2)
658 :     rtn=[]
659 :     if(a2!=b1):
660 :     raise x
661 :     for i in range(a1):
662 :     rtnj = []
663 :     for j in range(b2):
664 :     rtnk = []
665 :     for k in range(b3):
666 :     sumrtn=0
667 :     for s in range(a2):
668 :     sumrtn += exp1[i][s]*exp2[s][j][k]
669 :     rtnk.append(sumrtn)
670 :     rtnj.append(rtnk)
671 :     rtn.append(rtnj)
672 :     return rtn
673 :    
674 : cchiw 3939 else:
675 :     raise "inner product is not supported"
676 :     elif(fty.is_Ten3(ityp1)):
677 : cchiw 4268 [a1,a2, a3] = ashape
678 : cchiw 3939 if(fty.is_Vector(ityp2)):
679 : cchiw 4268 [b1] = bshape
680 :     if(a3!=b1):
681 :     raise x
682 : cchiw 3939 rtn=[]
683 : cchiw 4268 for i in range(a1):
684 : cchiw 3946 tmpI=[]
685 : cchiw 4268 for j in range(a2):
686 : cchiw 3939 sumrtn=0
687 : cchiw 4268 for s in range(a3):
688 :     sumrtn += exp1[i][j][s]*exp2[s]
689 : cchiw 3946 tmpI.append(sumrtn)
690 :     rtn.append(tmpI)
691 : cchiw 3939 return rtn
692 : cchiw 4268 if(fty.is_Matrix(ityp2)):
693 :     [b1,b2] = bshape
694 :     if(a3!=b1):
695 :     raise x
696 :     rtn=[]
697 :     for i in range(a1):
698 :     tmpI=[]
699 :     for j in range(a2):
700 :     tmpJ = []
701 :     for k in range(b2):
702 :     sumrtn=0
703 :     for s in range(a3):
704 :     sumrtn += exp1[i][j][s]*exp2[s][k]
705 :     tmpJ.append(sumrtn)
706 :     tmpI.append(tmpJ)
707 :     rtn.append(tmpI)
708 :     return rtn
709 : cchiw 3939 else:
710 :     raise "inner product is not supported"
711 :     else:
712 :     raise "inner product is not supported"
713 :    
714 :    
715 : cchiw 3915 # *************************** generic apply operators ***************************
716 :     #unary operator on a vector
717 : cchiw 3939 def applyToVector(vec, unary):
718 : cchiw 3915 rtn = []
719 :     for v in vec:
720 :     rtn.append(unary(v))
721 :     return rtn
722 :     #binary operator on a vector
723 : cchiw 3939 def applyToVectors(vecA, vecB, binary):
724 : cchiw 3915 rtn = []
725 :     for (a,b) in zip(vecA,vecB):
726 :     x= binary(a,b)
727 :     rtn.append(x)
728 :     return rtn
729 : cchiw 3874
730 : cchiw 3946 def applyToM(vec, unary):
731 :     rtn = []
732 :     for i in vec:
733 :     tmpI = []
734 :     for v in i:
735 :     tmpI.append(unary(v))
736 :     rtn.append(tmpI)
737 :     return rtn
738 :    
739 : cchiw 4230 def applyToMs(vecA,vecB, unary):
740 :     rtn = []
741 :     for (a,b) in zip(vecA,vecB):
742 :     tmpI = []
743 :     for (u,v) in zip(a,b):
744 :     tmpI.append(unary(u, v))
745 :     rtn.append(tmpI)
746 :     return rtn
747 :    
748 :    
749 : cchiw 3946 def applyToT3(vec, unary):
750 :     rtn = []
751 :     for i in vec:
752 :     tmpI = []
753 :     for j in i:
754 :     tmpJ = []
755 :     for v in j:
756 :     tmpJ.append(unary(v))
757 :     tmpI.append(tmpJ)
758 :     rtn.append(tmpI)
759 :     return rtn
760 :    
761 : cchiw 4308 def applyToT3s(vecA, vecB, unary):
762 :     rtn = []
763 :     for (a,b) in zip(vecA, vecB):
764 :     tmpI = []
765 :     for (i,j) in zip(a,b):
766 :     tmpJ = []
767 :     for (u,v) in zip(i,j):
768 :     tmpJ.append(unary(u, v))
769 :     tmpI.append(tmpJ)
770 :     rtn.append(tmpI)
771 :     return rtn
772 :    
773 :    
774 : cchiw 3915 # *************************** apply to scalars or vectors ***************************
775 :     #apply operators to expression
776 :     # return output types and expression
777 :     # unary operator
778 :     # exp: scalar types
779 : cchiw 3874
780 : cchiw 3939 def applyToExp_U_S(fn_name, fld):
781 :     exp = field.get_data(fld)
782 :     dim = field.get_dim(fld)
783 :     #print fn_name
784 : cchiw 4338 if(op_copy==fn_name): #probing
785 : cchiw 3939 return exp
786 : cchiw 3915 elif(op_negation==fn_name): #negation
787 : cchiw 3939 return fn_negation(exp)
788 : cchiw 4250 elif(op_cosine==fn_name): #cosine
789 :     return cos(exp)
790 :     elif(op_sine==fn_name): #sine
791 :     return sin(exp)
792 :     elif(op_tangent==fn_name): # tangent
793 :     return tan(exp)
794 :     elif(op_atangent==fn_name): #atan
795 :     return atan(exp)
796 : cchiw 4252 elif(op_gradient==fn_name):
797 :     return fn_grad(exp, dim)
798 : cchiw 4444 elif(op_asine==fn_name): #asine mag(x)<=1
799 :     frac = 0.1*exp
800 :     return asin(frac)
801 :     elif(op_acosine==fn_name): #acos mag(x)<=1
802 :     frac = 0.1*exp
803 :     return acos(frac)
804 :     elif(op_sqrt==fn_name): #sqrt
805 :     # gets norm first to make sure value is positive.
806 :     norm = sqrt(exp*exp)
807 :     return sqrt(norm)
808 : cchiw 3915 else:
809 : cchiw 3939 raise Exception("unsupported unary operator on scalar field:"+ fn_name.name)
810 : cchiw 3874
811 : cchiw 3939 # unary operator
812 :     # exp: vector types
813 :     def applyToExp_U_V(fn_name, fld):
814 :     exp = field.get_data(fld)
815 : cchiw 4338 if(op_copy==fn_name): #probing
816 : cchiw 3939 return exp
817 :     elif(op_negation==fn_name): #negation
818 :     return applyToVector(exp, fn_negation)
819 :     elif(op_divergence==fn_name):
820 :     return fn_divergence(fld)
821 :     elif(op_curl==fn_name):
822 :     return fn_curl(fld)
823 :     elif(op_jacob==fn_name): #jacob
824 :     return fn_jacob(fld)
825 : cchiw 4237 elif(op_slicev0==fn_name) :
826 :     return fn_slicev0(fld)
827 :     elif(op_slicev1==fn_name):
828 :     return fn_slicev1(fld)
829 : cchiw 4252 elif(op_grad==op_grad):
830 :     return fn_grad(fld)
831 : cchiw 3939 else:
832 :     raise Exception("unsupported unary operator:"+ fn_name.name)
833 : cchiw 3874
834 : cchiw 3946 def applyToExp_U_M(fn_name, fld):
835 :     exp = field.get_data(fld)
836 : cchiw 4338 if(op_copy==fn_name): #probing
837 : cchiw 3946 return exp
838 :     elif(op_negation==fn_name): #negation
839 :     return applyToM(exp, fn_negation)
840 :     elif(op_jacob==fn_name): #jacob
841 : cchiw 4411 #print "app u-m"
842 :     x = fn_jacob(fld)
843 :     #print "x", x
844 :     return x
845 : cchiw 4237 elif(op_slicem0==fn_name) :
846 :     return fn_slicem0(fld)
847 :     elif(op_slicem1==fn_name):
848 :     return fn_slicem1(fld)
849 : cchiw 3998 elif(op_trace == fn_name):
850 :     return fn_trace(fld)
851 :     elif(op_transpose==fn_name):
852 :     return fn_transpose(fld)
853 :     elif(op_det==fn_name):
854 :     return fn_det(fld)
855 : cchiw 4411 elif(op_inverse == fn_name):
856 :     return fn_inverse(fld)
857 : cchiw 3946 else:
858 :     raise Exception("unsupported unary operator:"+ fn_name.name)
859 :    
860 : cchiw 3939 def applyToExp_U_T3(fn_name, fld):
861 :     exp = field.get_data(fld)
862 : cchiw 4338 if(op_copy==fn_name): #probing
863 : cchiw 3939 return exp
864 :     elif(op_negation==fn_name): #negation
865 : cchiw 3946 return applyToT3(exp, fn_negation)
866 : cchiw 3939 elif(op_jacob==fn_name): #jacob
867 :     return fn_jacob(fld)
868 : cchiw 4243 elif(op_slicet0==fn_name) :
869 :     return fn_slicet0(fld)
870 :     elif(op_slicet1==fn_name):
871 :     return fn_slicet1(fld)
872 : cchiw 3939 else:
873 :     raise Exception("unsupported unary operator:"+ fn_name.name)
874 :    
875 : cchiw 4308 # binary, args do not need to have the same shape
876 :     def applyToExp_B_rest(e):
877 :     fn_name=e.opr
878 :     (fld1,fld2) = apply.get_binary(e)
879 :     exp1 = field.get_data(fld1)
880 :     exp2 = field.get_data(fld2)
881 :     if(op_outer==fn_name):
882 :     return fn_outer(fld1, fld2)
883 :     elif(op_inner==fn_name):
884 :     return fn_inner(fld1, fld2)
885 :     elif(op_scale==fn_name): #scaling
886 :     return fn_scaling(fld1,fld2)
887 :     else:
888 :     raise Exception("unsupported unary operator:"+fn_name.name)
889 :    
890 : cchiw 3915 # binary operator
891 :     # exp: scalar types
892 :     def applyToExp_B_S(e):
893 :     fn_name=e.opr
894 : cchiw 4308
895 : cchiw 3939 (fld1,fld2) = apply.get_binary(e)
896 :     exp1 = field.get_data(fld1)
897 :     exp2 = field.get_data(fld2)
898 :     #print fn_name
899 : cchiw 3915 if(op_add==fn_name):#addition
900 : cchiw 3939 return fn_add(exp1,exp2)
901 : cchiw 3915 elif(op_subtract==fn_name):#subtract
902 : cchiw 3939 return fn_subtract(exp1,exp2)
903 : cchiw 4243 elif(op_modulate==fn_name):#modulate
904 :     return fn_modulate(exp1,exp2)
905 : cchiw 3939 elif(op_scale==fn_name): #scaling
906 :     return fn_scaling(fld1,fld2)
907 : cchiw 3998 elif(op_division==fn_name): #division
908 :     return fn_division(fld1,fld2)
909 : cchiw 3915 else:
910 : cchiw 3939 raise Exception("unsupported binary operator on scalar fields:"+ fn_name.name)
911 : cchiw 3874
912 : cchiw 3865
913 : cchiw 3915 # binary operator
914 : cchiw 3939 # args have the same shape
915 : cchiw 3915 def applyToExp_B_V(e):
916 : cchiw 4308
917 : cchiw 3915 fn_name=e.opr
918 : cchiw 3939 (fld1,fld2) = apply.get_binary(e)
919 :     exp1 = field.get_data(fld1)
920 :     exp2 = field.get_data(fld2)
921 : cchiw 3915 if(op_add==fn_name):#addition
922 : cchiw 3939 return applyToVectors(exp1, exp2, fn_add)
923 : cchiw 3915 elif(op_subtract==fn_name):#subtract
924 : cchiw 3939 return applyToVectors(exp1, exp2, fn_subtract)
925 : cchiw 4243 elif(op_modulate==fn_name):#modulate
926 :     return applyToVectors(exp1,exp2 ,fn_modulate)
927 : cchiw 3939 elif(op_cross==fn_name):
928 :     return fn_cross(fld1, fld2)
929 : cchiw 3915 else:
930 : cchiw 4308 return applyToExp_B_rest(e)
931 : cchiw 3915
932 : cchiw 4230 def applyToExp_B_M(e):
933 : cchiw 4261 print "b. m"
934 : cchiw 4230 fn_name=e.opr
935 :     (fld1,fld2) = apply.get_binary(e)
936 :     exp1 = field.get_data(fld1)
937 :     exp2 = field.get_data(fld2)
938 :     if(op_add==fn_name):#addition
939 :     return applyToMs(exp1, exp2, fn_add)
940 :     elif(op_subtract==fn_name):#subtract
941 :     return applyToMs(exp1, exp2, fn_subtract)
942 : cchiw 4243 elif(op_modulate==fn_name):#modulate
943 :     return applyToMs(exp1,exp2,fn_modulate)
944 : cchiw 4230 else:
945 : cchiw 4308 return applyToExp_B_rest(e)
946 : cchiw 3939
947 : cchiw 4308 def applyToExp_B_T3(e):
948 :     print "b. m"
949 :     fn_name=e.opr
950 :     (fld1,fld2) = apply.get_binary(e)
951 :     exp1 = field.get_data(fld1)
952 :     exp2 = field.get_data(fld2)
953 :     if(op_add==fn_name):#addition
954 :     return applyToT3s(exp1, exp2, fn_add)
955 :     elif(op_subtract==fn_name):#subtract
956 :     return applyToT3s(exp1, exp2, fn_subtract)
957 :     elif(op_modulate==fn_name):#modulate
958 :     return applyToT3s(exp1,exp2,fn_modulate)
959 :     else:
960 :     return applyToExp_B_rest(e)
961 : cchiw 4230
962 : cchiw 4308
963 : cchiw 3915 # *************************** unary/binary operators ***************************
964 :     def unary(e):
965 : cchiw 3939 #apply.toStr(e)
966 :     fld =apply.get_unary(e)
967 :     fn_name=e.opr
968 :     exp = field.get_data(fld)
969 :     dim = field.get_dim(fld)
970 : cchiw 3998 if(op_norm==fn_name):#norm
971 :     return fn_norm(fld, dim)
972 : cchiw 4308 elif(op_normalize==fn_name):#normalize
973 : cchiw 3998 x= fn_normalize(fld, dim)
974 :     return x
975 :     elif (field.is_Scalar(fld)): # input is a scalar field
976 : cchiw 3939 return applyToExp_U_S(fn_name, fld)
977 :     elif(field.is_Vector(fld)): # input is a vector field
978 :     return applyToExp_U_V(fn_name, fld)
979 : cchiw 3946 elif(field.is_Matrix(fld)): # input is a vector field
980 :     return applyToExp_U_M(fn_name, fld)
981 : cchiw 3915 else:
982 : cchiw 3939 return applyToExp_U_T3(fn_name, fld)
983 : cchiw 3915
984 :     def binary(e):
985 : cchiw 3939 (f, g) =apply.get_binary(e)
986 : cchiw 3998 fn_name = e.opr
987 :     # type is checked elsewhere or does not matter
988 :     if(op_division==fn_name): #division
989 :     return fn_division(f, g)
990 : cchiw 4308 elif(op_doubledot==fn_name):#op_doubledot
991 :     return fn_doubledot (f, g)
992 :     elif(op_outer==fn_name):
993 :     return fn_outer(f, g)
994 :     elif(op_inner==fn_name):
995 :     return fn_inner(f, g)
996 :     elif(op_scale==fn_name): #scaling
997 :     return fn_scaling(f,g)
998 : cchiw 3998 elif (field.is_Scalar(f) and field.is_Scalar(g)): # input is a scalar field
999 : cchiw 3915 return applyToExp_B_S(e)
1000 : cchiw 4308 elif (field.is_Vector(f) and field.is_Vector(g)):
1001 : cchiw 3939 return applyToExp_B_V(e)
1002 : cchiw 4308 elif (field.is_Matrix(f) and field.is_Matrix(g)):
1003 :     return applyToExp_B_M(e)
1004 :     elif (field.is_Ten3(f) and field.is_Ten3(g)):
1005 :     return applyToExp_B_T3(e)
1006 : cchiw 3915 else:
1007 : cchiw 4308 return applyToExp_B_rest(e)
1008 : cchiw 3915
1009 : cchiw 3939 def applyUnaryOnce(oexp_inner,app_inner,app_outer):
1010 : cchiw 3998 #print "applyUnaryOnce"
1011 : cchiw 3939 #apply.toStr(app_inner)
1012 :     oty_inner = apply.get_oty(app_inner)
1013 :     oty_outer = apply.get_oty(app_outer)
1014 :     opr_outer = app_outer.opr
1015 : cchiw 3946 #print "oexp_inner",oexp_inner,"opr_outer",opr_outer.name
1016 : cchiw 3939 lhs_tmp = field(true, "tmp", oty_inner, "", oexp_inner, "")
1017 : cchiw 3946 app_tmp = apply("tmp", opr_outer, lhs_tmp, None, oty_outer, true, true)
1018 : cchiw 3939 oexp_tmp =unary(app_tmp)
1019 : cchiw 3946 #print " oexp_tmp", oexp_tmp
1020 : cchiw 3939 return (oty_outer, oexp_tmp)
1021 :    
1022 : cchiw 3946 def applyBinaryOnce(oexp_inner,app_inner,app_outer,rhs):
1023 :     oty_inner = apply.get_oty(app_inner)
1024 :     oty_outer = apply.get_oty(app_outer)
1025 :     opr_outer = app_outer.opr
1026 :    
1027 :     lhs_tmp = field(true, "tmp", oty_inner, "", oexp_inner, "")
1028 :    
1029 :     app_tmp = apply("tmp", opr_outer, lhs_tmp, rhs, oty_outer, true,true)
1030 :     oexp_tmp =binary(app_tmp)
1031 :     return (oty_outer, oexp_tmp)
1032 : cchiw 3939
1033 : cchiw 3946
1034 : cchiw 3915 # operators with scalar field and vector field
1035 :     def sort(e):
1036 : cchiw 3939 #apply.toStr(e)
1037 :     arity = apply.get_arity(e)
1038 : cchiw 3946 if(e.isrootlhs): # is root
1039 : cchiw 3939 #print "sort is a root"
1040 :     oty = apply.get_oty(e)
1041 :     if (arity ==1):
1042 :     return (oty, unary(e))
1043 :     elif (arity ==2): # binary operator
1044 :     return (oty, binary(e))
1045 :     else:
1046 :     raise Exception ("arity is not supported: "+str(arity_outer))
1047 : cchiw 3915 else:
1048 : cchiw 3939 app_outer = e
1049 :     arity_outer = arity
1050 : cchiw 3946 #print "app_outer",app_outer.opr.name
1051 : cchiw 3939 if (arity_outer==1): #assuming both arity
1052 :     app_inner = apply.get_unary(app_outer)
1053 : cchiw 3946 #print "outer(1) app_inner:",app_inner.opr.name
1054 : cchiw 3939 arity_inner= app_inner.opr.arity
1055 :     if (arity_inner==1):
1056 :     oexp_inner = unary(app_inner)
1057 : cchiw 3946
1058 : cchiw 3939 (oty_outer, oexp_tmp) = applyUnaryOnce(oexp_inner ,app_inner, app_outer)
1059 : cchiw 3946
1060 : cchiw 3939 return (oty_outer, oexp_tmp)
1061 :     elif(arity_inner==2):
1062 :     oexp_inner = binary(app_inner)
1063 :     (oty_outer, oexp_tmp) = applyUnaryOnce(oexp_inner ,app_inner, app_outer)
1064 : cchiw 3946
1065 : cchiw 3939 return (oty_outer, oexp_tmp)
1066 :     else:
1067 :     raise Exception ("arity is not supported: "+str(arity_outer))
1068 : cchiw 3946 elif (arity_outer==2):
1069 :     (app_inner, G) = apply.get_binary(app_outer)
1070 :     arity_inner= app_inner.opr.arity
1071 :     #print "outer(2) app_inner",app_inner.opr.name
1072 :     if (arity_inner==1):
1073 :     oexp_inner = unary(app_inner)
1074 :     rhs = G
1075 :     (oty_outer, oexp_tmp) = applyBinaryOnce(oexp_inner, app_inner, app_outer, rhs)
1076 :     return (oty_outer, oexp_tmp)
1077 :     elif(arity_inner==2):
1078 :     oexp_inner = binary(app_inner)
1079 :     #print "applying binary frst time", oexp_inner
1080 :     rhs = G
1081 :     (oty_outer, oexp_tmp) = applyBinaryOnce(oexp_inner, app_inner, app_outer, rhs)
1082 :     #print "applying binary second time", oexp_tmp
1083 :     return (oty_outer, oexp_tmp)
1084 :     else:
1085 :     raise Exception ("arity is not supported: "+str(arity_outer))
1086 : cchiw 3939 else:
1087 :     raise Exception ("arity is not supported: "+str(arity_outer))
1088 : cchiw 3915
1089 :     # *************************** evaluate at positions ***************************
1090 :     #evaluate scalar field exp
1091 : cchiw 4308 def eval_d0(pos0, exp):
1092 :     return exp
1093 :    
1094 :    
1095 : cchiw 4158 def eval_d1(pos0, exp):
1096 : cchiw 4230 #print "eval vec d1"
1097 : cchiw 4158 #print "exp:",exp
1098 : cchiw 4230 #print "pos0",pos0
1099 : cchiw 4158 #evaluate field defined by coefficients at position
1100 :     exp = exp.subs(x,pos0)
1101 : cchiw 4230 #print "exp",exp
1102 : cchiw 4158 return exp
1103 :    
1104 : cchiw 3915 def eval_d2(pos0, pos1, exp):
1105 : cchiw 3998 #print "exp:",exp
1106 : cchiw 3915 #evaluate field defined by coefficients at position
1107 : cchiw 4158 exp = exp.subs(x,pos0)
1108 :     exp = exp.subs(y,pos1)
1109 :     return exp
1110 : cchiw 3915
1111 : cchiw 3939 def eval_d3(pos0, pos1, pos2, exp):
1112 :     #evaluate field defined by coefficients at position
1113 : cchiw 4158 exp = exp.subs(x,pos0)
1114 :     exp = exp.subs(y,pos1)
1115 :     exp = exp.subs(z,pos2)
1116 :     return exp
1117 : cchiw 3939
1118 : cchiw 4158 #evaluate vector field [exp]
1119 :     def eval_vec_d1(pos0, vec):
1120 : cchiw 4230 #print "eval vec d1"
1121 : cchiw 4158 rtn = []
1122 :     for v in vec:
1123 :     rtn.append(eval_d1(pos0, v))
1124 :     return rtn
1125 :    
1126 : cchiw 3915 #evaluate vector field [exp,exp]
1127 :     def eval_vec_d2(pos0, pos1, vec):
1128 : cchiw 3939 #print "eval_vec_d2 vec:",vec
1129 : cchiw 3915 rtn = []
1130 :     for v in vec:
1131 :     rtn.append(eval_d2(pos0, pos1, v))
1132 :     return rtn
1133 :    
1134 : cchiw 4158 def eval_ten3_d1(pos0,ten3):
1135 :     rtn = []
1136 :     for i in ten3:
1137 :     for j in i:
1138 :     for v in j:
1139 :     rtn.append(eval_d1(pos0, v))
1140 :     return rtn
1141 :    
1142 :    
1143 :    
1144 : cchiw 3939 #evaluate vector field [exp,exp]
1145 : cchiw 4158 def eval_mat_d1(pos0, mat):
1146 :     #print "eval_vec_d2 vec:",vec
1147 :     rtn = []
1148 :     for i in mat:
1149 :     for v in i:
1150 :     rtn.append(eval_d1(pos0, v))
1151 :     return rtn
1152 :    
1153 :     #evaluate vector field [exp,exp]
1154 : cchiw 3946 def eval_mat_d2(pos0, pos1, mat):
1155 :     #print "eval_vec_d2 vec:",vec
1156 :     rtn = []
1157 : cchiw 4210 #print "eval_mat_d2 mat",mat
1158 : cchiw 3946 for i in mat:
1159 :     for v in i:
1160 :     rtn.append(eval_d2(pos0, pos1, v))
1161 :     return rtn
1162 :    
1163 :     def eval_ten3_d2(pos0, pos1, ten3):
1164 :     #print "eval_vec_d2 vec:",vec
1165 :     rtn = []
1166 :     for i in ten3:
1167 :     for j in i:
1168 :     for v in j:
1169 :     rtn.append(eval_d2(pos0, pos1, v))
1170 :     return rtn
1171 :    
1172 :    
1173 :    
1174 :     #evaluate vector field [exp,exp]
1175 : cchiw 3939 def eval_vec_d3(pos0, pos1, pos2, vec):
1176 :     rtn = []
1177 :     for v in vec:
1178 :     rtn.append(eval_d3(pos0, pos1, pos2, v))
1179 :     return rtn
1180 :    
1181 :    
1182 : cchiw 3946 #evaluate vector field [exp,exp]
1183 :     def eval_mat_d3(pos0, pos1, pos2, mat):
1184 :     #print "eval_vec_d2 vec:",vec
1185 :     rtn = []
1186 :     for i in mat:
1187 :     for v in i:
1188 :     rtn.append(eval_d3(pos0, pos1, pos2, v))
1189 :     return rtn
1190 :    
1191 :     def eval_ten3_d3(pos0, pos1, pos2,ten3):
1192 :     rtn = []
1193 :     for i in ten3:
1194 : cchiw 4411
1195 : cchiw 3946 for j in i:
1196 : cchiw 4411
1197 : cchiw 3946 for v in j:
1198 : cchiw 4411
1199 : cchiw 3946 rtn.append(eval_d3(pos0, pos1, pos2, v))
1200 :     return rtn
1201 :    
1202 :    
1203 : cchiw 4158
1204 :     def iter_d1(k, pos, exp):
1205 :     corr = []
1206 :     for x in pos:
1207 :     val = k(x, exp)
1208 :     corr.append(val)
1209 :     return corr
1210 :    
1211 : cchiw 3939 def iter_d2(k, pos, exp):
1212 : cchiw 3874 corr = []
1213 : cchiw 3939 #print "iter expr:", exp
1214 :     #print "pos", pos
1215 : cchiw 3874 for p in pos:
1216 : cchiw 3939 #print "p", p
1217 : cchiw 3874 x=p[0]
1218 :     y=p[1]
1219 : cchiw 3915 val = k(x,y,exp)
1220 : cchiw 3874 corr.append(val)
1221 :     return corr
1222 : cchiw 3865
1223 : cchiw 3939 def iter_d3(k, pos, exp):
1224 :     corr = []
1225 :     #print "iter exp:", exp
1226 :     for p in pos:
1227 :     x=p[0]
1228 :     y=p[1]
1229 :     z=p[2]
1230 :     val = k(x,y,z, exp)
1231 :     #print "pos: ",x,y,z, " val:", val
1232 :     corr.append(val)
1233 :     return corr
1234 :    
1235 : cchiw 3915 def probeField(otyp1,pos, ortn):
1236 : cchiw 3939 dim = fty.get_dim(otyp1)
1237 : cchiw 4411 #print "output type"+otyp1.name
1238 :     #print "inside probe field ortn", ortn
1239 : cchiw 4308 if (dim==nonefield_dim):
1240 :     #still need to flatten
1241 :     rtn = []
1242 :     if (fty.is_Matrix(otyp1)):
1243 :     for i in ortn:
1244 :     for j in i :
1245 :     rtn.append(j)
1246 :     return [rtn]
1247 :     elif (fty.is_Ten3(otyp1)):
1248 :     for i in ortn:
1249 :     for j in i :
1250 :     for k in j:
1251 :     rtn.append(k)
1252 :     return [rtn]
1253 :    
1254 :     else:
1255 :     return [ortn]
1256 :    
1257 :     elif (dim==1):
1258 : cchiw 3939 def get_k():
1259 :     if (fty.is_ScalarField(otyp1)): # output is a scalar field
1260 : cchiw 4230 #print "s_d1"
1261 : cchiw 4158 return eval_d1
1262 :     elif (fty.is_VectorField(otyp1)):
1263 : cchiw 4230 #print "v_d1"
1264 : cchiw 4158 return eval_vec_d1
1265 :     elif (fty.is_Matrix(otyp1)):
1266 :     return eval_mat_d1
1267 :     elif(fty.is_Ten3(otyp1)):
1268 :     return eval_ten3_d1
1269 :     else:
1270 :     raise "error"+otyp1.name
1271 :     return iter_d1(get_k(), pos, ortn)
1272 :     elif (dim==2):
1273 :     def get_k():
1274 :     if (fty.is_ScalarField(otyp1)): # output is a scalar field
1275 : cchiw 3939 return eval_d2
1276 : cchiw 3946 elif (fty.is_VectorField(otyp1)):
1277 :     return eval_vec_d2
1278 :     elif (fty.is_Matrix(otyp1)):
1279 :     return eval_mat_d2
1280 :     elif(fty.is_Ten3(otyp1)):
1281 :     return eval_ten3_d2
1282 : cchiw 3939 else:
1283 : cchiw 3946 raise "error"+otyp1.name
1284 : cchiw 3939 return iter_d2(get_k(), pos, ortn)
1285 :     elif (dim==3):
1286 :     def get_k():
1287 :     if (fty.is_ScalarField(otyp1)): # output is a scalar field
1288 :     return eval_d3
1289 : cchiw 3946 elif (fty.is_VectorField(otyp1)):
1290 :     return eval_vec_d3
1291 :     elif (fty.is_Matrix(otyp1)):
1292 :     return eval_mat_d3
1293 :     elif(fty.is_Ten3(otyp1)):
1294 :     return eval_ten3_d3
1295 : cchiw 3939 else:
1296 : cchiw 3946 raise "error"+otyp1.name
1297 : cchiw 3939 return iter_d3(get_k(), pos, ortn)
1298 : cchiw 3865 else:
1299 : cchiw 3939 raise "unsupported dimension"
1300 : cchiw 3865
1301 : cchiw 3915 # *************************** main ***************************
1302 :    
1303 :     # operators with scalar field and vector field
1304 :     def eval(app, pos):
1305 : cchiw 3946 #print "evalname",app.name
1306 : cchiw 3939 #apply.toStr(app)
1307 : cchiw 3915 (otyp1, ortn) = sort(app) #apply operations to expressions
1308 : cchiw 4210 #print "ortn",ortn
1309 : cchiw 4188 rtn = probeField(otyp1, pos, ortn) #evaluate expression at positions
1310 : cchiw 4210 #print "rtn", rtn
1311 : cchiw 4188 return rtn

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0