A RetroSearch Logo

Home - News ( United States | United Kingdom | Italy | Germany ) - Football scores

Search Query:

Showing content from https://agda.github.io/agda-stdlib/master/Codata.Sized.Covec.Effectful.html below:

Codata.Sized.Covec.Effectful

Codata.Sized.Covec.Effectful
------------------------------------------------------------------------
-- The Agda standard library
--
-- An effectful view of Covec
------------------------------------------------------------------------

{-# OPTIONS --cubical-compatible --sized-types #-}

module Codata.Sized.Covec.Effectful where

open import Codata.Sized.Conat using (Conat; zero; suc)
open import Codata.Sized.Covec using (Covec; _∷_; []; map; replicate; ap)
open import Effect.Functor using (RawFunctor)
open import Effect.Applicative using (RawApplicative)

functor :  { i n}  RawFunctor {}  A  Covec A n i)
functor = record { _<$>_ = map }

applicative :  { i n}  RawApplicative {}  A  Covec A n i)
applicative = record
  { rawFunctor = functor
  ; pure = replicate _
  ; _<*>_  = ap
  }

RetroSearch is an open source project built by @garambo | Open a GitHub Issue

Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo

HTML: 3.2 | Encoding: UTF-8 | Version: 0.7.4