I had VF 13.0 working fine in VS 2010.
I installed VS 2015 Community with C++ custom install, used it ok.
I bought and installed Composer 2016 Update 1, said it installed fine in both 2010 and 2015 VS.
Now VS 2015 won't launch at all, just a blink when clicked. Note VS 2015 on drive E, 2010 on drive C if it matters (shouldn't).
Any ideas, now my VS 2015 borked...
Thanks, Ian
I've written a 3D finite difference diffusion code in Microsoft Visual studio and I need to output the concentrations are certain time step values. I need multiple output files that include the concentration array in the domain for specific time steps throughout the program. The format I have right now is listed below.
open(71,file='Conc.out',status='unknown')
if(NumTS.eq.TS)then
do k=1,NZ
do j=1,NY
do i=1,NX
m=i+(j-1)*NX+(k-1)*NX*NY
write (71,'(TS)',ADVANCE = "NO")TS
write (71,'(TS)',ADVANCE = "NO")Cold(m)
end do
end do
end do
end if
close(unit=71)
NumTS is the time step value I wish to output i.e NumTS=100,150,200 etc. TS is the updated time step value that has an increase in time step size added to the previous time step value that is included in the main loop i.e 50 is added each time. So my desired output files would be Conc100.out, Conc150.out and so on. OR how can I output the concentrations for each time step in one file that is column listed. Any help would be awesome! Thanks.
Note: This output command is within a subroutine and Cold(m) is the concentration array
I have a couple of fortran dll's (Intel® Parallel Studio XE 2016 Update 1 Composer Edition for Fortran Windows) that get loaded into a c++ program. After they're done I'd like to unload the dll's. One of them unloads fine. The other won't. Even if I put the whole operation on a separate thread, doing the FreeLibrary and closing the thread, still leaves the one dll (and the dll's that it loads) attached to the process.
For the dll in question I tried doing a FreeLibrary right after the LoadLibrary, and it still fails.
So, what's making the dll so "sticky" and what can I try to fix it?
Hello,
The following code prints out 10 as the size of the ALLOCATABLE array after the array is deallocated. Is this the correct behavior or a compiler bug? I am using the latest version of the Intel Fortran compiler.
Thanks for any clarification.
PROGRAM Main
IMPLICIT NONE
INTEGER,ALLOCATABLE :: iTestArray(:)
WRITE (*,*) SIZE(iTestArray)
ALLOCATE (iTestArray(10))
WRITE (*,*) SIZE(iTestArray)
DEALLOCATE (iTestArray)
WRITE (*,*) SIZE(iTestArray)
END
Hi
I am working on VS2010 mixed-programing and use the Intel Compiler / VisualStudio (Intel Parallel 2015) to compile my project in VS 2010.
Console - c source:
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
#include <string.h>
//#define readfile readfile_
extern void readfile(char*, int*);
int main()
{
int n, count;
char Fname[9];
char Name[10];
strcpy(Fname,"AMIN.for");
fprintf( stderr, "%s\n", Fname);
readfile( Fname, &n , strlen (Fname));
fprintf( stderr, "n = %d\n", n);
// fprintf( stderr, "%s\n", Name);
getch();
return 0;
}Subroutine - Lib fortran:
subroutine readfile( fname1, m )
character fname1*(*)
integer m
integer iounit,i
iounit=15
write(*,*) fname1
c10 format (a9)
open(iounit,file = fname1,action='read')
read (iounit,*) m
c20 format (i10)
write(*,*) m
close(iounit)
return
end subroutine
I change setting to "lower Case" (Lib1:properties->fortran->External Procedure) and my project return "n=10" and I don't have a problem, BUT in this line I have a question
readfile( Fname, &n, strlen(Fname) );
I want to change that line. I want compile without strlen like:
readfile( Fname, &n );
When i comiple my project,it can not open and return the contents of My file(AMIN.for).
I change setting for "Lib1" in property page->fortran->External Procedure :
" Calling conversion ----> (from "default" to "STDCALL") "
and I compile it again but it can not return the contents that I want(n=10).
I want to passed force from string lenght argumet with change setting or define a little function(any trick!).
how to do it?
excuse me for bad spelling
| Attachment | Size |
|---|---|
Download Screenshot (54).png | 140.15 KB |
Suppose we have:
integer(4) x,y
integer (8) z
z=x*y
In almost all cases, the result will be wrong, in fact, more than 99.9999 percent of the
time, since the compiler does not understand that the result can be more than 4 bytes.
This wrong result is not detected, since apparently the compiler does not check for an overflow.
At least, not on the INTEL compiler, although in my work at Aerospace and JPL IBM 7094
main frames, it did tell you about the overflow.
so to avoid this, I have to say:
z=int(x,8)*y
Is there a simpler way around this? Maybe the compiler people should take a serious look at this.
You see the same problem with INTEGER(1) AND INTEGER(2) variables, BTW...........
As well as with the ADD operator. seems like an overflow check would be a simple answer,
though it does slow down things. So maybe as an option ?
I am converting a program from Fortran 10 to fortran 16 (evaluation version at the moment) in Windows 10.
Most things have converted well but I am having problems with a bitmap routine (based on a routine that Steve Lionel gave me many years ago).
I have solved most of the problems, e.g. handles but when I call StretchDibit it give me a fortll severe (157) program exception, access violation error.
As far as I can see the values of all of the variable seem fine ...but obviously they are not. Below are the pertinent bits of code.
type (T_BITMAPFILEHEADER) :: pbmfh
pointer (pheader, pbmfh)
integer(4) pBits
type (T_BITMAPINFO) bits
pointer (lpbits, bits)
!
! Read Bitmap file
!
if (pheader /= 0) call free(pheader)
iret = GetBitMap('Temp.bmp'C)
iret = DeleteFile('Temp.bmp'C) ! Delete temporary .bmp file.
if (iret > 0) then
lpbits = pheader + sizeof(pbmfh)
pBits = pheader + pbmfh.bfOffBits
else
Stop ' Error with reading bitmap'
c PrintWin = PW_ERR_READBITMAP ! Failed to read bitmap file.
c goto 9999
end if
if ( bits.bmiHeader.biSize /= 40) then
Stop ' Bitmap header is the wrong size'
c PrintWin = PW_ERR_READDIBHEADER ! Bitmap header is wrong size.
c goto 9999
end if
iret = StretchDIBits (Trevhdc, 0, 0, cxPage, cyPage, 0, 0,
& cxDib,cyDib, pbits, bits, DIB_RGB_COLORS, SRCCOPY)
Trevhdc is a handle and is correct.
My program requires some dll files, which I install with
w_fcompxe_redist_ia32_2013_sp1.1.139.msm
with Advanced Installer. The user has to run the msi file, and then the program works. This runs on XP, and Windows 7. I upgraded some W7 PCs to W10, and the program still works. So far, so good.
But if I install everything on a new W10 machine that has never seen my program before, I get a message that the program cannot start because libifcoremd.dll (and three others) are missing. But the files are indeed on the machine in
C:\Program Files (x86)\Common Files\Intel\Shared Libraries\redist\intel64\compiler.
I checked them, and deselected the read-only attribute, but they still don't work. Any ideas?
I have been successfully using R 3.2.2 to call a DLL created with Intel Visual Fortran (w_fcompxe_2013.6.204), under Windows 7. However, when I try to repeat this on another Windows 7 machine (without Visual Fortran installed), I get the message "This program can't start because libifcoremd.dll is missing from your computer. Try reinstalling the program to fix this problem."
The DLL was built in "release" configuration so it's not that. It looks from previous Forum replies like what I need is the "redistributable libraries". I downloaded w-fcompxe-redist-msi-2013.5.198.zip, ran the installer package w_fcompxe_redist_ia32_2013.5.198, and rebooted. The libifcoremd.dll is now present in C:\Program Files (x86)\Common Files\Intel\Shared Libraries\redist\ia32\compiler - but I still get the same error message. Any ideas?
The OS is Windows 7. I go to control panel, "Uninstall a program", double click on the name as above and nothing happens.
If I go to "Start","All Programs", "Intel Parallel Studio XE 2016", I see "Getting Started..", "Intel Software Manager", no uninstall program.
Any help greatly appreciated.
Thanks
Hi All,
I recently met a problem with error message "error #6457: This derived type name has not been declared. [DRTYP]" in my code.
module derivetypetest
implicit none
!DEC$ IF DEFINED (abc)
type StringPointer
character (len=1), pointer :: sp
end type StringPointer
!
type drtyp
integer dim, size
integer (kind=IntKind), pointer :: array(:,:)
end type drtyp
!DEC$ ELSEIF DEFINED (def)
type drtyp
integer size
integer (kind=IntKind), pointer :: array(:)
end type drtyp
!
character (len=1), private, allocatable :: whatever(:)
!DEC$ ENDIF
private :: drtyp
type(drtyp), private:: drtyparr(5)
end module derivetypetest
A workarround I used is that I put
private :: drtyp
type(drtyp), private:: drtyparr(5)in !DEC$ IF and !DEC$ ELSEIF.
May I ask if there's other option to keep the codes in the original form?
Hello,
I am a student, I was searching for Intel Fortran compiler version 12.0 but I was not able to find it, can you please tell me where can I find this version because my work only can be done by this version.
Thank you
Zhina
It seems that the following code produces all kinds of weird, non-repeatable results. The code was compiled with 16.0 and run in debug (x64) mode, while 'Enable F2003 Semantics' was set to either yes or no.
When 'Enable F2003 Semantics' is set to 'no' (which should, I believe, lead to an error on line 9), no error is encountered at all.
When 'Enable F2003 Semantics' is set to 'yes', results are non-repeatable (access violations, or array on image 1 showing only 0s, etc.)
PROGRAM TEST
IMPLICIT NONE
TYPE T
INTEGER,ALLOCATABLE :: A(:)
CHARACTER(LEN=2) :: S
END TYPE T
TYPE(T) :: U[*]
IF (THIS_IMAGE()==2) THEN
U%A = [1,2,3]
U%S = 'AB'
WRITE(*,*) U
END IF
SYNC ALL
IF (THIS_IMAGE()==1) THEN
WRITE(*,*) SIZE(U[2]%A)
U = U[2]
WRITE(*,*) U
END IF
END PROGRAM TEST
I am trying to compile an MPI application using Intel Fortran (Parallel Studio XE 2011 with VS2010) and MS-MPI. I have been able to successfully compile using 32-bit MS-MPI libraries. The following settings (changes from defaults) are what I used.
Visual Studio Project Creation
Project Settings
I was able to build project in both debug and release mode and successfully run the application. The MPI execution and output are below.
C:\MPITest\MPITest_win32\Release>mpiexec -n 4 MPITest_win32.exe
Hello from task 3 on <my-computer-name>
Hello from task 0 on <my-computer-name>
Hello from task 2 on <my-computer-name>
Hello from task 1 on <my-computer-name>
MASTER: Number of MPI tasks is: 4
When I try to compile using the 64-bit libraries that MS-MPI provides, I am able to compile the project successfully. However, when I execute the program, I get the following error.
"The procedure entry point mpi_pack_size__ could not be located in the dynamic link library msmpi.dll".
I have verified that this entry point is tabluated in msmpi.dll using Dependency Walker. See attached images. The function entry point is listed in both Parent Import and Export function list, so, I do not understand why windows is throwing an error message.
Thanks & regard,
Sampath
| Attachment | Size |
|---|---|
| DownloadMSMPI_X64_ERROR.PNG | 8.26 KB |
| DownloadMSMPI_Import_Export_EntryPoints.PNG | 72.39 KB |
hola,
llevo ya un par de semanas programando en visual studio 2010 de windows en fortran 90, descargado de aqui, no he tenido ningun problema a la hora de compilar, pero hoy he ido a compilar un programa y me decia que no tenia la licencia de intel para compilar, me urge respuesta ya que tengo que seguir programando para un examen próximo que tengo, gracias.
I want to call c library function atof from my fortran program. I m using VS 2008. What would be the syntax for such a calling?
Also i have another c program with its .h nd .cpp files. How to call such a program from fortran? Would that be saved as separate VS project ?
Please advice.
I added a function (CKSUM) to this F90 file, now it wont compile.
Does this violate a rule? Why would it not say so, rather than giving me
"internal compiler error" ?
| Attachment | Size |
|---|---|
| Downloadlongmul.f90 | 1.73 KB |
Hi,
I just installed 30 day trial version of Intel Parallel Studio XE 2015 for Professonal Edition Fortran. Before I install this fortran, I installed MS Visual Studio 2012 Express version. Now I am trying to link the fortran compiler to another engineering software called ABAQUS. To link it, I need to run "ifortvars.bat" to set up the environments. What I did I go to the Path "C:\Program Files (x86)\Intel\Composer XE 2015\bin" from cmd command line and then type "ifortvars.bat". But if I do it, it gives error such as
****************************************
<arch> mush be is onethe following:
......
<vs> must be one of the following:
.......
*****************************************
Then I checked ifortvars.bat file and I found
*****************************************
set TARGET_VS=
set TARGET_ARCH=
set C_TARGET_ARCH=
set LP64_ILP64=
set QUIET=
************************
and the options are all empty. I tried to put Target_vs=vs2015 and Target_arch=intel64. It shows error
*************************
Syntax:
mklvars.bat <arch> [MKL_interface] [mod]
<arch> mush be one of the following
ia32 : ....
intel64:....
*************************
Now I don't know how to solve it. Could someone help me on this? Thanks.
Xu
I am currently running XE 2013 and have been compiling code for 32 and 64 bit. When running in the debug mode, I can not view any of the variables as I step thru the code. I can when using 32 bit. I have seen some threads that discuss this issue but not any solutions. I have gone thru a uninstall and reinstall. I am currently running SP! 5.239. Is there a patch that fixes this issue?
Hi,
I have searched around this issue quite a lot but non of the suggestions seem to solve my problem. I am evaluating whether some old Compaq Visual Fortran code that we have can be built in Intel Visual Fortran on VS2013. The project loads and VF seems to understand the project structure however when I build it I get a lot of LNK2001 errors and a LNK1120: 117 unresolved externals. The project builds a DLL from Fortran routines
The project has a DEF file
LIBRARY XXSUBS EXPORTS ASBEEP ASCURS ASCOL ASGET ...
Some of these routines are Fortran subroutines and some are ENTRY's in other subroutines
ENTRY ASGET (IFLD, MAXLEN, LENC, CHARS)
All the code seems to compile OK but I am at a loss as to why I get the Linker errors when as far as I can see all the Exported routines in the DEF file seem to have built and be available to the linker. Any ideas?