Hi,
The IBM compiler I am using complains when I pass as an argument to a
subroutine
an item of a derived type which is itself a derived type. Is it right
to complain?
An example of what I am doing follows:
type freq
real :: start
real :: stop
real :: step
end type freq
type list
type(freq) :: freq1
type(freq) :: freq2
end type list
type( list ) :: mylist
.
.
.
call mysub( mylist%freq1 )
.
.
.
.
subroutine mysub( freq1 )
type(freq) , intent(inout) :: freq1
.
.
.
end subroutine mysub
|