Continue to Site

Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

Register Log in
  • Congratulations KootK on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

BJSFM Fortran code

Status
Not open for further replies.
PatrickAero

PatrickAero

Aerospace
Jan 20, 2019
4
I am looking for a working Fortran code (without bugs or issues) for the BJSFM solution.

I have read through this thread:

If anyone out there has fixed the legacy code attached in the thread above, I was hoping if you could share it with me. Or at least point out to me the errors in the code.

Currently I have a Fortran code that is running but the output that I am getting from it is not matching the results posted in AFWAL-TR-81-3041, volume 3.

Any help is greatly appreciated.

Thanks and regards,
Prathik
 
Replies continue below

Recommended for you

Sort by date Sort by votes

Just to update.

I have fixed the many bugs/errors in the original FORTRAN 77 code that I acquired from the thread above.

Now the code output values matches exactly with AFWAL-TR-81-3041-VOL-III.

However, hopefully the original programmer didn't make any mistakes.

If anyone is interested in getting the code from me, do feel free to get in touch with me.

Regards.
 
Upvote 0 Downvote
PatrickAero... FYI...

There was some discussion on this topic, in a thread from August 2010, thus...

"How to get BJSFM, A4EI, A4EJ, etc?"...
Regards, Wil Taylor

o Trust - But Verify!
o We believe to be true what we prefer to be true. [Unknown]
o For those who believe, no proof is required; for those who cannot believe, no proof is possible. [variation,Stuart Chase]
o Unfortunately, in science what You 'believe' is irrelevant. ["Orion", Homebuiltairplanes.com forum]
 
Upvote 0 Downvote
PatrickAero,

Please send me an email from my contact page. I have went through this process as well for the eBJSFM code I developed, but it would be good to double check it and see what you came up with.



Brian
 
Upvote 0 Downvote
WKTaylor,

Thanks for alerting me regarding that thread.

ESPcomposites,

Sure will do. That sounds great, thanks. I am currently converting the F77 code to VB and I am checking the equations as I do that. I will share the VB code publicly when I am done.

Thanks and regards,
Pat
 
Upvote 0 Downvote
ESPcomposites,

I have sent you an e-mail. Hope you have received it.

Regards,
Pat
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

SingleLapJoints
  • Locked
  • Question
Fortran code A4EA for elastic-plastic single-lap joints 2
Replies
5
Views
145
IRstuff
IRstuff
Jason8zhu
  • Locked
  • Question
What is the applicable Code/std for fracture assessment for Metals in Aricraft & Aerospace engg? 2
Replies
6
Views
165
tbuelna
tbuelna
ESPcomposites
  • Locked
  • Question
How to get BJSFM, A4EI, A4EJ, etc? 3
2
Replies
20
Views
840
ESPcomposites
ESPcomposites
Qbar
  • Locked
  • Question
Bonded/Bolted Joint analysis (A4EI/J and other codes)
Replies
16
Views
710
SWComposites
SWComposites
595guy
  • Locked
  • Question
Boeing Color Codes (reopening)
Replies
2
Views
185
595guy
595guy

Part and Inventory Search

Sponsor

Back
Top Bottom