25 lines
331 B
Markdown
25 lines
331 B
Markdown
```pascal
|
|
FUNCTION "FrictionLoss" : Real
|
|
{ S7_Optimized_Access := 'FALSE' }
|
|
AUTHOR : 'Author'
|
|
FAMILY : 'Function'
|
|
NAME : 'Name'
|
|
VERSION : 1.0
|
|
VAR_INPUT
|
|
i_Flow : Real;
|
|
i_K : Real;
|
|
i_Dens : Real;
|
|
END_VAR
|
|
|
|
|
|
BEGIN
|
|
|
|
|
|
#FrictionLoss := (#i_Flow * #i_K * #i_Flow * #i_K )* #i_Dens ;
|
|
|
|
|
|
END_FUNCTION
|
|
|
|
|
|
```
|