Prove weakening preserves reduction.

1 files changed, 4 insertions, 0 deletions

diff --git a/src/Core/Declarative.idr b/src/Core/Declarative.idr
index 2dd7933..8704e07 100644
--- a/src/Core/Declarative.idr
+++ b/src/Core/Declarative.idr
@@ -157,6 +157,7 @@ data TermConv where
 envWfRespEnvEq : EnvWf env1 -> EnvEq env1 env2 -> EnvWf env2
 typeWfRespEnvEq : TypeWf env1 a -> EnvEq env1 env2 -> TypeWf env2 a
 typeConvRespEnvEq : TypeConv env1 a b -> EnvEq env1 env2 -> TypeConv env2 a b
+export
 termWfRespEnvEq : TermWf env1 t a -> EnvEq env1 env2 -> TermWf env2 t a
 termConvRespEnvEq : TermConv env1 t u b -> EnvEq env1 env2 -> TermConv env2 t u b
 
@@ -265,18 +266,21 @@ termConvImpliesEnvWf (AppConv conv conv1) = termConvImpliesEnvWf conv
 
 -- Weakening Preservation ------------------------------------------------------
 
+export
 wknPresTypeWf :
   {0 env1 : Env sx} ->
   TypeWf env1 a ->
   EnvWf env2 ->
   IsExtension thin env2 env1 ->
   TypeWf env2 (wkn a thin)
+export
 wknPresTypeConv :
   {0 env1 : Env sx} ->
   TypeConv env1 a b ->
   EnvWf env2 ->
   IsExtension thin env2 env1 ->
   TypeConv env2 (wkn a thin) (wkn b thin)
+export
 wknPresTermWf :
   {0 env1 : Env sx} ->
   TermWf env1 t a ->