"use strict"
var __createBinding =
  (this && this.__createBinding) ||
  (Object.create
    ? function (o, m, k, k2) {
        if (k2 === undefined) k2 = k
        Object.defineProperty(o, k2, {
          enumerable: true,
          get: function () {
            return m[k]
          }
        })
      }
    : function (o, m, k, k2) {
        if (k2 === undefined) k2 = k
        o[k2] = m[k]
      })
var __setModuleDefault =
  (this && this.__setModuleDefault) ||
  (Object.create
    ? function (o, v) {
        Object.defineProperty(o, "default", { enumerable: true, value: v })
      }
    : function (o, v) {
        o["default"] = v
      })
var __importStar =
  (this && this.__importStar) ||
  function (mod) {
    if (mod && mod.__esModule) return mod
    var result = {}
    if (mod != null)
      for (var k in mod)
        if (k !== "default" && Object.prototype.hasOwnProperty.call(mod, k))
          __createBinding(result, mod, k)
    __setModuleDefault(result, mod)
    return result
  }
Object.defineProperty(exports, "__esModule", { value: true })
exports.combine = exports.combine_ = void 0
const Function_1 = require("../../Function")
const BP = __importStar(require("../../Stream/BufferedPull"))
const T = __importStar(require("../_internal/effect"))
const M = __importStar(require("../_internal/managed"))
const definitions_1 = require("./definitions")
const unfoldM_1 = require("./unfoldM")
/**
 * Combines the elements from this stream and the specified stream by repeatedly applying the
 * function `f` to extract an element using both sides and conceptually "offer"
 * it to the destination stream. `f` can maintain some internal state to control
 * the combining process, with the initial state being specified by `s`.
 *
 * Where possible, prefer `Stream#combineChunks` for a more efficient implementation.
 */
function combine_(self, that, s, f) {
  return new definitions_1.Stream(
    M.map_(
      M.bind_(
        M.bind_(
          M.bind_(M.do, "left", () => M.mapM_(self.proc, (_) => BP.make(_))),
          "right",
          () => M.mapM_(that.proc, (_) => BP.make(_))
        ),
        "pull",
        ({ left, right }) =>
          (0, unfoldM_1.unfoldM)(s, (s) =>
            T.chain_(f(s, BP.pullElement(left), BP.pullElement(right)), (_) =>
              T.optional(T.done(_))
            )
          ).proc
      ),
      ({ pull }) => pull
    )
  )
}
exports.combine_ = combine_
/**
 * Combines the elements from this stream and the specified stream by repeatedly applying the
 * function `f` to extract an element using both sides and conceptually "offer"
 * it to the destination stream. `f` can maintain some internal state to control
 * the combining process, with the initial state being specified by `s`.
 *
 * Where possible, prefer `Stream#combineChunks` for a more efficient implementation.
 *
 * @dataFirst combine_
 */
function combine(that, s, f) {
  return (self) => combine_(self, that, s, f)
}
exports.combine = combine
//# sourceMappingURL=combine.js.map
