Ahhh.
Te recomiendo que no modifiques la primera, porque es de la unit system
mejor dejala como la hicieron.
En todo caso, modifica tu función. Nombrala LogNat o algo similar, es más simple evitar esos problemas cambiando el nombre de tu función. No le harías mal al código.
Sino, fijate si te sirve asi (de verdad, no sé si funcionará, es una idea nnomás):
Código Delphi
[-]
Function Ln(a:TComplejo):TComplejo; overload;
Var
Z:TComplejo;
Begin
Z.Modulo:=System.Ln(a.Modulo); Z.ArgumentoRadianes:=a.ArgumentoRadianes;
Z.ArgumentoGrados:=RadToDeg(Z.ArgumentoRadianes);
CalcularRectangular(Z);
Result:=Z;
end;
Por cierto, en esta Unit tuya, te acordaste de poner a
System en el
uses??
Saludos!