Quantcast
Channel: Intel® Software - Intel® Visual Fortran Compiler for Windows*
Viewing all 5691 articles
Browse latest View live
↧

Automatic bug fixing for intel fortran?

May 4, 2018, 5:36 am
$
0
0

I have just read this wikipedia article (https://en.wikipedia.org/wiki/Automatic_bug_fixing) about automatic bug fixing in software engineering. It piqued my interest, and so I would like to investigate similar possibilities for Intel Fortran. In our company we have a test suite which compares test file output to existing reference files. When tests fail it is usually required for the testing engineer to go back and revert changes until they find the sub-change which cause a particular test to fail. A decision is then made with respect to how the sub-change needs to be modified to accomodate the test.

As you can imagine this is often a tedious and sometimes impossible process, especially when the testing engineer knows little about the nature of the changes made.

How can I get started on automatic patch generation/automatic bug fixing/fault localization in Intel Fortran? Do any such tools exist? Also our 'bugs' are not Fortran syntax bugs in the true sense of the term, they are really cases where a change (which otherwise allows the code to continue functioning smoothly) causes a deviation in numerical results for a particular test.

↧
Search

warning #5105: PAGE directive statement not supported

May 4, 2018, 7:37 am
$
0
0

Hi,

I am trying to compile a legacy (Fortran/C/Assembly) project but I am getting the following:

---------------------------------------------------------------------------------------

warning #5105: PAGE directive statement not supported

---------------------------------------------------------------------------------------

Please advise.

 

Regards,

↧
↧

Please check the error.

May 8, 2018, 7:50 pm
$
0
0

In my Result,

  SPRING WIRED DIAMETER d3(mm) =   0.0000000E+00
  SPRING DIAMETER D3(mm) =   0.0000000E+00
  SPRING WIRED DIAMETER d4(mm) =   0.0000000E+00
  SPRING DIAMETER D4(mm) =   0.0000000E+00

  NUMBER OF ACTIVE TURNS OF 3RD SPRING =             NaN
  NUMBER OF ACTIVE TURNS OF 4TH SPRING =             NaN

So, How do I Fix it?

If you need fortran file, I will email to you

↧

GetFileInfoQQ

May 9, 2018, 7:42 am
$
0
0

I am trying to use the GetFileInfoQQ function to get the information relating the files including the size. Unfortunately if the files are large the file size is returned as -1. This seems to occur when the number of bytes in the file is greater than the integer(4) variable component limit is exceeded. Is there a work round for this? It would be great if the file size units could be specified. These days MB or even GB would seem more appropriate than bytes. Alternatively integer(8) components could be an option in a similar function GetFileInfoQQEx.

Thanks

Steve

 

↧

error #10052 - license issue

May 9, 2018, 8:14 am
$
0
0

I am attempting to create a .dll with a batch file. Everything else with batch file works except for this part. I keep getting this error:

Error: A license for FCompW is not available now (-15,10,10061).
 A connection to the license server could not be made.  You should
 make sure that your license daemon process is running: both an
 lmgrd.exe process and an INTEL.exe process should be running
 if your license limits you to a specified number of licenses in use
 at a time.  Also, check to see if the wrong port@host or the wrong
 license file is being used, or if the port or hostname in the license
 file has changed.
 License file(s) used were (in this order):
     1.  Trusted Storage
     2.  C:\Program Files (x86)\Common Files\Intel\Licenses\w_HJTBRLFR.lic
     3.  C:\Program Files\Common Files\Intel\Licenses
     4.  c:\PROGRA~2\intel\COMPOS~1\bin\ia32\*.lic
 Please visit http://software.intel.com/sites/support/ if you require technical assistance.
 ifort: error #10052: could not checkout FLEXlm license

I checked out services and it seems FLEX keeps stopping itself. In event viewer, you can see where the process of the making the .dll crashed. 

↧
↧

Diffrence between DVF and Intel Fortan compiler XE 12.1

May 11, 2018, 1:38 am
$
0
0

Hi,

Currently I am using Intel Fortran Compiler XE 12.1 (Parallel Studio XE 2010 with VS 2010) to edit  the source code of RT3D (A ground water modelling software). But  the manual of the software says to use Digital Visual Fortran.

Could I please know the difference between the compiler I am using and Digital Visual Fortran?

Many Thanks

Subhani

↧

Cannot disable Fortran error message 7615

May 11, 2018, 8:50 am
$
0
0

I have a legacy application that needs to be integrated into a larger application. 

We have updated our development lab to Visual Studio 2017 and IFORT18, and are running into a problem.

Code that has compiled successfully for 4 decades has started throwing an error.  I cannot change this code module as it has been independently Verified and Validated, so inclusion in other code is fine.  Changing it is not. As the code is proprietary, I cannot show it here, but I was able to duplicate the problem in a small example (yes I know it's bad FORTRAN form ... It was valid at the time, and has passed IV&V)

I need to know what flag to set in visual studio to allow this code to compile under VS2017 and IFORT18.  It worked correctly on VS2010 and IFORT16.

----------------------   code and errors below -----------------------

C EQUIVELENCE BLOCK TEST

subroutine bar

COMMON / FOO / X1, Y1, Z1, X2

DIMENSION TEST(30)

EQUIVALENCE ( X1,TEST( 1) ), (Y1, TEST (3)),

2 (Z1, TEST (5)), (X2, TEST( 6))

END

Source1.for(10): error #7615: Multiple objects from the same EQUIVALENCE set may not appear in a COMMON block. [TEST]

Source1.for(11): error #7615: Multiple objects from the same EQUIVALENCE set may not appear in a COMMON block. [TEST]

Source1.for(11): error #7615: Multiple objects from the same EQUIVALENCE set may not appear in a COMMON block. [TEST]

 

 

 

↧

Debug symbol is inactivated when opening files

May 11, 2018, 8:49 pm
$
0
0

Dear all seniors and friends,

First I want to say warm greeting to everyone. I already started working with fortran, but when I open a code, the Debug Symbol is inactivated, and it the Attach Symbol appears instead. Does anyone know this problem and how to solve it?!

Thanks all.

With gradtitude.

 

↧
Search

Visual Studio 2017 (error, related with integrate)

May 12, 2018, 7:16 am
$
0
0

Good afternoon, comrades!

Execuse me, if offtopic. How i can integrate Parallel XE 2019 with Visual Studio 2017 (latest version)?

 

If it impossible, please, tell me how to set up MPI for Fortran in VS 2015/2017? (XE2018/2019)

I've just get this warning and nothing else (picrelated)

 

---------------------------------------------------------------------------------------------------------------

Thread closed. The question is solved. XE 2019 integrated with installation

↧
↧

error #7983: The storage extent of the dummy argument exceeds that of the actual argument. [G]

May 13, 2018, 6:59 pm
$
0
0

Error: the storage extent of the dummy argument exceeds that of the actual argument [G]

Hi everybody, could someone help me,

I'm designing a spring, but I don't know where the error ocurred.

AttachmentSize
Downloadapplication/octet-streamcase3.for22.18 KB
↧

random_seed() in parallel coarray / MPI Fortran programming

May 13, 2018, 10:49 pm
$
0
0

What is the best method of ensuring good different seed vector values for the Fortran intrinsic procedure

random_seed()

corresponding to each coarray image in Fortran programs? Any help or suggestions is greatly appreciated. By "good", I mean seeds that do not result in highly correlated or identical pseudo-random sequences on different images.

↧

Passing an array of strings from VBA to Fortran DLL

May 13, 2018, 12:47 pm
$
0
0

Hi,

I have difficulties getting the DLL to read my array of strings. The following declaration is given in VBA:

    Public Declare Sub fortran_dll Lib "path_to_dll" _
    (ByVal array1 As String, ByRef array2 As Integer, ByRef array3 As Double, _
    ByRef array4 As Integer, ByRef array5 As Double)

The following attributes are given in Fortran:

    !dec$ attributes dllexport, stdcall, reference, alias: "fortran_dll" :: fortran_dll
    !dec$ attributes reference :: input_characters, input_integers, input_reals
    !dec$ attributes reference :: output_integers, output_reals

Is there a guide or procedure for how to make this work? I manage to read the integers and doubles, so the trouble is only linked to the strings. Can anyone help me?

\Carl

↧

IVF 2018: Invalid Signature on .vsix components

May 14, 2018, 12:01 pm
$
0
0

Hello all,

I am trying to Install IVF 2018 on two offline systems. I am getting an "Invalid signature" error when the VS 2017 Integration components are trying to be installed (.vsix extensions). I already tried step #1 and #8 from this link https://software.intel.com/en-us/articles/intel-software-development-tools-integration-to-vs2017-issue​ . The components that are failing are CPUSideRDM_VSIX_V15.vsix on Win7 and Intel.CommonToolsPkg.vsix on Win10 located under the IntelSWTools folder. I do see the COMODO and the Intel CA certs already installed.

Any ideas on what cert or step I am missing?

Thank you!

JP

 

 

 

↧
↧

Deepcopy function in Fortran

May 15, 2018, 12:54 pm
$
0
0

Hi,

Is there a function in fortran that is similar to Deepcopy in Python?

Thanks!

SKBALD

↧

Fortran display screem in MS Visual Studio

May 15, 2018, 6:07 pm
$
0
0

When writing Intel Fortran code in MS Visual Studio, the ‘write-to-screen‘ commands (Print & Write) display info on the ‘white-letters-on-black-background’ display screen. In both my VS 2015 and old VS 2010 the default limit on that display screen’s pages is 5, I believe. To increase that number of pages seems straightforward in 2015 by increasing “Buffer Size” & “Number of Buffers”. However, that does not work in my old VS 2010 installation. Does anybody remember how to increase those pages in VS 2010? TO1Flyer

↧
Search

Abaqus 6.14-2 Link with Fortran Compiler (2018XE)

May 15, 2018, 9:26 pm
$
0
0

Hello, 

I tried to link abaqus 6.14-2 with visual studio 2015 and intel parallel XE 2018-update2

When i run in abaqus command abq6us verify -all

 

The error is always present in abaqus user soubroutine section of standard and explicit. 

I have followed steps provided in earlier discussion pages here at intel forums and researchgate but my problem can't be solved 

Looking forward for help.

 

Error log 

 

Abaqus JOB xpl_user_sp
Abaqus 6.14-2
Abaqus License Manager checked out the following licenses:
Abaqus/Explicit checked out 5 tokens from Flexnet server hh003.ad.edu
<20 out of 25 licenses remain available>.
Begin Compiling Single Precision Abaqus/Explicit User Subroutines
5/16/2018 1:08:27 PM
Intel(R) Visual Fortran Intel(R) 64 Compiler for applications running on Intel(R) 64, Version 18.0.2.185 Build 20180210
Copyright (C) 1985-2018 Intel Corporation.  All rights reserved.

End Compiling Single Precision Abaqus/Explicit User Subroutines
Begin Linking Single Precision Abaqus/Explicit User Subroutines
   Creating library explicitU.lib and object explicitU.exp
explicitU_static.lib(SMASpxU_XP_IF.obj) : error LNK2019: unresolved external symbol __imp__putenv referenced in function "void __cdecl SMABasOmniSetSSELevel(void)" (?SMABasOmniSetSSELevel@@YAXXZ)
explicitU_static.lib(SMASpxU_XP_IF.obj) : error LNK2019: unresolved external symbol __imp_printf referenced in function "void __cdecl SMABasOmniSetSSELevel(void)" (?SMABasOmniSetSSELevel@@YAXXZ)
explicitU_static.lib(SMASpxU_XP_IF.obj) : error LNK2019: unresolved external symbol __imp_getenv referenced in function "void __cdecl SMABasOmniSetSSELevel(void)" (?SMABasOmniSetSSELevel@@YAXXZ)
explicitU_static.lib(vwave.obj) : error LNK2019: unresolved external symbol memmove referenced in function vwave
explicitU_static.lib(vusdfld.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vusdfld_cza.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vutrs.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuviscosity.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuinter.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuinter_cza.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuinteraction.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vumullins.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vueos.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vufield.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vugens.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuhard.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuanisohyper_inv.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuanisohyper_strain.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vucharlength.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuel.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vfric.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vfric_coef.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vfriction.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vuamp.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vcosimulation0.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vdisp.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vdload.obj) : error LNK2001: unresolved external symbol memmove
explicitU_static.lib(vfabric.obj) : error LNK2001: unresolved external symbol memmove
explicitU.dll : fatal error LNK1120: 4 unresolved externals
Abaqus Error: Problem during linking - Single Precision Abaqus/Explicit User Subroutines.
  This error may be due to a mismatch in the Abaqus user subroutine arguments.
  These arguments sometimes change from release to release, so user subroutines
  used with a previous release of Abaqus may need to be adjusted.
Abaqus/Analysis exited with errors

 

 

Cheers

Binod

↧

Fortran error #8093: A do-variable within a DO body shall not appear in a variable definition context

May 16, 2018, 9:10 am
$
0
0

DO M=1,8

    DO N=1,8

        DO I=1,3

            INTERVAL=0

            DO J=1,3

            INTERVAL = INTERVAL+CMAT(I,J)*BU(J,N)

            END DO

            KUU(M,N)= KUU(M,N)+BU(I,M)*INTERVAL*DJACB

        END DO

    END DO

END DO

 

 

i am facing an error when i complied following fortan code 

↧
↧

Weird interaction with subroutine arguments

May 17, 2018, 9:59 am
$
0
0

I don't know if this a bug or a feature or what but it's pretty sneaky and a really dangerous one.

Example:  
program test_program
     implicit none
     real(8), dimension(2):: x
      
     x=1
     print*,x
     call subroutine sub1(x,x)
     print*, x
    
end program test_program   

 

[On another module]

subroutine sub1(argIN, argOUT)
     implicit none
     real(8), dimension(2), intent(in):: argIN
     real(8), dimension(2), intent(out):: argOUT
    
   
     argOUT(1)=argIN(1)+argIN(2)
     argOUT(2)=argIN(1)+argIN(2)  !The exact same as the previous line, only applied to argOUT(2)
 end subroutine test_sub

This program, you'd expect to print:
1.0000  1.0000         !For the old x
2.0000  2.0000         !For the x after the call of the subroutine

But instead, it prints:
1.0000  1.0000
2.0000  3.0000

Also, if you put a "print*, argOUT" command in the subroutine just between the declarations and the rest of the body it will even print "1.0000  1.0000", even though the argOUT hasn't been assigned any value yet.

So basically, if you do it that way (use the same variable for both of the arguments) the IN and the OUT arguments inside the subroutine are implicitly linked (argIN=argOUT) for no apparent reason.

The solution is of course easy. You either use different variables in the call statement or you use an intermediate variable in the subroutine as a buffer for the in argument (e.g temp=argIN(1) and then use temp). But unless, you know this quirkiness then you won't even think to implement the solution.

Is this intended? Is this a bug? Why dosen't the compiler at least show a warning?

 

Compiler: Intel(R) Visual Fortran Compiler 18.0.1.156

↧

Getting error message "error #7002: Error in opening the compiled module file. Check INCLUDE paths. [MPI]"

May 17, 2018, 8:34 pm
$
0
0

Hi,

I am an engineering student, working on a project that requires the use of Fortran code (this is to clarify - I'm not a developer or a computing student, so I'm finding troubleshooting this software is a bit tricky...) The code I need to run uses MPI libraries.

I've installed VS 2018 + Parallel Studio + MPI services as recommended on the Intel website (here - https://software.intel.com/en-us/mpi-developer-guide-windows-prerequisit...) The hydra_service is running fine, and I can see all of the requisite files in the Intel folders.

I've used the recommended settings in the project from here https://software.intel.com/en-us/mpi-developer-guide-windows-configuring... 

However, when I try to build my test project (a simple hello world one, with MPI), it won't build, and won't run.

I'm getting the error messages:

error #7002: Error in opening the compiled module file.  Check INCLUDE paths.   [MPI]

Project : warning PRJ0018 : The following environment variables were not found: $(I_MPI_ROOT)

And I don't know how to fix it... 

I would really appreciate some ideas / directions about what's going on, and how to fix it. 

Thank you!

Daria

↧

Using Modules with DLL's

May 19, 2018, 8:59 am
$
0
0

Can anyone suggest how to go about this I have a dll project that is launched by an exe. I created this example project below where the dcalc array has values and passes the array to one dll. Then the next dll has the array defined in a module.

At the point where the Dll_2_mod is called the values in the array are wiped out. 

The end goal in the real project is a number of dll's will be adding to the dcalc array and I did not want to change arguments to pass the array because the project already has a module layout.

Sample code:

program Module_Pass_Array
Real,dimension(10) :: Dcalc
    Do I=1,10
      Dcalc(i) = real(i+1)
    Enddo
    Call dll_1(dcalc)
end program Module_Pass_Array
    
subroutine Dll_1(dcalc)
!DEC$ ATTRIBUTES DLLEXPORT::Dll_1
  Real, Dimension(10) :: Dcalc
  Call Dll_2_mod()
end subroutine Dll_1

Module Module_dcalc
!DEC$ ATTRIBUTES DLLEXPORT::Module_Decalc
Real, dimension(10) :: Dcalc
End Module 

subroutine Dll_2_mod
Use Module_dcalc
!DEC$ ATTRIBUTES DLLEXPORT::Dll_2_mod
 Write(*,'(A, F7.2)') 'Dcalc', dcalc(2)
end subroutine Dll_2_mod

 

Thanks in advance for any help. Ken

↧
Viewing all 5691 articles
Browse latest View live
Search
<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>