# putc - put character  c  to standard output file
include ratdef
   subroutine putc(c)
   integer c
   
   call putch(c, STDOUT)
   return
   end