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

SCM Repository

[diderot] View of /tests/DATm-bugs/tests/T7/observ.diderot
ViewVC logotype

View of /tests/DATm-bugs/tests/T7/observ.diderot

Parent Directory Parent Directory | Revision Log Revision Log


Revision 5141 - (download) (annotate)
Thu Jul 20 17:07:50 2017 UTC (2 years, 1 month ago) by cchiw
File size: 826 byte(s)
move test programs
field#4(3)[3]F0 = c4hexic⊛  image("rst/data/inputfile0.nrrd");
tensor [3]F1 = [-2, 5, 3];
input real scale = 1;
field#4(3)[3]G = (F0)×(F1);
int length =7;
strand f(int i) {

	output tensor [3] out =  [0.0,0.0,0.0];
	    update {

		tensor [3] pos=[0,0,0];
		if(i==0){
			pos = ([0.06, -0.07, 0.28]);
		}
		else if(i==1){
			pos = ([0.06, -0.07, 0.28]);
		}
		else if(i==2){
			pos = ([-0.19, -0.18, -0.2]);
		}
		else if(i==3){
			pos = ([0.22, 0.19, -0.02]);
		}
		else if(i==4){
			pos = ([-0.1, 0.14, -0.39]);
		}
		else if(i==5){
			pos = ([-0.31, 0.08, -0.3]);
		}
		else if(i==6){
			pos = ([-0.16, 0.03, 0.38]);
		}
		else if(i==7){
			pos = ([0.22, -0.14, 0.35]);
		}

	if((inside(pos,F0)) && true){
			out = (G)(pos);
	}
	 else{out =  [7.2,7.2,7.2];}
        stabilize;
    }
}
initially [ f(i) | i in 0..length];

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