3 ! PR 47601: [OOP] Internal Error: mio_component_ref(): Component not found
5 ! Contributed by Rich Townsend <townsend@astro.wisc.edu>
7 module type_definitions
12 type, extends(matching) :: ellipse
14 end module type_definitions
16 module elliptical_elements
19 function line(e) result(a2n)
21 type(ellipse), intent(in) :: e
22 complex, dimension(e%N) :: a2n ! <- change "e%N" to "10"
27 use elliptical_elements