O startofgen, endofgen, ingen,
& startofgen(num_var), endofgen(num_var), ingen(num_var),
logical ingen(NGENCOST)
ingen(num_var) = inday
ingen(num_var) = inmonth
ingen(num_var) = inyear