Generate random variables with a specific hazard

Dear R-help: I am trying to re-produce the simulations
of Kosorok and Lin (1999) JASA, (The versatility of function-indexed
weighted log-rank test, 320-332).

I need help to generate random variables in R
with hazard function:

h(t) = 2*t*exp{ 0.96 * exp(-4*t^2) }

for t > 0. 

This is the alternative case B in their table 1 on page 326.

Thanks.


Mai Zhou