real to character converter

[tom rohling]

      Does anybody have a real good real*8 or real*4 to character converter 
subroutine (maybe) that can do the following, (or something like it):

       1)  Send it a real number to be converted to a character variable
           that can be forwarded to a graphics lib call like 'fmprstr'.

       2)  Specify how many decimals you would like to retain.  For example,
           if I have a real*8, I don't want to have all 16 digits in the
           character variable, but say only keep two.

     Here's the application:  we've got some CFD visualization software we
wrote ourselves and the routine (above) we wrote eons ago in the days of F66
is lately doing some weird voodoo on our code.  I figured that there's got 
to be a more elegent way to accomplish it.

     Any donations/suggestions would be welcomed.

===========================================================================
Tom Rohling                       "Infinity is where things happen 
trohling at uceng.uc.edu                 that don't"  -Anonymous
      or
rohling at afiris.ase.uc.edu
===========================================================================