Prevent tx failure and fund locking during payout caused by address network mismatch

[paluh]

Runtime should prevent transaction failure when contract contains address with wrong network

Marlowe validator doesn't really care what type of network we use:

• when checking signature: https://github.com/input-output-hk/marlowe-plutus/blob/d9c3093270e7af8b335ee2ddce9c0a18be2bd9a3/marlowe-plutus/src/Language/Marlowe/Plutus/Script.hs#L449

• when checking payouts: https://github.com/input-output-hk/marlowe-plutus/blob/d9c3093270e7af8b335ee2ddce9c0a18be2bd9a3/marlowe-plutus/src/Language/Marlowe/Plutus/Script.hs#L482

In other words it is enough (I tested this quickly) to adjust the network when we construct mustPayToAddress to make transaction valid and not lock the funds:

marlowe-cardano/marlowe-runtime/tx/Language/Marlowe/Runtime/Transaction/BuildConstraints.hs

Line 543 in a93cac3

let addr' = Address $ V1.serialiseAddress net addr