while(a:?read(?-,?-,~))#~do printf(?t,"~a
",ssubst(" ","-",printf(?-,"~r",a)));