**DuctExtractTeeB_CL**

Returns the pressure drop associated with an extract duct with an equal area tee with equal flow in the two incoming branches. The ducts have circular cross-section. The function uses the information from the Lindab website for a T-piece.

DELTAP = **DuctExtractTeeB_CL**(F$, v_3, v_1, T, P)

**Inputs:**

F$: fluid string identifier

v_3: velocity in main duct upstream of branch (m/s, ft/s)

v_1: velocity in each duct downstream of branch (m/s, ft/s)

T: inlet temperature (K, C, F, or R)

P: inlet pressure (bar, atm, Pa, kPa, or MPa)

**Output:**

DELTAP: pressure drop (bar, atm, Pa kPa, or MPa)

**Example: **

$Load Component Library

$UnitSystem SI Mass kJ C Pa

$VarInfo DP Units='Pa'

F$ = 'Air'

T = 20 [C]

P = 100000 [Pa]

v_3 = 10 [m/s]

v_1 = 10 [m/s]

v_2 = 8 [m/s]

DP = **DuctExtractTeeB_CL**(F$, v_3, v_1, T, P)

{**Solution:**

DP = 98.32 [Pa]}