let
call_input_key call n =
SigCallKey
(call, (
Signature
.in_key n))