Как я могу выбрать какой-нибудь элемент для печати, например, здесь
TYPE mytype
INTEGER,DIMENSION(3) :: ints
REAL,DIMENSION(5) :: floats
CHARACTER,DIMENSION(3) :: chars
ENDTYPE mytype
TYPE(mytype) :: a
a%ints=[1,2,3]
a%floats=[1,2,3,4,5]
a%chars=['a','b','c']
WRITE(*,*)a
END
Я хочу создать другую матрицу со следующими элементами: первый элемент типа int, то есть ints (1), и второй элемент типа floats, т.е. floats (2)?