p_strSubstr [I offset, I length, Str input] = Just $ Str (take length (drop offset input))
p_strSubstr [I offset, I length, Str input] = Just $ Str (take length (drop offset input))
p_strSubstr [I offset, I length, Str input] = Just $ Str (take length (drop offset input))