sReplace - Haskell

Sanko · Febrero 26, 2014, 02:28:07 PM

Código: haskell

sReplace [] _ _ = []
sReplace sText nText final = if take (length nText) sText == nText
                        then final ++ (sReplace (drop (length nText) sText) nText final)
                       else [head sText] ++ (sReplace (tail sText) nText final)

ejemplo input y output:
input -> sReplace "soy un chico muy listo" "listo" "tonto"
output -> Soy un chico muy tonto

sReplace - Haskell

Sanko

Febrero 26, 2014, 02:28:07 PM Ultima modificación: Mayo 01, 2014, 09:17:40 AM por Expermicid