Apologies again, I have found a solution to this that might be viable.
(xP(i) and zP(i) are the particle co-ordinates)
IF ((((xP(i)-cylinder_x)**2)+((zP(i)-cylinder_z)**2)) < (cylinder_radius**2)) THEN
Could I improve this further?
Also, this is going to sound like a really silly question. I...
Sorry to post on the thread I made before other people have posted. I have worked out mostly what I need to do.
I have 3 co-ordinates for the top and base of the cylinder, such that the base is 1.00, 1.00, 1.00 and the top is 1.00, 3.00, 1.00, with a radius of 1.00
The generated particles have...
Hi,
I am quite new to FORTRAN and am currently making programs to gain an understanding of it. I am using FORTRAN 90 and Microsoft Visual Studio.
I have made a program in FORTRAN 90, this spawns particles in which then land on a plane. What I would like to do is to check to see if any of the...
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.