fn EExecAI &OB X Att Sg1 FM =
(
	if (X==undefined) then return false
	if (X.OB=="C") then if  (IsReal X) then
	(
		TOChisl_Create &OB (Complex ((Log X.C.Re)/ Log 10) 0) Att5			
	) else
	(
		if (Att.Chk==1) then TOEmpty_Create &OB Att;
	)
	return true
) -- EExecAI