RHS column genrator routine added to Sn