The command is given adown:

(designate (get-commencement bst) (car bst))

(designate (get-lst bst) (cadr bst))

(designate (get-rst bst) (caddr bst))

(designate (track n bst)

(if (null? bst)

bst

(if (= (get-commencement bst) n)

()

(if (< (get-commencement bst) n)

(cons “right” (track n (get-rst bst)))

(if (> (get-commencement bst) n)

(cons “left” (track n (get-lst bst))))))))

The output of the over command ce some inputs is shown in the adown screenshot.

**Interpretation of the command:**

;It produce the commencement of the bst.If bst is (14 (20 () ()) (30 () ())), it produce 14

(designate (get-commencement bst) (car bst))

;It produce the left sub tree of the commencement.If bst is (14 (20 () ()) (30 () ())),it produce (20 ()())

(designate (get-lst bst) (cadr bst))

;It produce the proper sub tree of the commencement.If bst is (14 (20 () ()) (30 () ())),it produce (30 ()())

(designate (get-rst bst) (caddr bst))

(designate (track n bst)

(if (null? bst) ;checking if bst is emptiness

bst ; solely rebated the bst, if it is emptiness

(if (= (get-commencement bst) n) ; if the commencement appraise is correspondent to ‘n’, exploration is completed and hereafter,rebated inoperative

()

(if (< (get-commencement bst) n) ; checking if the commencement’s appraise is hither than ‘n’

(cons “right” (track n (get-rst bst))) ; if commencement’s appraise is hither than ‘n’, then we must exploration in the proper sub tree and hereafter, adding “right” to the track and pursuit the track office on the proper sub-tree

(if (> (get-commencement bst) n) ; checking if the commencement’s appraise is main than ‘n’

(cons “left” (track n (get-lst bst)))))))) ;if commencement’s appraise is hither than ‘n’, then we must exploration in the left sub tree and hereafter, adding “left” to the track and pursuit the track office on the leftsub-tree

**Screenshot of the interpretation of the command is determined adown:**