Se podran reducir estas formulas

HOLA, TENGO UNA DUDA Y QUISIERA SABER SI ES POSIBLE REDUCIR ESTAS
FORMULAS O ALGORITMOS

ACTUALMENTE LAS UTILIZO PARA CALCULAR LA DISTANCIA Y EL ACMITUT ENTRE DOS PUNTOS

'RAIZ((X3-X2)^2+(Y3-Y2)^2)' EVAL 'DH' STO
'ACOS((Y3-Y2)/DH)' EVAL 'ACD' STO

IF 'X3-X2<0' THEN '360.-ACD' EVAL 'ACD' STO ELSE 'ACD' EVAL 'ACD' STO END