13 lines
363 B
Plaintext
13 lines
363 B
Plaintext
|
|
(* @PATH := '\/Functions_Collection' *)
|
|
(* @SYMFILEFLAGS := '0' *)
|
|
FUNCTION WaterDensity : REAL
|
|
VAR_INPUT
|
|
i_Temperature : REAL ;
|
|
END_VAR
|
|
VAR
|
|
END_VAR
|
|
(* @END_DECLARATION := '0' *)
|
|
WaterDensity := 0.99985 + 0.000061577 * i_Temperature - 0.0000081546 * i_Temperature * i_Temperature + 0.000000047799 * i_Temperature * i_Temperature * i_Temperature ;
|
|
END_FUNCTION
|