Replace Default <*> implementation for State.

Replaced with a specific implementation.
It speeds up a bit.
Here are some benchmarks with zipIndex from https://github.com/gmpl/FsControl/issues/22

--> Timing now on (Specific implementation)

>  zipIndex [1..10000] ;;
Real: 00:00:00.044, CPU: 00:00:00.046, GC gen0: 1, gen1: 0, gen2: 0
Real: 00:00:00.024, CPU: 00:00:00.031, GC gen0: 1, gen1: 0, gen2: 0
Real: 00:00:00.021, CPU: 00:00:00.015, GC gen0: 1, gen1: 0, gen2: 0

--> Timing now on (Default implementation)

>  zipIndex [1..10000] ;;
Real: 00:00:00.057, CPU: 00:00:00.062, GC gen0: 1, gen1: 0, gen2: 0
Real: 00:00:00.037, CPU: 00:00:00.031, GC gen0: 1, gen1: 0, gen2: 0
Real: 00:00:00.037, CPU: 00:00:00.031, GC gen0: 1, gen1: 0, gen2: 0