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

SCM Repository

[diderot] Annotation of /tests/DATm-bugs/tests/C9/observ.diderot
ViewVC logotype

Annotation of /tests/DATm-bugs/tests/C9/observ.diderot

Parent Directory Parent Directory | Revision Log Revision Log


Revision 5141 - (view) (download)

1 : cchiw 5141
2 :     field#4(3)[3]F0 = c4hexic⊛ image("rst/data/inputfile0.nrrd");
3 :     field#4(3)[3]F1 = c4hexic⊛ image("rst/data/inputfile1.nrrd");
4 :     tensor [3]F2 = [-1, 2, -1];
5 :     input real scale = 1;
6 :     field#3(3)[]G = ∇•(modulate(((F0)-(F1)),(F2)));
7 :     int length =7;
8 :     strand f(int i) {
9 :    
10 :     output tensor [] out = 0.0;
11 :     update {
12 :    
13 :     tensor [3] pos=[0,0,0];
14 :     if(i==0){
15 :     pos = ([-0.05, 0.28, -0.38]);
16 :     }
17 :     else if(i==1){
18 :     pos = ([-0.05, 0.28, -0.38]);
19 :     }
20 :     else if(i==2){
21 :     pos = ([-0.32, 0.12, 0.29]);
22 :     }
23 :     else if(i==3){
24 :     pos = ([-0.23, 0.12, -0.28]);
25 :     }
26 :     else if(i==4){
27 :     pos = ([-0.19, 0.02, -0.31]);
28 :     }
29 :     else if(i==5){
30 :     pos = ([0.36, 0.37, 0.34]);
31 :     }
32 :     else if(i==6){
33 :     pos = ([-0.24, -0.37, 0.08]);
34 :     }
35 :     else if(i==7){
36 :     pos = ([-0.21, -0.03, -0.19]);
37 :     }
38 :    
39 :     if((inside(pos,F0)) && (inside(pos,F1)) && true){
40 :     out = (G)(pos);
41 :     }
42 :     else{out = 7.2;}
43 :     stabilize;
44 :     }
45 :     }
46 :     initially [ f(i) | i in 0..length];

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