(defun splitz ()
  "changes arrays of the for z(ix(..)) to the form zx(ia(..)) so the z(memelen) array is replaced by shorter arrays"
  (interactive)
    (beginning-of-buffer)
    (replace-regexp "z\\((i\\)\\([a-z]*\\)(\\([a-z+1-]*\\)))" "z\\2(ia(\\3))" nil)
)