============================================
convert a real double precision number
to a string
=============================================
function fnumchar(aa)
COMMONS:
common-initi.f
SUBROUTINES USED:
redint
putsign
convex
micromap-index
Mon Jul 17 08:57:45 CEST 2017