#lang typed/racket

(: p Place)
(: p2 Place)
(: p3 Place)

(define p (dynamic-place 'typed-racket-test/succeed/places-helper 'double-place))
(place-channel-put/get p 10)
(place-wait p)


(define p2 (dynamic-place 'typed-racket-test/succeed/places-helper 'double-place))
(place-channel-put/get p2 -2+4i)
(place-wait p2)


(define p3 (dynamic-place 'typed-racket-test/succeed/places-helper 'echo-place))
(place-channel-put/get p3 'echo-this)
(place-wait p3)
