**DuctExtractMain90B_CL**

Returns the pressure drop associated with an extract duct with a branch. The branch is at 90 degrees and the ducts have circular cross-section. The pressure drop should be applied to the flow in the main duct. The function uses the information from the Lindab web site. Ducts 2 and 3 have the same diameter.

DELTAP = **DuctExtractMain90B_CL**(F$, v_3, v_2, T, P)

**Inputs:**

F$: fluid string identifier

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

v_3: velocity in main 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 = 14 [m/s]

v_2 = 8 [m/s]

DP = **DuctExtractMain90B_CL**(F$, v_3, v_2, T, P)

{**Solution:**

DP = 36.92 [Pa]}