diff options
Diffstat (limited to 'src/Core/Declarative.idr')
| -rw-r--r-- | src/Core/Declarative.idr | 4 |
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 -> |