11 lines
207 B
Plaintext
11 lines
207 B
Plaintext
const n:int = 100
|
|
|
|
node bad_mem()
|
|
returns (v : float)
|
|
var t2,t,t_next:float^n at r;
|
|
let
|
|
t_next = [t with [0] = 0.0];
|
|
t2 = [ t_next with [1] = 1.0 ];
|
|
init<<r>> t = (0.0^n) fby t_next;
|
|
v = t2[0];
|
|
tel |