Skip to content

Commit

Permalink
nmnm
Browse files Browse the repository at this point in the history
  • Loading branch information
Skydev0h committed Dec 25, 2023
1 parent 9f1ef80 commit 4dff02f
Showing 1 changed file with 5 additions and 4 deletions.
9 changes: 5 additions & 4 deletions contracts/task4_basic.fc
Original file line number Diff line number Diff line change
Expand Up @@ -78,6 +78,8 @@ forall T1, T2, T3, T4, T5, T6, T7 -> (T1, T2, T3, T4, T5, T6, T7) untuple7([T1,
y += 1;
}

int 'hier = 1 << 128;

tuple hm = empty_tuple();
tuple hr = empty_tuple();
repeat (n') { hr~tpush('hier); }
Expand All @@ -86,13 +88,12 @@ forall T1, T2, T3, T4, T5, T6, T7 -> (T1, T2, T3, T4, T5, T6, T7) untuple7([T1,
m' = m' - 1;
n' = n' - 1;

int 'hier = 1 << 128;
int 'len = 'hier;
int 'obs = 'hier;
tuple 'maze = null();
tuple stk = null();
;; tuple nstk = null();
stk = cons([maze, Sx, Sy, 0, 0, 0, 0], stk);
stk = cons([maze, Sx, Sy, 0, 0], stk);

{-
do {
Expand All @@ -102,8 +103,8 @@ forall T1, T2, T3, T4, T5, T6, T7 -> (T1, T2, T3, T4, T5, T6, T7) untuple7([T1,
-}

do {
[tuple, int, int, int, int, int, int] next = stk~list_next();
(tuple mz, int x, int y, int dx, int dy, int ob, int le) = untuple5(next);
[tuple, int, int, int, int] next = stk~list_next();
(tuple mz, int x, int y, int ob, int le) = untuple5(next);
if (le != 0) {
mz~tset(mz.tget(y).tset("!"u, x), y);
}
Expand Down

0 comments on commit 4dff02f

Please sign in to comment.