CFD Online Logo CFD Online URL
www.cfd-online.com
[Sponsors]
Home > Forums > General Forums > Main CFD Forum

Need Fortran code

Register Blogs Community New Posts Updated Threads Search

Reply
 
LinkBack Thread Tools Search this Thread Display Modes
Old   October 12, 2017, 02:49
Default Need Fortran code
  #1
New Member
 
bob
Join Date: Oct 2017
Posts: 18
Rep Power: 9
batuning is on a distinguished road
Dear friends ,
i need a code about (Airfoil NACA 5 digit ) for FORTRAN ,to make an airfoil
also need graphic airfoil
i have equations ,please someone help me .m new for FORTRAN
thanks
batuning is offline   Reply With Quote

Old   October 13, 2017, 02:07
Default
  #2
Senior Member
 
Lane Carasik
Join Date: Aug 2014
Posts: 692
Rep Power: 15
lcarasik is on a distinguished road
Quote:
Originally Posted by batuning View Post
Dear friends ,
i need a code about (Airfoil NACA 5 digit ) for FORTRAN ,to make an airfoil
also need graphic airfoil
i have equations ,please someone help me .m new for FORTRAN
thanks
Are you asking for help to write the FORTRAN code? If so, where are you having trouble?
lcarasik is offline   Reply With Quote

Old   October 13, 2017, 04:46
Default
  #3
New Member
 
bob
Join Date: Oct 2017
Posts: 18
Rep Power: 9
batuning is on a distinguished road
Quote:
Originally Posted by lcarasik View Post
Are you asking for help to write the FORTRAN code? If so, where are you having trouble?
yes .true
i have problem with equation .
how i should add the equation's to FORTRAN
the equation of curve line of airfoil is :

Yc= m/p**2(2px-x**2) ===================== from x=0 to x = p
Yc= m/(1-p)**2[(1-2p)+2px-x**2] ============ from x=p to x= c



Equation for calculate thickness upper and down the middle line of airfoil :

+ Yt = t/0.2(0.2969 RADICAL x - 0.1260 x - 0.3516 x**2 + 0.2843 x**3 - 0.1015 x**4)
-

the Equation of final dimensions of upper surface and down surface of airfoil :

Xu=x-Yt * SIN TETA
Yu=Yc+Yt * COS TETA
Xl=x+Xt * SIN TETA
Yl=Yc-Yt * COS TETA


Where TETA = ARCTAN[dYc/dx]






x= chord length
y= vertical length
t= MAX thickness
m= MAX curve
p=MAX leading edge curve
batuning is offline   Reply With Quote

Old   October 13, 2017, 05:23
Default
  #4
New Member
 
bob
Join Date: Oct 2017
Posts: 18
Rep Power: 9
batuning is on a distinguished road
I have a example code but this code is for NACA 4 digit .i need NACA 5 digit also i need the Graphic picture of Airfoil :
i just want Design an Airfoil ..not flow making or analyze . simple 5 digit airfoil design also have graphic form
Code:
http://people.sc.fsu.edu/~jburkardt/f_src/naca/naca.f90

Last edited by batuning; October 13, 2017 at 08:00.
batuning is offline   Reply With Quote

Old   October 14, 2017, 14:58
Default
  #5
Senior Member
 
Lane Carasik
Join Date: Aug 2014
Posts: 692
Rep Power: 15
lcarasik is on a distinguished road
Quote:
Originally Posted by batuning View Post
I have a example code but this code is for NACA 4 digit .i need NACA 5 digit also i need the Graphic picture of Airfoil :
i just want Design an Airfoil ..not flow making or analyze . simple 5 digit airfoil design also have graphic form
Code:
http://people.sc.fsu.edu/~jburkardt/f_src/naca/naca.f90
Without digging in deeper into the code, it looks like the framework is there for you to just change the equations. I'm not sure what your issue is specifically. Are you having trouble setting up the equations in Fortan? Do you have experience using fortran before?
lcarasik is offline   Reply With Quote

Old   October 14, 2017, 15:26
Default
  #6
New Member
 
bob
Join Date: Oct 2017
Posts: 18
Rep Power: 9
batuning is on a distinguished road
Quote:
Originally Posted by lcarasik View Post
Without digging in deeper into the code, it looks like the framework is there for you to just change the equations. I'm not sure what your issue is specifically. Are you having trouble setting up the equations in Fortan? Do you have experience using fortran before?
Thanks
i don't have any experience for FORTRAN before im totally new in this
if you can make it simple for me .that i can understand and put my numbers to the code ,
that i exactly want is :
only make a 5 digit airfoil and have graphic form of this ( maybe with tecplot or something ... )
i don't need airflow equations ..or any extra thing ...only a design simple airfoil form just it .
i also have another better code .but i dont know how to send here
batuning is offline   Reply With Quote

Old   October 14, 2017, 15:40
Default
  #7
New Member
 
bob
Join Date: Oct 2017
Posts: 18
Rep Power: 9
batuning is on a distinguished road
naca.zip
also another one
airfoil platform.zip
batuning is offline   Reply With Quote

Old   October 14, 2017, 15:42
Default
  #8
Senior Member
 
Lane Carasik
Join Date: Aug 2014
Posts: 692
Rep Power: 15
lcarasik is on a distinguished road
Quote:
Originally Posted by batuning View Post
Thanks
i don't have any experience for FORTRAN before im totally new in this
if you can make it simple for me .that i can understand and put my numbers to the code ,
that i exactly want is :
only make a 5 digit airfoil and have graphic form of this ( maybe with tecplot or something ... )
i don't need airflow equations ..or any extra thing ...only a design simple airfoil form just it .
i also have another better code .but i dont know how to send here
You should spend some time and learn the basics of the coding in FORTRAN if you want to modify it for your purposes.
lcarasik is offline   Reply With Quote

Old   October 14, 2017, 15:47
Default
  #9
New Member
 
bob
Join Date: Oct 2017
Posts: 18
Rep Power: 9
batuning is on a distinguished road
Quote:
Originally Posted by lcarasik View Post
You should spend some time and learn the basics of the coding in FORTRAN if you want to modify it for your purposes.
yes exactly
thanks i will do it ,
and if you find something to help me ..please don't hesitate
batuning is offline   Reply With Quote

Reply

Tags
airfoil 2d, fortran 90, fortran code, fortran compiler


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
How to call FORTRAN files as UDF? Ehsan-F Fluent UDF and Scheme Programming 6 September 11, 2012 12:03
CGNS fortran code compiling with intel visual fortran xe dokeun Main CFD Forum 1 April 5, 2012 22:01
Discontinuous Galerkin schemes -- fortran source code diedro Main CFD Forum 3 March 12, 2011 11:20
Who can find me this fortran code 'CHEMR'? Dong Ye Main CFD Forum 1 October 13, 2005 18:02
Design Integration with CFD? John C. Chien Main CFD Forum 19 May 17, 2001 16:56


All times are GMT -4. The time now is 12:26.