Application example summary text:
EXAMPLE=102
Equation: [P,x h^3 / 6 nu],x = [U h],x + h,t

APPLICATION: LINEAR SLIDER BEARING
UNKNOWN IS FLUID PRESSURE
N_SPACE  = 1, NOD_PER_EL = 2, N_G_DOF = 1
N_EL_FRE = 2, MISC_FL    = 2
GET_REAL_MISC(1) = VISCOSITY, GET_REAL_MISC(2) = VELOCITY
GET_REAL_LP (1) OR PRT_L_PT(K,1) = FILM THICKNESS OPTIONS
if el_real = 2 then squeeze film
GET_REAL_LP (2) OR PRT_L_PT(K,2) = FILM SQUEEZE OPTIONS

DATA_SET= 01
Remarks: Step bearing with analytic solution for
pressure increasling linearly to max at step.
(),t = 0

DATA_SET=2
Ten step approximation of linear tilt bearing. Exact pressure:
P = 6 nu V B^2 [ln(H_1/H_11) - 2(H_1-H_11)(H_1+H11)]/(H_1-H_11)^2.
(),t = 0

DATA_SET=3
Vinod squeeze film estimate