fact: Definition well_formed_perm ls := forall lsd, NoDup lsd -> (forall d, In d lsd -> ls#d = None) -> exists lsr, (forall r, In r lsr -> inRange ls r = false /\ In r (getSupport RndR)) /\ NoDup lsr /\ length lsd = length lsr.
imports: Crypto Permutation CompFold Array FCF State