Function Count-String-Char-If

Part of:

package kmrcl
( count-string-char-if < pred > < s > )
Return a count of the number of times a predicate is true for characters in a string