;; DO NOT PUT ANY PERSONALLY IDENTIFYING INFORMATION IN THIS FILE.
;; YOUR COMPUTER SCIENCE IDS WILL BE SUFFICIENT TO IDENTIFY YOU
;; AND, IF YOU HAVE ONE, YOUR PARTNER
; Computer Science 110
; Graded Problem Set 11
;
; Computer Science id (Student 1): z2b0b
; Computer Science id (Student 2): ________
; Consider two representations of some streets in Downtown Vancouver.
; The first is a fragment from Google Maps:
;.
; The second is an abstract representation of streetways that you can
; take to get to nearby venues:
;.
;
; As you can see, there is more than one way to get to
; Shine Hip-Hop Night Club (at Cordova and Richards) as well as the
; London School of Hairdressing and Aesthetics (at Pender and Hamilton).
; This means that we can view these streetways as a graph. Furthermore,
; there are cycles: One can get from BC Hydro to WOW Tasty Food Delivery
; and back. However, following the given streets, one could get stuck
; at Anti-Hero 13 Boutique.
This study source was downloaded by 100000832361371 from CourseHero.com on 02-09-2022 09:59:19 GMT -06:00
https://www.coursehero.com/file/79720635/pset-11-solutiondocx/
, ; Problem 1:
;
; The following incomplete data definitions can represent venues and
; streetways in Vancouver or anywhere else. Using the given example as
; a guide, define an example of your own that includes AT LEAST the venues
; and streetways in the block that spans from Richards to Hamilton and from
; Dunsmuir to Hastings (there are 9 venues and 16 streetways in that block).
; The provided examples are encapsulated, so they should not
; interfere with your definition. DO NOT REUSE THE GIVEN EXAMPLE TO
; DEFINE YOURS.
(define-struct vnu (nm los))
;; Venue is (make-vnu String (listof StreetWay))
(define-struct sw (nm dst))
;; Streetway is (make-sw String Venue)
;; interp. (make-sw s v) is a streetway s that leads to the destination venue v.
(define M0
(shared ([-AHB- (make-vnu "Anti-Hero 13 Boutique" (list))]
[-RR- (make-vnu "Rocket Reprographics"
(list (make-sw "Cordova Eastbound" -AHB-)))]
[-VFS- (make-vnu "Vancouver Film School"
(list (make-sw "Hastings Westbound" -WTFD-)
(make-sw "Homer Northbound" -RR-)))]
This study source was downloaded by 100000832361371 from CourseHero.com on 02-09-2022 09:59:19 GMT -06:00
https://www.coursehero.com/file/79720635/pset-11-solutiondocx/