compile file .x with g77
 

hi!
I have fedora core4 and I wnat to compile my fortran program with g77 but after giving the comand : ./namefile.x the computer tell me :
write start: can't write file
apparent state: unit 84 named Energy
last format: (I6,5(1X,G13.6))
lately writing sequential formatted external IO
Aborted
Why does it happen? I made the same procedures with fedora core3 and it's work well.
how can I solve my problem?...can you help me?
thank you very much

Cristina

hi there,
something is wrong with the code...
did you get a sucessfull compilation message? how did you compile it?
if the code is not so big, could post it? if it is big, please post only the relevant part...
you are trying to write something that is not working...
regards
slackie1000

hi!
thank you very much...but I solved that problem, and now I have an other one! I compiled my file .f with g77 and all is ok but when I execute it ( command: ./file.x) I have this error:
PAUSE statement executed
To resume execution, type go. Other input will terminate the job.
Why?What I have to do?
thank you for your help

cristina

hi! thank you very much...but I solved compile with g77
 

hi!
thank you very much...but I solved that problem, and now I have an other one! I compiled my file .f with g77 and all is ok but when I execute it ( command: ./file.x) I have this error:
PAUSE statement executed
To resume execution, type go. Other input will terminate the job.
Why?What I have to do?
thank you for your help

cristina

hi there,
do you know FORTRAN? the kind of messages are pretty clear. look for the PAUSE keyword in your code...somehow i feel that this code is not clear for you...
you need to post the code otherwise i can't find the error.
regards
slackie1000

type go like it says? :P

i dont know if that's right but that's what it's telling you to do

hi there,
double..reported..
see other thread in the same forum
regards
slackie1000

Both g77 threads are merged as they are part of the same question.

I think that the error depends from the following subroutine for generating random numbers:
c*****************RANDOM NUMBER GENERATOR ***********************
c This function has been taken from "Numerical recipes"
c*****************************************************************
FUNCTION RAN1(IDUM)
DIMENSION R(97)
PARAMETER (M1=259200,IA1=7141,IC1=54773,RM1=3.8580247E-6)
PARAMETER (M2=134456,IA2=8121,IC2=28411,RM2=7.4373773E-6)
PARAMETER (M3=243000,IA3=4561,IC3=51349)
DATA IFF /0/
SAVE
IF (IDUM.LT.0.OR.IFF.EQ.0) THEN
IFF=1
IX2=MOD(IA2*IX2+IC2,M2)
IX3=MOD(IA3*IX3+IC3,M3)
J=1+(97*IX3)/M3
IF(J.GT.97.OR.J.LT.1)PAUSE
RAN1=R(J)
R(J)=(FLOAT(IX1)+FLOAT(IX2)*RM2)*RM1
RETURN
END

but I didn't understand because it gives same problems, I have already used it many times!

hi there,
how can you compile this? where is the "endif"???
what kind of compiler are you using?
regards
slackie1000