!   TITLE:  t_ln_fillet_ln.mac (VERIFICATION)
!
!---------------------------------------------------------------------------
!   Rev -   02/12/2002  D. Edwards
!---------------------------------------------------------------------------
!
!   Test ln_fillet_ln.mac
!
!---------------------------------------------------------------------------

mod_assemb_prep

/prep7

kpvar=100

k,kpvar,0.1,0.1 !k,,1,1
k,1,3,3
l,kpvar,1

k,,0.1,1
k,,0.1,2
l,3,2

k,20,2,2,1

line1_=1
line2_=2
rfillet_=.25


ln_fillet_ln,1,2,.25

k,6,1,1,1
k,7,3,4,5
k,9,2,6,-2

l,6,7
l,7,9

line1_=4
line2_=5
rfillet_=.25

ln_fillet_ln,4,5,.25

k,50,-.5,0
k,51,-.5,1

l,50,51

ln_fillet_ln,2,7,.5