CFD Online Discussion Forums

CFD Online Discussion Forums (https://www.cfd-online.com/Forums/)
-   Main CFD Forum (https://www.cfd-online.com/Forums/main/)
-   -   fortran subroutine (https://www.cfd-online.com/Forums/main/72414-fortran-subroutine.html)

HaKu February 4, 2010 18:33
fortran subroutine
 
hey

i want to give at inflow parabolic velocity profile... does anyone has fortran code for this..

regards

Pauli February 4, 2010 20:26
SUBROUTINE V_PARA(X,Y,V)
C
Xn = X - 12.6
Yn = Y + 3.5
C
X2 = Xn * Xn
Y2 = Yn * Yn
C
V = 5 * X2 + 3 * Y2
C
RETURN
END


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