Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.3 4.3bsd-beta 6/6/85; site ucbvax.BERKELEY.EDU
Path: utzoo!watmath!clyde!burl!ulysses!ucbvax!ubc.CSNET!manis
From: manis@ubc.CSNET (Vincent Manis)
Newsgroups: net.lang.mod2
Subject: Bit shifting
Message-ID: <1084:manis@cs.ubc.cdn>
Date: Thu, 17-Apr-86 14:01:54 EST
Article-I.D.: cs.1084:manis
Posted: Thu Apr 17 14:01:54 1986
Date-Received: Sun, 20-Apr-86 01:04:59 EST
References: <8604171712.5831@ur-cayuga.rochester.arpa>
Sender: daemon@ucbvax.BERKELEY.EDU
Organization: The ARPA Internet
Lines: 3

Generally, your SYSTEM module will export some sort of shift operation.
(At least, those compilers based on the ETH 68K compiler do). Look for
the name ASH in the manual.