author | Jan Rocnik <jan.rocnik@student.tugraz.at> |
Wed, 07 Mar 2012 15:29:02 +0100 | |
changeset 42381 | 8b94d811cb41 |
parent 42276 | 8d642a598ca3 |
permissions | -rwxr-xr-x |
2 theory Test_SUM imports Isac begin
4 section {*trials with implicit function, probably required*}
5 ML {*
6 @{term "(%n :: nat. n) 2"};
7 @{term "(%n. n) 2"};
8 @{term "2"};
9 *}
10 ML {*
11 @{term "(%n. n+n)"};
12 @{term "(%n. n+n) a"};
13 @{term "a+a"};
14 *}
15 section {*sums*}
16 ML {*
17 val x = @{term "(SUM i = 0..< k. f i)"};
18 term2str x
19 *}
20 ML {*
21 *}
22 ML {*
23 *}
24 ML {*
25 *}
27 end