class StrLenFn
        super Fun1[String,Int]
        redef fun call(x)
        do
                return x.length
        end
end