module sync.

% synchronous connectives definition
% (? is asynchronous, but it's defined here as well)

infixr x : 550.    % multiplicative conjunction (tensor)
infixr @ : 600.    % additive disjunction
prefix ! : 500.    % 'of course' modal
prefix ? : 500.    % 'why not' modal

P x Q *- P *- Q.

P @ _ *- P.
_ @ Q *- Q.

! P <= P.

? P *- (bot *- P) => bot.
