# NOT RUN {
# create an Event object
e<-Event()
# set a generator process for e
setProcess(e,Process())
# get generator process
e$process
# set process via virtual field
e$process<-K80()
e$process
# }
Run the code above in your browser using DataLab