LucianU

fromIndex :: Int -> [a] -> Maybe a
fromIndex 0 (x:xs) =
    Just x
fromIndex index [] =
    Nothing
fromIndex index (x:xs) =
    fromIndex (index - 1) xs

LucianU

newtype Identity a =
    Identity { runIdentity :: a }
    deriving (Eq, Show)

newtype Compose f g a =
    Compose { getCompose :: f (g a) }
    deriving (Eq, Show)

instance (Functor f, Functor g) =>
        Functor (Compose f g) where

LucianU

require_relative 'boot'

require 'rails/all'

# Require the gems listed in Gemfile, including any gems
# you've limited to :test, :development, or :production.
Bundler.require(*Rails.groups)

module Voluntari
  class Application < Rails::Application