51815 faxathisia -- Square root procedure -- Purpose: Y is automatically set to the (approximate) -- sqrt of X upon insertion -- Example Usage: INSERT INTO Sqrt VALUES(3.0,NULL); CREATE TABLE Sqrt (X real, Y real DEFAULT 0.0); CREATE TRIGGER newton_iterate AFTER INSERT ON Sqrt BEGIN UPDATE Sqrt SET Y = X; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; UPDATE Sqrt SET Y = (Y+X/Y)/2; END; 3405637750 #lispcafe