Update shader-lib.rkt

1e39 for Infinity overflows float.