"drawStory" <-
function(network,params,...) stop("No method defined for that class")