Ok, my module looks like this:
MODULE TYPEDEFS
type geoms
character*80 name
integer ntot, material
integer, allocatable :: id(:)
end type
type (geoms), allocatable :: geom(:)
END MODULE
As said, this module is used in the main program and in all subroutines.
From...
I have the following problem:
- I use an allocatable structure, which is defined inside a module;
- the module is used in the main program, in "subroutine 1" and in "subroutine 2";
- from the main program sub1 is called, and in turn sub 1 calls sub2;
- inside sub2 I have lines like these...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.