package Ġnet . cord a . samples . re iss u ance . cand ies . flows . re iss u ance Respond ers Ċ Ċ import Ġcom . r 3 . cord a . lib . re iss u ance . flows . Unlock Re iss ued States Ċ import Ġcom . r 3 . cord a . lib . re iss u ance . flows . Unlock Re iss ued States Responder Ċ import Ġcom . r 3 . cord a . lib . tokens . contracts . states . F ung ible Token Ċ import Ġcom . r 3 . cord a . lib . tokens . contracts . types . TokenType Ċ import Ġnet . cord a . core . contracts . require That Ċ import Ġnet . cord a . core . flows . Flow Session Ċ import Ġnet . cord a . core . flows . Initi ated By Ċ import Ġnet . cord a . core . transactions . Signed Transaction Ċ Ċ @ Initi ated By ( Unlock Re iss ued States :: class ) Ċ class ĠUn lock C andy Coupon Responder ( ĊĠĠĠ Ġother Session : ĠFlow Session Ċ ) Ġ: ĠUn lock Re iss ued States Responder ( other Session ) Ġ{ ĊĊĠĠĠ Ġoverride Ġfun Ġcheck Constraints ( st x : ĠSigned Transaction ) Ġ{ ĊĠĠĠĠĠĠĠ Ġrequire That Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġother Inputs . forEach Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġtoken Ġ= Ġit . state . data Ġas ? ĠF ung ible Token ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Input Ġ$ it Ġis Ġof Ġtype ĠF ung ible Token " Ġusing Ġ( token Ġ!= Ġnull ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġtoken !! ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Input Ġtoken Ġ$ token Ġis Ġof Ġtype ĠC andy Coupon " Ġusing Ġ( token . token Type Ġ== ĠTokenType (" C andy Coupon ", Ġ 0 )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠĠĠĠĠ Ġother Outputs . forEach Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġval Ġtoken Ġ= Ġit . data Ġas ? ĠF ung ible Token ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Output Ġ$ it Ġis Ġof Ġtype ĠF ung ible Token " Ġusing Ġ( token Ġ!= Ġnull ) ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġtoken !! ĊĠĠĠĠĠĠĠĠĠĠĠĠĠĠĠ Ġ" Output Ġtoken Ġ$ token Ġis Ġof Ġtype ĠC andy Coupon " Ġusing Ġ( token . token Type Ġ== ĠTokenType (" C andy Coupon ", Ġ 0 )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} Ċ } Ċ