Fortran
in [Programming]
|
Error while reading in pointer Location Hi, I have following lines of code integer err_d1,ind_d1 pointer (ptr_d1,td1) real*8 td1(*) err_d1=0 call sys_alloc(nbent*nbvent,ptr_d1,err_d1) read(isolu,rec=irec,err=980) <- Crashes here + (td1(in),in=1,nbent*nbvent) do in=1,nbent*nbvent dm(lpsol0+in-1)=... 26 Jan 2008 15:38
Stack overflow problem but increasing stack size does not solve the problem Hi All, I have some old code that I need to use. The code compiles and links all right but while running breaks down which the debugger says is due to stack overflow but increasing the stack size to any amount does not weed out the problem. Following code snippets recreate the problem. The code snippet and the... 26 Jan 2008 21:09
IVF + Xp (32bit) = 3Gb This might be off topic. How do you create an executable greater than 2 Gb? I added the /3GB switch to my XP boot.ini I dynamically allocate my array like this (representative code fragment) REAL*8, ALLOCATABLE :: A(:,:) integer isiz isiz = 16000 IF (.NOT. ALLOCATED(A)) ALLOCATE (ISIZ,ISIZ), ST... 1 Feb 2008 10:18
it links, but why does it return 0?? Hello everybody, I´m doing a bit of mixed language programming with c++ and fortran 90. my last project links perfectly, but I really don´t understand its output.. have a look: the main program (in c++): #include <iostream> using namespace std; extern "C"{ int _stdcall MAX1(int*,int*); } int main() ... 25 Jan 2008 15:37
large number with interger Hi all, I have a problem to deal with a large number with interger. The problem is I have to deal with integers of about 20 digits. I am using Fortran Professional version (2001). Currently, I am using integer(8) command but it takes only 12 digits. I would appreciate if someone could help me with this. Best rega... 29 Jan 2008 09:06
Allow * as a format string? I wish write (some_unit,"*") or write (some_unit,"(*)") (allowing for optional blank padding of the format string) could have the same meaning as write (some_unit,*) This would provide a more unified syntax for write statements and would also be convenient in subroutines where a format string has be... 25 Jan 2008 15:03
convection-diffusion PDE solver packages Hi, Does anyone know of packages to solve the convection-diffusion PDE's (maybe using the finite volume formulation)? I am looking to solve a chemically reactive flow problem. I saw Clawpack, but that one is for hyperbolic PDE's. It does offer one example of the advection/diffusion problem (http:// www.amat... 25 Jan 2008 13:21
How to write an output file into a specific directory in Linux? Hi, everyone: I can write an output file in the current working directory in Linux. For example: program ex implicit none open(unit=10,file="ex.txt") write(10,*) "Hello!" close(10) stop end But how can I write the file "ex.txt" directly to a specific directory in Linux or other *nix environme... 25 Jan 2008 16:10
[newbie] Interfacing C routine with CVF routine called from VB G'day everyone, I have a knapsack packing algorithm in C. I've got it working within itself okay. I have figured out how to get the data from VB to Fortran and from Fortran into C. What I can't seem to work out is how to get the data back from C to Fortran. It's probably something profoundly simple ... BTW, t... 23 Jan 2008 23:33 |