# putdec - put decimal integer  n  in field width >= w  to STDOUT
include ratdef
   subroutine putdec(n, w)
   integer n, w
   
   call putint(n, w, STDOUT)
   return
   end