$line->{'subtype'} = 1; # line
$line->{'points'} = [ [0,0],[$max_date * $grid_X_size+150,0] ];
$line->{'forwardarrow'} = ['1', '1', '1.00', '60.00', '120.00'];
$fig->add ($line);
$line->{'subtype'} = 1; # line
$line->{'points'} = [ [0,0],[$max_date * $grid_X_size+150,0] ];
$line->{'forwardarrow'} = ['1', '1', '1.00', '60.00', '120.00'];
$fig->add ($line);