Sumatorio y media de una tabla de datos en coma flotante
Esta función calcula la suma y la media aritmética de los números (positivos y negativos) de la tabla de datos en coma flotante (32 bits) especificada.
Entrada
área inicial de la tabla de datos
área final de la tabla de datos
Salida
suma de todos los elementos de la tabla especificada
media de todos los elementos de la tabla especificada
La entrada s1_Start especifica el área inicial de la tabla de datos, y s2_End el final. La suma de todos los elementos de la tabla se devuelve enSum y la media aritmética en Mean.
En lugar de utilizar esta instrucción F, se recomienda utilizar la instrucción FP7 correspondiente:
si la dirección de la variable de entrada s1_Start > s2_End.
si las direcciones son de tipo diferente.
si los valores en coma flotante superan el rango de procesamiento.
si la dirección de la variable de entrada s1_Start > s2_End.
si las direcciones son de tipo diferente.
si los valores en coma flotante superan el rango de procesamiento.
si el sumatorio produce un desbordamiento.
Todas las variables de entrada y de salida utilizadas para la programación de esta función han sido declaradas en la Cabecera de la POU. Se utiliza la misma cabecera de la POU para todos los lenguajes de programación.
VAR
start: BOOL:=FALSE;
(*activates the function*)
data_array: ARRAY [0..4] OF REAL:=[4.0,7.0,-32.0,13.0,5.0];
(*result after a 0->1 leading
edge from start:
[-32.0,4.0,5.0,7.0,13.0]*)
asc_order: INT:=0;
(*which way to sort:
0 means ascending order
1 means descending order*)
END_VAR
Cuando la variable start está ajustada a TRUE, se ejecuta la función.
Calcula la sum = 2,0 + 3,45 + (-6,91) + 5,44 + 1,3 = 5,28
y media mean = Sum/5 = 5,28/5 = 1,056
de los elementos de data_field.
BODY
WORKSPACE
NETWORK_LIST_TYPE := NWTYPELD ;
ACTIVE_NETWORK := 0 ;
END_WORKSPACE
NET_WORK
NETWORK_TYPE := NWTYPELD ;
NETWORK_LABEL := ;
NETWORK_TITLE := ;
NETWORK_HEIGHT := 6 ;
NETWORK_BODY
B(B_VARIN,,output,8,1,10,3,);
B(B_VARIN,,data field[0],8,2,10,4,);
B(B_VARIN,,data field[4],8,3,10,5,);
B(B_VAROUT,,sum,19,2,21,4,);
B(B_F,F352_FMEAN,,10,0,19,5,,?DEN?D@'s1'?Ds2?AENO?Csum?Cmean);
B(B_VAROUT,,mean,19,3,21,5,);
L(1,0,1,6);
END_NETWORK_BODY
END_NET_WORK
END_BODY
IF start then
F352_FMEAN( s1_Start:= data_field[0] ,
s2_End:= data_field[4] ,
Sum=> sum ,
Mean=> mean );
END_IF;