$*********************************************      set basics
$
&device   -oecho no
&dimen -DIMEN METERS
&default -depth 31
$
$*********************************************      GEN. DATABASE
$
INMODEL
$
$*********************************************      DEFINE LINES
$
MEDIT
    ~norma b_cat 50 -tab_lim 300  -len 800 -dep 31 -botfri 5
    CONNECTOR  nor  ~norma  *avant   -ANC 180 350
END
$
$*********************************************      test
$
&conn @ -a_ten 100
&status f_connector
&conn @ -l_delta -1
&status f_connector
&conn @ -l_delta 2
&status f_connector
$
$*********************************************      all done
$
&fini