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

SCM Repository

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

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

Parent Directory Parent Directory | Revision Log Revision Log


Revision 5141 - (view) (download)

1 : cchiw 5141
2 :     field#4(2)[3, 3]F0 = c4hexic⊛ image("rst/data/inputfile0.nrrd");
3 :     input real scale = 1;
4 :     field#4(2)[]G = det(F0);
5 :     int length =7;
6 :     strand f(int i) {
7 :    
8 :     output tensor [] out = 0.0;
9 :     update {
10 :    
11 :     tensor [2] pos=[0,0];
12 :     if(i==0){
13 :     pos = ([0.24, 0.19]);
14 :     }
15 :     else if(i==1){
16 :     pos = ([0.24, 0.19]);
17 :     }
18 :     else if(i==2){
19 :     pos = ([0.39, -0.33]);
20 :     }
21 :     else if(i==3){
22 :     pos = ([-0.22, -0.2]);
23 :     }
24 :     else if(i==4){
25 :     pos = ([0.33, 0.22]);
26 :     }
27 :     else if(i==5){
28 :     pos = ([-0.28, -0.1]);
29 :     }
30 :     else if(i==6){
31 :     pos = ([0.3, 0.14]);
32 :     }
33 :     else if(i==7){
34 :     pos = ([-0.25, 0.17]);
35 :     }
36 :    
37 :     if((inside(pos,F0)) && true){
38 :     out = (G)(pos);
39 :     }
40 :     else{out = 7.2;}
41 :     stabilize;
42 :     }
43 :     }
44 :     initially [ f(i) | i in 0..length];

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