module _ where

open import Agda.Builtin.Nat using (Nat; suc; _+_)

module M (n : Nat) where
  add40 add41 : Nat
  add40 = 40 + n
  add41 = suc add40

open M 1

testAdd40 testAdd41 : Nat
testAdd40 = suc add40
testAdd41 = add41

open import Agda.Builtin.Nat

test : Nat
test = M.add40 2
     + M.add41 1
     + add41
     + testAdd40
     + testAdd41
{-# COMPILE AGDA2LAMBOX test #-}
Debug λ☐ Rocq
  ↪  
WASM C OCaml CakeML Rust Elm
  ↪  
  ↪