Packages

idris2

0.2.1-alpha.1
0.2.1-alpha.1

Erlang code generator for Idris 2

Current section

Files

Jump to
Readme
1 Version
0 Dependencies
Dependants
Files
Activity
idris2 src Idris.Idris2.Core.TT.Bounds.erl
Raw

src/Idris.Idris2.Core.TT.Bounds.erl 

-module('Idris.Idris2.Core.TT.Bounds').

-compile('no_auto_import').

-compile('inline').

-compile({'inline_size',24}).

-export([

  'un--sizeOf'/2

]).

'un--sizeOf'(V0, V1) -> case V1 of {'Idris.Core.TT.Bounds.None'} -> (fun () -> ('Idris.Idris2.Core.TT.SizeOf':'un--zero'('erased')) end()); {'Idris.Core.TT.Bounds.Add', E0, E1, E2} -> (fun (V2, V3, V4) -> ('Idris.Idris2.Core.TT.SizeOf':'un--suc'('erased', 'erased', 'erased', ('un--sizeOf'('erased', V4)))) end(E0, E1, E2)); _ -> ('erlang':'throw'("Error: Unreachable branch")) end.