Find and replace in fortran
Find and replace in fortran
(OP)
How to do find and replace in Fortran or ideas for a different way of solving the problem
BACKGROUND
I am reading in a column of asteroid diameters from a file, some of the asteroids are however not spherical but can be e.g. potato shaped, and then instead of a diameter I get something like "250x23x75.5" or if just two sides are known I get something like "250x23".
What I need to do with these values are to take the non-spherical ones and calculate the diameter of a sphere with equal volume.
THE PROBLEM
My problem is that I don't know how to take a value like "diameter = 250x23x75.5" and get the individual numbers out so I can calculate anything.
MY OWN IDEAS
I have been considering doing an "find and replace" of all the x to *, so I can directly use it in the calculations. But I am not sure how to do "find and replace", or if I will have problems using a string in a formula. And then how I can be sure to insert "250x23" into a different formula than "250x23x75.5".
For the find and replace I have considered turning each value into an array, so e.g. "250x23" would be the array (2,5,0,x,2,3) and then running a if loop on it, to search for X's and replace them. But I am not sure how to do this either, and it seems like a complicated way of doing something so simple.
I hope someone are willing to give me some new ideas.
BACKGROUND
I am reading in a column of asteroid diameters from a file, some of the asteroids are however not spherical but can be e.g. potato shaped, and then instead of a diameter I get something like "250x23x75.5" or if just two sides are known I get something like "250x23".
What I need to do with these values are to take the non-spherical ones and calculate the diameter of a sphere with equal volume.
THE PROBLEM
My problem is that I don't know how to take a value like "diameter = 250x23x75.5" and get the individual numbers out so I can calculate anything.
MY OWN IDEAS
I have been considering doing an "find and replace" of all the x to *, so I can directly use it in the calculations. But I am not sure how to do "find and replace", or if I will have problems using a string in a formula. And then how I can be sure to insert "250x23" into a different formula than "250x23x75.5".
For the find and replace I have considered turning each value into an array, so e.g. "250x23" would be the array (2,5,0,x,2,3) and then running a if loop on it, to search for X's and replace them. But I am not sure how to do this either, and it seems like a complicated way of doing something so simple.
I hope someone are willing to give me some new ideas.
RE: Find and replace in fortran
RE: Find and replace in fortran
Doug Jenkins
Interactive Design Services
http://newtonexcelbach.wordpress.com/
RE: Find and replace in fortran
For example, you read the info as a string and then you inspect it to find out how many 'X' it has and at what index they are at...then you do an internal read of the characters in between.
Or, you could take a look at the modules put together in this page:
http://www.gbenthien.net/strings/index.html
Or, you could use something else other than fortran that has a lot more abilities on manipulating strings and spliting, etc, ...like, say, Python.
RE: Find and replace in fortran
RE: Find and replace in fortran
IDS: I took data into excel and it was much easier than Fortran, and I got some plots out after some manipulating, but my input file will get renewed often, so in the long run, it is better for me to do as much to in Fortran as possible.
Denial and gsal:Thanks for pointing me towards "internal read" and charecter*1 variables. (The reason why I am using Fortran is my boss wants me to build on his old programs to save time).
Xwb- You wrote a script for me, WOW!!! Thanks! I am going through it now, to understand it and make it fit in my program.
RE: Find and replace in fortran