- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Link Copied
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Given that the filename ends with .f, that means it is interpreted as fixed-form source. You've asked this in the Fortran forum rather than the MKL forum, and I don't have the MKL samples handy, but I'd guess that there is a confusion between fixed and free form somewhere. The include file might be assuming free-form.
This is a rather old version of the product - if you need more help with MKL please ask in the MKL forum.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
The mkl_rci.fi file for the current MKL version (the one that came with PS2018U2) appears to be slightly different. It would help if you posted Line-158 and a couple of adjacent lines, given that you have an old version of MKL. These MKL include files have a format that makes them usable in both fixed and free format source. Make sure that the '&' marks at the ends of lines in mkl_rci.fi are at or beyond col. 73, and that the '&' marks at the beginnings of lines are exactly in col.6.
I built and ran the example with PS2018 with no hitches, but that is probably of little comfort to you.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
mecej4 wrote:Thanks for your comment. Line 158 of "mkl_rci.fi" is as below: 158 SUBROUTINE DCGMRHS_GET(n,x,nRhs,b,rci_request,ipar,dpar, & 159 & tmp,itercount) The "&" mark, in the beginning, is at line 6, and the end "&" mark is in Col 73. I need to include this library in my code as I want to embed my code into ABAQUS. Is there any way to include the code in a way that runs correctly, or modify the "mkl_rci.fi" file? I tried to modify the "mkl_rci.fi" file manually, but it is read-only.
The mkl_rci.fi file for the current MKL version (the one that came with PS2018U2) appears to be slightly different. It would help if you posted Line-158 and a couple of adjacent lines, given that you have an old version of MKL. These MKL include files have a format that makes them usable in both fixed and free format source. Make sure that the '&' marks at the ends of lines in mkl_rci.fi are at or beyond col. 73, and that the '&' marks at the beginnings of lines are exactly in col.6.
I built and ran the example with PS2018 with no hitches, but that is probably of little comfort to you.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
If you are describing the source correctly, that looks ok. Please create a ZIP with that file and the .f you are compiling and attach it to a reply here.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Steve Lionel (Ret.) wrote:Thanks Steve. Actually, I copied the "mkl_rci.fi" file content to another file, and removed the "&" marks at the end of lines. Then I replaced the modified file with the original, which resolved the problem.
If you are describing the source correctly, that looks ok. Please create a ZIP with that file and the .f you are compiling and attach it to a reply here.
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Oh, I wonder. What compiler options did you use? /extend_source by any chance?
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report Inappropriate Content
Steve Lionel (Ret.) wrote:
Oh, I wonder. What compiler options did you use? /extend_source by any chance?
I included the KLM library into VS console (Console> properties> Fortran> Libraries> /Qmkl:parallel). Then I modified the "mkl_rci.fi" file in the installed directory to be consistent with Fortran77 format.
- Subscribe to RSS Feed
- Mark Topic as New
- Mark Topic as Read
- Float this Topic for Current User
- Bookmark
- Subscribe
- Printer Friendly Page