Lines Matching defs:components

106 subroutine components(n)  subroutine
107   integer, intent(in) :: n  local
108   real, target, save :: a1(3)
109   real, target :: a2
110   real, save :: a3
111   real, target, save :: a4
112   type :: t1
116   type :: t2(kind, len)
141   type(t2(3,2)) :: o1
142   type(t2(2,n)) :: o2
143   type :: t3
146   type(t3), save, target :: o3
147   real, pointer :: p10 => o3%x