Timed CSPで追加定義されるプロセスを自前で作る。
Wait.ss
; Definitions
(define-event ti)
; Wait
(define-process (Wait t)
(if (> t 0)
(! ti (Wait (- t 1)))
(! ti SKIP)))
(define-process Test (Wait 5))
Go to list of users who liked
More than 5 years have passed since last update.
Timed CSPで追加定義されるプロセスを自前で作る。
; Definitions
(define-event ti)
; Wait
(define-process (Wait t)
(if (> t 0)
(! ti (Wait (- t 1)))
(! ti SKIP)))
(define-process Test (Wait 5))
Register as a new user and use Qiita more conveniently
Go to list of users who liked