do input""n:if k?n-0^n," ",docu$(n)
k=split("January February March April May June July August September October  December",docu$())loop