Есть ли единообразный способ поиска по базам и по спискам в F#?

@alechka · Регистрация: 28.03.2013

Author24 — интернет-сервис помощи студентам

Пытаюсь понять, можно ли сделать одинаково поиск по спискам и по базе через сабж? То есть примерно как в C#. где я могу написать:

C#

1	var result = Adverts.FirstOrDefault(z => z.AdvertId == 1);

Adverts в теории IEnumarable/IQuerable.

в итоге в базу уйдёт запрос с SELECT TOP(1) ....

При попытке написать на F#

F#

1	let result = Adverts \|> Seq.tryFind(fun x-> x.AdvertId = 1)

у меня тянется вся база, а потом на клиенте выбирается первый элемент.

Можно ли как-то этого избежать без использования Type Providers с их кривым и громоздким синтаксисом?

@pycture · 06.04.2013, 10:00

F#

1	let result = Adverts.FirstOrDefault(fun z -> z.AdvertId = 1)

работает?

@alechka · 06.04.2013, 13:42 **[ТС]**

Сообщение от pycture

F#

1	let result = Adverts.FirstOrDefault(fun z -> z.AdvertId = 1)

работает?

Что удивительно, но да (причём вчера почему-то аналогичный текст не сработал вылетая с ошибкой о невозможности invoke function. Скорее всего что-то нужное из библиотек не подключил). Точнее рабочий код такой:

F#

1	let result = Adverts.FirstOrDefault(fun (z:Advert) -> z.AdvertId = 1)

конечно после с# выглядит криво, но терпимо.

@pycture · 07.04.2013, 09:29

Сообщение от alechka

F#

1	let result = Adverts.FirstOrDefault(fun (z:Advert) -> z.AdvertId = 1)

конечно после с# выглядит криво, но терпимо.

Чтоб не было криво надо писать в декларативном стиле, типа того

F#

1
2
3

let AdvertIdEq x (z:Advert) = z.AdvertId = x
..............................
let result = Adverts.FirstOrDefault (AdvertIdEq 1)

	07.04.2013, 09:29

Опции темы