procedure List.2 (List.94, List.95):
    let List.415 : U64 = CallByName List.6 List.94;
    let List.411 : Int1 = CallByName Num.22 List.95 List.415;
    if List.411 then
        let List.413 : I64 = CallByName List.66 List.94 List.95;
        let List.412 : [C {}, C I64] = TagId(1) List.413;
        ret List.412;
    else
        let List.410 : {} = Struct {};
        let List.409 : [C {}, C I64] = TagId(0) List.410;
        ret List.409;

procedure List.6 (#Attr.2):
    let List.416 : U64 = lowlevel ListLen #Attr.2;
    ret List.416;

procedure List.66 (#Attr.2, #Attr.3):
    let List.414 : I64 = lowlevel ListGetUnsafe #Attr.2 #Attr.3;
    ret List.414;

procedure Num.22 (#Attr.2, #Attr.3):
    let Num.256 : Int1 = lowlevel NumLt #Attr.2 #Attr.3;
    ret Num.256;

procedure Test.1 (Test.2):
    let Test.6 : List I64 = Array [1i64, 2i64, 3i64];
    let Test.7 : U64 = 0i64;
    let Test.5 : [C {}, C I64] = CallByName List.2 Test.6 Test.7;
    dec Test.6;
    ret Test.5;

procedure Test.0 ():
    let Test.4 : {} = Struct {};
    let Test.3 : [C {}, C I64] = CallByName Test.1 Test.4;
    ret Test.3;