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

SCM Repository

[diderot] View of /branches/pure-cfg/test/tstablize.diderot
ViewVC logotype

View of /branches/pure-cfg/test/tstablize.diderot

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1495 - (download) (annotate)
Sat Sep 10 14:07:13 2011 UTC (8 years, 9 months ago) by jhr
File size: 561 byte(s)
  Added a couple of test programs
// t.diderot
//
// test version of maximum intensity projection in Diderot
//

int imgSize = 200;
int maxRow = imgSize - 1;
int maxCol = imgSize - 1;

// NOTE: the compiler should create a shadow for col, but not for row.
strand RayCast (int row, int col)
{
    int r = row;
    output real maxval = -∞; 

    update
    {
        stabilize;
    }

    stabilize {
	maxval = real(r+col);
    }
}

initially [ RayCast(r, c) | r in 0..maxRow, c in 0..maxCol ];

// HEY output should be a single blob in the center of the image;
// an image of the bspln3 kernel

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