### master

Rec {
filter
  = \ @a_a7fl ds_dbZZ ds1_dc00 ->
      case ds1_dc00 of wild_X1 {
        Bin bx_ddsL x_a5bY l_a5bZ r_a5c0 ->
          case filter ds_dbZZ r_a5c0 of r'_a5c2 { __DEFAULT ->
          case filter ds_dbZZ l_a5bZ of l'_a5c1 { __DEFAULT ->
          case ds_dbZZ x_a5bY of {
            False -> merge l'_a5c1 r'_a5c2;
            True ->
              case reallyUnsafePtrEquality# l_a5bZ l'_a5c1 of {
                __DEFAULT -> link x_a5bY l'_a5c1 r'_a5c2;
                1# ->
                  case reallyUnsafePtrEquality# r_a5c0 r'_a5c2 of {
                    __DEFAULT -> link x_a5bY l'_a5c1 r'_a5c2;
                    1# -> wild_X1
                  }
              }
          }
          }
          };
        Tip -> Tip
      }
end Rec }