function before_last ($needle, $haystack)
        {
#-k     string  parse
#-      returns the part of $haystack before the last $needle
#-      before_last ('[', 'sin[90]*cos[180]');
#-              will return "sin[90]*cos"
#-c     biohazard dot ge at gmail dot com - https://www.php.net/manual/en/function.substr.php
#-d     2/11/21 Added

        return substr($haystack, 0, strrevpos($haystack, $needle));
        strrpos($haystack, $needle );
        };

?>