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

SCM Repository

[diderot] View of /branches/charisee/test/E-gradDiv.diderot
ViewVC logotype

View of /branches/charisee/test/E-gradDiv.diderot

Parent Directory Parent Directory | Revision Log Revision Log

Revision 2508 - (download) (annotate)
Tue Nov 12 17:14:33 2013 UTC (5 years, 10 months ago) by cchiw
File size: 721 byte(s)
Added Tests

image(3)[] img = load("../data/zimg112.nrrd");
//Scalar Fields
field#2(3)[] F = img ⊛ bspln3;
field#1(2)[] F2 = ctmr ⊛ load("../data/ddro-80.nrrd");
//Vector Fields
field#1(2)[2] V = load("../data/turb2d.nrrd") ⊛ ctmr;

field#1(3)[3] grad1 =∇F;
field#0(2)[2] grad2 =∇F2;

field#0(2)[2,2] div = ∇•V;

field#0(3)[3,3] laplac =∇•∇F;
field#0(3)[3,3] laplac2 =∇•grad1;

field#1(3)[3] testgrad1=grad1+grad1;
field#0(2)[2] testgrad2=grad2+grad2;
field#0(2)[2,2] testDiv=div+div;
field#0(3)[3,3] testLaplac=laplac+laplac2;

strand fieldTest (int row)
real row1=row*9;
    vec2 pos=[row,row1];

initially [ fieldTest( r) | r in 0..1];

ViewVC Help
Powered by ViewVC 1.0.0