5. (8 points) Given the following search tree" datatype data Stree a = Sn ( STree a) a (Stree a) | Tp deriving (Show, Eq) The fold for search trees is: foldst g t (Tp) = t foldsT gt (Sn sl a s2) = g (foldsT g t sl) a (foldsT g t s2) 5. (8 points) Given the following search tree" datatype data Stree a = Sn ( STree a) a (Stree a) | Tp deriving (Show, Eq) The fold for search trees is: foldst g t (Tp) = t foldsT gt (Sn sl a s2) = g (foldsT g t sl) a (foldsT g t s2)