Test

blockly.xml

When
    [Case
        (Deposit
            (Role "serviceProvider")
            (Role "customer")
            (Token "" "")
            (Constant 20)
        )
        (When
            [Case
                (Choice
                    (ChoiceId
                        "acceptRequest"
                        (Role "serviceProvider")
                    )
                    [Bound 1 2]
                )
                (If
                    (ValueEQ
                        (ChoiceValue
                            (ChoiceId
                                "acceptRequest"
                                (Role "serviceProvider")
                            ))
                        (Constant 1)
                    )
                    (If
                        (ValueEQ
                            (ChoiceValue
                                (ChoiceId
                                    "cancelRequest"
                                    (Role "customer")
                                ))
                            (Constant 1)
                        )
                        (Pay
                            (Role "serviceProvider")
                            (Account (Role "customer"))
                            (Token "" "")
                            (Constant 15)
                            Close 
                        )
                        Close 
                    )
                    (Pay
                        (Role "serviceProvider")
                        (Account (Role "customer"))
                        (Token "" "")
                        (Constant 20)
                        Close 
                    )
                )]
            2 Close 
        )]
    1 Close 

metadata.json

{"valueParameterDescriptions":[],"slotParameterDescriptions":[],"roleDescriptions":[],"contractType":"O","contractName":"","contractDescription":"","choiceDescriptions":[]}

playground.marlowe.json

{}