Again, thanks for your help ...
I've done a simple test, and it doesn't seem to be working
I've done this
INTEGER,PARAMETER :: dp= selected_real_kind(15,100)
REAL(dp), PARAMETER :: pi = 3.1415926535897932384626
and later display the value:
WRITE(*,"(A, F15.10)") "Pi = ", pi...
I have some questions about Modules ...
I'm at my wits end - I have no idea what's wrong.
I have a module defined in a file timestepping.F90
MODULE timestepping
integer nstepmax, nwrite
integer nstepmax_sp, nwrite_sp
real*8 time, dt, dt_sp, dt_write, dt_sp_write
REAL*8...
Another thing - if I do this
REAL(dp) A,B
B = max(1.0,A)
I'm warned that the two arguments are of different types.
Should I worry about this?
Again, thank you for all your help.
That FORTRAN wiki is very helpful.
How do you give that dp a global scope?
Or is that actually what I want to do?
I have a bunch of #include "bla.h" which would have REAL(dp), but I can't figure out where to put the corresponding
integer,parameter :: dp=selected_real_kind(15,307)
commands
Thanks, this is extremely helpful.
What would be a good (preferably free) online reference for looking up the different standards?
I'd like to use fortran 95 standard, and so I'm using -std=f95.
I get a number of complaints from the compiler, but I don't always know the the proper syntax for...
Hi, I'm running numerical sediment chemistry models in FORTRAN.
I have a very bizarre problem:
I frequently debug my source code by using PRINT*, commands to write numbers to the console.
There's a couple of PRINT*, commands which, once removed from my source code, the program goes completely...
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.