builder

var (
	// Default is the default builder
	Default = &Builder{method: O.Some(defaultMethod()), headers: make(http.Header), body: noBody}

	// BuilderMonoid is the [M.Monoid] for the [BuilderEndomorphism]
	BuilderMonoid = ENDO.Monoid[*Builder]()

	// Url is a [L.Lens] for the URL
	Url = L.MakeLensRef((*Builder).GetUrl, (*Builder).SetUrl)
	// Method is a [L.Lens] for the HTTP method
	Method = L.MakeLensRef((*Builder).GetMethod, (*Builder).SetMethod)
	// Body is a [L.Lens] for the request body
	Body = L.MakeLensRef((*Builder).GetBody, (*Builder).SetBody)
	// Headers is a [L.Lens] for the complete set of request headers
	Headers = L.MakeLensRef((*Builder).GetHeaders, (*Builder).SetHeaders)

	// WithMethod creates a [BuilderBuilder] for a certain method
	WithMethod = F.Flow2(
		Method.Set,
		ENDO.Of[func(*Builder) *Builder],
	)
	// WithUrl creates a [BuilderBuilder] for a certain method
	WithUrl = F.Flow2(
		Url.Set,
		ENDO.Of[func(*Builder) *Builder],
	)
	// WithHeaders creates a [BuilderBuilder] for a set of headers
	WithHeaders = F.Flow2(
		Headers.Set,
		ENDO.Of[func(*Builder) *Builder],
	)
	// WithBody creates a [BuilderBuilder] for a request body
	WithBody = F.Flow3(
		O.Of[IOE.IOEither[error, []byte]],
		Body.Set,
		ENDO.Of[func(*Builder) *Builder],
	)
	// WithContentType adds the content type header
	WithContentType = WithHeader("Content-Type")

	// WithGet adds the [http.MethodGet] method
	WithGet = WithMethod(http.MethodGet)
	// WithPost adds the [http.MethodPost] method
	WithPost = WithMethod(http.MethodPost)
	// WithPut adds the [http.MethodPut] method
	WithPut = WithMethod(http.MethodPut)
	// WithDelete adds the [http.MethodDelete] method
	WithDelete = WithMethod(http.MethodDelete)

	// Requester creates a requester from a builder
	Requester = (*Builder).Requester

	// WithoutBody creates a [BuilderBuilder] to remove the body
	WithoutBody = F.Pipe2(
		noBody,
		Body.Set,
		ENDO.Of[func(*Builder) *Builder],
	)
)