Println("printSVector.ccc 1996, 8/17");



def printSVector(keys) {
  local i,j,n,max,width,m,k,kk,tmp0;
  n = Length(keys);
  max = 0;
  for (i=0; i<n; i++) {
     if (Length(keys[i]) > max) {
        max = Length(keys[i]);
     }
  }
  /* Println(max); */
  max = max+3;
  width = 80;
  m = 0;
  while ((m*max) < 80) {
     m = m+1;
  }
  k = 0; kk = 0;
  for (i=0; i<n; i++) {
    Print(keys[i]); kk = kk+1;
    k = k+Length(keys[i]);
    tmp0 = max-Length(keys[i]);
    for (j=0; j < tmp0 ; j++) {
       k = k+1;
       if (kk < m) {Print(" ");}
    }
    if (kk >= m) {
      kk = 0; k=0; Ln();
    }
  }
  Ln();
   
  /* Println(keys); */
}