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

SCM Repository

[diderot] Annotation of /tests/new-tests/slice-test.diderot
ViewVC logotype

Annotation of /tests/new-tests/slice-test.diderot

Parent Directory Parent Directory | Revision Log Revision Log


Revision 4640 - (view) (download)

1 : glk 4640 #version 2.0
2 :    
3 :     // test tensor indexing and slicing
4 :     //
5 :    
6 :     input tensor[3] x = [1, 2, 3];
7 :     mat3 M = [ [1, 2, 3], [4, 5, 6], [7, 8, 9] ];
8 :     int g1 = 42;
9 :     int g2 = g1 + 1;
10 :     int step = 0;
11 :     bool flag = false;
12 :    
13 :     initialize {
14 :     print ("M = ", M, "\n");
15 :     }
16 :    
17 :     strand S () {
18 :     output real w = round(x[0] + x[1] * (M[1,:] • M[:, 2]));
19 :    
20 :     update {
21 :     if (flag) { print ("bye\n"); } else { print ("hi\n"); }
22 :     if (step == 0) {
23 :     continue;
24 :     } else {
25 :     stabilize;
26 :     }
27 :     stabilize;
28 :     }
29 :    
30 :     }
31 :    
32 :     update {
33 :     step += 1;
34 :     }
35 :    
36 :     create_collection { S() | i in 1..2, j in 1..2 }

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