Marlowe Meet 1 - 3

metadata.json

{"valueParameterInfo":[],"timeParameterDescriptions":[],"roleDescriptions":[],"contractType":"Other","contractShortDescription":"Unknown","contractName":"Unknown","contractLongDescription":"We couldn't find information about this contract","choiceInfo":[]}

playground.marlowe

Let
    "hargabarang"
    (ConstantParam "inputhargabarang")
    (Let
        "nilaipenawaran"
        (ConstantParam "inputnilaipenawaran")
        (If
            (ValueGT
                (ConstantParam "inputnilaipenawaran")
                (ConstantParam "inputhargabarang")
            )
            (When
                [Case
                    (Deposit
                        (Role "buyer")
                        (Role "buyer")
                        (Token "" "")
                        (ConstantParam "inputnilaipenawaran")
                    )
                    (Pay
                        (Role "buyer")
                        (Account (Role "seller"))
                        (Token "" "")
                        (ConstantParam "inputnilaipenawaran")
                        Close 
                    )]
                1673273340000 Close 
            )
            Close 
        )
    )

playground.marlowe.json

{}