Generating Survival Data from Exponential AFT Model in R

Question

I wish to generate a data set using the parameters found in an Exponential AFT Model (a survreg object)

E.g. say we have the following model

l