A SIMPLIFIED ANALYTIC ITERATIVE ROTATION PROGRAM FOR THE IBM TYPE 650