- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
I am not sure the pb is connected with one bug referenced on variables in the debugger. When defining a derived type in an include file so as:
INCLUDE File INC.F
TYPE T_SVD SEQUENCEINTEGER MxI,MxJ,MxK
COMPLEX,POINTER:: U(:,:),V(:,:),Z(:,:) REAL,POINTER:: S(:) END TYPE TYPE T_CBD SEQUENCE TYPE(T_SVD),POINTER:: R(:),Q(:) TYPE(T_A),POINTER:: P(:) END TYPECOMMON/
COM_Blck/Blk,CBD,CBI-------------------------------------------------------------------------------------
and using the values in a routine as follows
SUBROUTINE Test(...)
INCLUDE 'Inc.F'
ALLOCATE(Temp(CBD.R(p).MxK,CBI.Gamma(p).MxK)) Temp=MATMUL(TRANSPOSE(CBD.R(p).U),CBI.Gamma(p).U) FORALL(k=1:SVD1.Mxk) Temp(k,1:)=CBD.R(p).S(k)*Temp(k,1:) FORALL(k=1:SVD2.Mxk) Temp(1:,k)=CBI.Gamma(p).S(k)*Temp(1:,k) CBI.Pi(i).Z=CBI.Pi(i).Z-........
RETURN
END
the debugger says CBD is an undefined variable, although I know it is correctly allocated & working
The containt of CBD; for example CBD.R, ...cann't also inspected with the debugger. If such a type is definedinternally in the subroutine, it works correctly
Please answer
Thanks for your help
Link Copied
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Your Inc.F has a type T_CBD and a common for CBD but no declaration of CBD
type(T_CBD) :: CBD
Jim
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
![](/skins/images/DC0E2679F7049B943291D1ED082A478E/responsive_peak/images/icon_anonymous_message.png)
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page