!***************************************************************
! TRIM_RV2     / 1997-02-07 /                     
! Create Special Cross Section      
!***************************************************************
!
FlangeU =  #FLANGE_U#
FlangeA1 =  #FLANGE_A1#
FlangeA1 =  #FLANGE_A1#
Web = #WEB#
Lip = #LIP#
AngleU = #ANGLE_U#
!
point(1) 



cline(1) B/2,H/2,B/2,-H/2,-B/2,-H/2,-B/2,H/2
hatch L1
!
!Sb