Thanks for the suggestion but it does not work...
When I put empty paranthesis, the same error massage is generated and when I insert 110 into paranthesis, compilation rejects them.
Ok I wrote
Exe(Stn, Chk, Shp, Inertia(110), Chk2, Length, R, INC1, INC2, Def(110)) and the error seems to be corrected but after following the steps i saw that inc1 and inc2 -these are values returned from fortran, were empty...
What is the problem? why inc1 and inc2 are not published in labels...
Value of type '1-dimensional array of double' cannot be converted to double
I'm writing a mixed language program by VB 2005 and Visual Fortran Professional Edition 6.0.0
Fortran part of the program is below:
SUBROUTINE BUCKLE(STN, CHK, SHP, INERTIA, CHK2, LENGTH, R, INC1, INC2, DEF)...
I'm attaching the program I wrote. If anyone corrects it, I'm going to be glad.
Thanks.
USE IMSL
DIMENSION A(100,100), INERTIA(110)
COMPLEX, ALLOCATABLE, DIMENSION(:,:) :: EVAL
COMPLEX, ALLOCATABLE, DIMENSION(:) :: EVEC
REAL INERTIA, INER
INTEGER LDA, LDEVEC, N, CHK, CHK2
REAL(8) A...
I am trying to IMSL library to compute eigenvalues but the example in referance guide uses the comand 'parameter' at the very beginning of the program and defines dimensions of the varibles that are going to be transfered to the subroutine. Look at the following:
INTEGER LDA, LDEVEC, N
PARAMETER...
Thanks for your help but I had tried to use the programs you refered before I began to seek help here and I could not use them. I think they work with different libraries or with some other systems. Even if I were able to make them work, they are written for advanced mathematical purposes, not...
I'm using visual fortran professional edition version 6.0.0 and looking for a code to find the eigenvalues of a matrix. I'm new in programming. Could you help me?
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.