Exemple sabrina (suite)

SQL > lisp;

LISP ? (DE ( #:T:POINT #:T:POINT): distance (X Y)

LISP ? (SQRT (+ (** (- (CAR X) (CAR Y))))

LISP ? (** (- (CAR (CDR X)) (CAR (CDR Y))))))

LISP T

LISP ? (save # ( #:T:POINT #:T:POINT): distance e)

LISP #:T:POINT #:T:POINT): distance

LISP ? fin

SQL > select L1.station, L2.station

SQL > From LOC L1 L2

SQL > Where distance ( L1.lieu, L2.lieu) < 10;

Diapositive précédente

Diapositive suivante

Revenir à la première diapositive

Afficher la version graphique