Example of nested entities using elm-postgrest

Nested.elm

import Task
import PostgRest exposing (..)


trainerResource =
    resource "trainer"
        { id = int "id"
        , name = string "name"
        }


pokemonResource =
    resource "pokemon"
        { id = int "id"
        , name = string "name"
        , base_experience = int "base_experience"
        , weight = int "weight"
        , height = int "height"
        }


type alias Pokemon =
    { id : Int
    , name : String
    }


type alias Trainer =
    { id : Int
    , name : String
    , pokemon : List Pokemon
    }


pokemonQuery =
    query pokemonResource Pokemon
        |> select .id
        |> select .name
        |> filter [ .id |> lte 151 ]
        |> order [ asc .id ]


trainerQuery =
    query trainerResource Trainer
        |> select .id
        |> select .name
        |> includeMany (Just 6) pokemonQuery
        |> filter [ .name |> eq "Ash" ]