funext
K : Type
inst✝⁹ : RCLike K
m : Type → Type
m' : outParam (Type → Type)
inst✝⁸ : Monad m
inst✝⁷ : Monad m'
inst✝⁶ : FwdDerivMonad K m m'
inst✝⁵ : LawfulMonad m
inst✝⁴ : LawfulMonad m'
S : Type
inst✝³ : Vec K S
X : Type ?u.45496
inst✝² : Vec K X
Y : Type ?u.45507
inst✝¹ : Vec K Y
Z : Type ?u.45518
inst✝ : Vec K Z
⊢ fwdDerivValM K get = get
case h
K : Type
inst✝⁹ : RCLike K
m : Type → Type
m' : outParam (Type → Type)
inst✝⁸ : Monad m
inst✝⁷ : Monad m'
inst✝⁶ : FwdDerivMonad K m m'
inst✝⁵ : LawfulMonad m
inst✝⁴ : LawfulMonad m'
S : Type
inst✝³ : Vec K S
X : Type ?u.45496
inst✝² : Vec K X
Y : Type ?u.45507
inst✝¹ : Vec K Y
Z : Type ?u.45518
inst✝ : Vec K Z
x✝ : S × S
⊢ fwdDerivValM K get x✝ = get x✝