19.0.3 `util_find_substr'
-------------------------

util_find_substr(W,S)
     :  It returns the position of W in S.   If W cannot be found, it
     returns -1.   Arguments must be a list of ascii codes.

