ArrayShift3.cm

Last Edited by: Spreitzer, June 2, 1985 9:18:13 pm PDT

← &d ← CompareRead.ReadDesign["[Indigo]<Rosemary>Capt>Shift3M>ShiftCap3-Str.DF"]

← CompareNormal.CheckDesign[&d, check, ignore]

← &srwc ← CompareOps.ToType[&d, "SRWC[s1: 13, s2: 7]"]

← CompareRecognizeArrays.Arrayify[&srwc]

← &3bitsr ← CompareOps.ToType[&d, "NBitSR[n: 3]"]

← CompareRecognizeArrays.Arrayify[&3bitsr]

← CompareWrite.WriteDesign[&d, "Shift3A", "SA", "[Indigo]<Rosemary>Capt>"]

← &outer ← &3bitsr.asArray

← &inner ← &srwc.asArray

← CompareNestArrays.NestCellTypes[&3bitsr]