pon 23 mar 2026 21:36:08 CET e

test10.p26

typ ii = int

fun main():int =
    let fun c():int = 1 + 2
        fun b():ii = 5 * 4 + 7 + 9
    in
        c() * b() + 100
    end

test11.p26

fun f(a:int, b:int):int=
    a + b,
    let var a:int var b:int in
        a = 0,
        b = 0,
        a + b
    end

test12.p26

typ i = int
typ c = char
typ b = bool

fun bb(b1:int, b2:int): b =
    let
        fun bbb(d1:i, d2:i) : i = d1 + d2
    in
        let fun aa() : c = 'a'
            fun aaa(f:i) : i = 5 * 4 + 7 + 9 % 110
        in
            aaa(8) * bbb(2, 3)
    end,
    b1 >= b2
   end

test13.p26

 typ vv = void

 fun f1(p1:(i:int, j:int)):int
 fun f2(p2:{i:int, j:int}):char
 fun f3(p3:{s1: {s21:{i:int, j: int}, s22:{i:int, j:int}}, s2:(i:int, j: int)}):bool
 fun f4(p4:vv):vv

test14.p26

fun dec100(p:int):int =
    while p > 0 do
        p = p - 1
    end,
    let var a : int in
        a = 1,
        while a < 100 do
            a = a + 1
        end,
        dec100(a)
    end

test15.p26

typ b = bool
fun main() : b =
    let var b1 : b var b2 : b in
        if b1 and b2 or b1 or b2 then
            b2 and b1 and true or false
        else
            let var b1 : b var b2 : b in
                if b1 and b2 or b1 or b2 then
                    b2 and b1 and true or false
                else
                    let var b1 : b var b2 : b in
                        if b1 and b2 or b1 or b2 then
                            b2 and b1 and true or false
                        else
                            (let var b1 : b var b2 : b in
                                if b1 and b2 or b1 or b2 then
                                    b2 and b1 and true or false
                                else
                                    false
                                end
                            end,
                            let var b1 : b var b2 : b in
                                if b1 and b2 or b1 or b2 then
                                    b2 and b1 and true or false
                                else
                                    false
                                end
                            end)
                        end
                    end
                end
            end
        end
    end

test16.p26

var a: int
var b: int
fun main(): int =
    a = 0,
    b = 0,
    while a < 100 do
            while b < 100000 do
                b = b + 2
            end,
            a = a + 1
    end

test17.p26

fun h(): void = none


fun f(): void = h()



fun main():void =
    f()