# NOT RUN {
# create a geometric FastFieldDeletor
p<-FastFieldDeletor()
# set/get the second length parameter
setLengthParam2(p,0.5)
getLengthParam2(p)
# set/get the second length parameter via virtual field
p$lengthParam2<-0.2
p$lengthParam2
# }
Run the code above in your browser using DataLab