Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations John Tel on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: lesaadmi
  • Content: Threads
  • Order by date
  1. lesaadmi

    How to parallelize a counter?

    Hello everybody, I have the following piece of fortran code: cont=0 do kk=1,ncz do jj=1,ncy do ii=1,ncx cont=cont+1 grdtgrvmsft(cont)=grdtgrvmsft(cont)+(derdensi(jj,ii,kk)*(1.0d0/(gravstd**2.0d0))*misfit) enddo enddo enddo I have been trying to parallelize...
  2. lesaadmi

    INDEX statement or INDEX intrinsic function?

    Hello everyone, I have the following subroutine code (it is a textual copy of a document): 1 subroutine contin(grid,nx,ny,dx,dy,dz,store) 2 dimension grid(nx*ny),store(2*nx*ny),nn(2) 3 real kx,ky,k 4 complex cgrid,cmplx 5 data pi/3.14159265/ 6 index(i,j,ncol)=(j-l)*ncol+i 7...
  3. lesaadmi

    How to install SLATEC library in WINDOWS?

    I am new in the gfortran world and I have been able to install the GNU gfortran compiler and the LAPACK library in WINDOWS. Now, I have the need of installing the SLATEC library, also for WINDOWS. Any leads? Any advise?
  4. lesaadmi

    Use of IMSL Fortran Numerical Libraries with GFORTRAN COMPILER

    Hello, a long time ago I used to program using MICROSOFT DEVELOPER STUDIO FORTRAN, and I used the IMSL Fortran Numerical Libraries to solve some numerical problems. Now I am using the GFORTRAN COMPILER, but I can not compile my script because I do not have the IMSL Fortran Numerical Libraries...
  5. lesaadmi

    USE OF " IF " STATEMENT

    Hello, I have a piece of fortran code that is specified as follows: if(ipot1-2) 418, 419, 420 but as you can see the logical expression (ipot1-2) is not a contitional. I have not seen this before. Can anyone tell me what does it mean? I would really appreciate any help.

Part and Inventory Search

Back
Top