====================================================================
 
      tell if a string is empty (only space characters)
      nemptystring = 0  ==> empty
      nemptystring = 1  ==> non empty
 
 ====================================================================
 
function nemptystring(longline)
 
COMMONS: 
common-initi.f
 
SUBROUTINES USED:
 
micromap-index
Mon Jul 17 08:57:46 CEST 2017