Smart questions
Smart answers
Smart people
INTELLIGENT WORK FORUMS
FOR ENGINEERING PROFESSIONALS

Member Login




Remember Me
Forgot Password?
Join Us!

Come Join Us!

Are you an
Engineering professional?
Join Eng-Tips now!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

Join Eng-Tips
*Eng-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.
Jobs from Indeed

Link To This Forum!

Partner Button
Add Stickiness To Your Site By Linking To This Professionally Managed Technical Forum.
Just copy and paste the
code below into your site.

galaxytraveler (Aerospace) (OP)
14 Mar 12 12:15
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.
 
Denial (Structural)
14 Mar 12 16:19
I have not used FORTRAN for many years now, but isn't this the sort of thing that the CHARACTER*1 variable type was introduced for.  Read the data as a CHARACTER string, then search that string for whatever signposts you are looking for.  When you need to extract the numbers from the substrings between the signposts, use an "internal read".
IDS (Civil/Environmental)
14 Mar 12 18:29
It probably can be done in Fortran, but it looks like something that would be much more easily done in a spreadsheet to me.

Doug Jenkins
Interactive Design Services
http://newtonexcelbach.wordpress.com/
 

gsal (Computer)
14 Mar 12 21:18
Sure, it can be done...you just need to be patient and get creative.

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.

 
Helpful Member!  xwb (Computer)
17 Mar 12 7:35
You just need a parser.  Example attached.  I'll leave you to do the file opening etc.
galaxytraveler (Aerospace) (OP)
20 Mar 12 13:09
Thanks you so much for all your answers, I really appreciate that you used your time on answering me.

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.     
loki3000 (Mechanical)
10 Apr 12 5:59
if it's possible, use python as a glue language and call your fortran routines from it

Reply To This Thread

Posting in the Eng-Tips forums is a member-only feature.

Click Here to join Eng-Tips and talk with other members!

Back To Forum

Close Box

Join Eng-Tips® Today!

Join your peers on the Internet's largest technical engineering professional community.
It's easy to join and it's free.

Here's Why Members Love Eng-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close