[Dinesh_Dhande]

Hi Friends,
I want to simulate the pressures generated in hydrodynamic journal bearing. Can anyone help me? I need either tutorial or the ready made UDF for the same or the link where i will get help.
Also i want to convert fortran program on bearing in UDF. How to do that? Kindly help.
Thanks in advance.

[Far]

There are two udfs which can help you.

First is about pressure control at the end of each iteration etc

#include "udf.h"

DEFINE_EXECUTE_AT_END(RBC)
{

Domain *d;
Thread *t;
cell_t c;
face_t f;


d = Get_Domain(1); 

thread_loop_c(t,d)
{
begin_c_loop (c,t)
	{
		if (C_P(c,t)<=0.0) 
			C_P(c,t)=0.0;
	}
end_c_loop (c,t)
}


thread_loop_f(t,d)
{
begin_f_loop(c,t)
	{
		if (C_P(c,t)<=0.0) 
			C_P(c,t)=0.0;
	}
end_f_loop(c,t)
}


}

Second will model viscosity as function of temperature

/*	**********************************************************	*/
/*                                                            	*/
/* User-Defined Functions for temperature-dependent viscosity 	*/
/* FLUENT 16.0                                                 	*/
/*                                                            	*/
/* Author: FARCFD  farcfd@gmail.com                    			*/
/* Date: August 16, 2015                                      	*/
/*                                                            	*/
/* ************************************************************ */



#include "udf.h"

DEFINE_PROPERTY(cell_viscosity, c, t)


{
	
real mu_laminar, temp, pres; 

temp = C_T(c, t);

pres = C_P(c, t); 

mu_laminar = 0.0127*exp(0.000000213345*(pres-101345))*exp(0.029*(temp-293));

return mu_laminar;


}