Print

---

Hello,

For a code such as:
type cg_solver
    real, dimension(:), allocatable :: x
end type cg_solver

type system
    type(cg_solver), POINTER :: solver=>NULL() ! LINE XXX
end type system

I get the following error:

  1648-S: "DualNewton.f90", line XXX: An initialized object solver shall not
be of a derived type containing an allocatable array as an ultimate
component.

Why??? Is there any way to initialize solver to a NULL pointer?

Thanks,
Aleksandar

_____________________________________________
Aleksandar Donev
http://www.pa.msu.edu/~donev/
[log in to unmask]
(517) 432-6770
Department of Physics and Astronomy
Michigan State University
East Lansing, MI 48824-1116
_____________________________________________