tlestang / heatcompact3d

3D heat equation with 6th order compact schemes
https://tlestang.github.io/heatcompact3d/
GNU General Public License v3.0
0 stars 1 forks source link

[nvfortran] Cannot initialise stencil nodes and coeffs from other stencil #5

Open tlestang opened 1 year ago

tlestang commented 1 year ago

MWE

ast error with nvfortran 22.5

module module_m
type :: mytype
    integer, allocatable ints :: ints(:)
contains
    procedure :: copy
end type mytype

contains

type(mytype) function copy(self)
    class(mytype), intent(in) :: self
    copy = mytype(self%ints)
end function copy
end module module_m