procedure Test.0 ():
    let Test.14 : TODO = Z ;
    let Test.13 : TODO = S Test.14;
    let Test.12 : TODO = S Test.13;
    let Test.2 : TODO = S Test.12;
    let Test.9 : Int1 = 1i64;
    let Test.10 : Int1 = GetTagId Test.2;
    dec Test.2;
    let Test.11 : Int1 = lowlevel Eq Test.9 Test.10;
    if Test.11 then
        let Test.7 : I64 = 0i64;
        ret Test.7;
    else
        let Test.8 : I64 = 1i64;
        ret Test.8;