[Compiler.saveMono] size: 12
    def f b a.1 : EStateM.Result IO.Error PUnit PUnit :=
      jp _jp.2 a _y.3 : EStateM.Result IO.Error PUnit PUnit :=
        let _x.4 := print a _y.3;
        cases _x.4 : EStateM.Result IO.Error PUnit PUnit
        | EStateM.Result.ok a.5 a.6 =>
          let _x.7 := print a a.6;
          return _x.7
        | EStateM.Result.error a.8 a.9 =>
          return _x.4;
      cases b : EStateM.Result IO.Error PUnit PUnit
      | Bool.false =>
        let a.10 := 1;
        goto _jp.2 a.10 a.1
      | Bool.true =>
        let a.11 := 0;
        goto _jp.2 a.11 a.1