!	mark cases where db raw data type is floating
!	call isdatflt(mnem,ele,datisflt)
!       initial version has (very) short list inside subroutine
	subroutine isdatflt(mnem,ele,datisflt)
        use MPMnet_mod
	implicit none
	logical datisflt
	character*12 mnem
	integer ele, retval, intflag
	datisflt=.false.        !almost always
	if(mnem.eq.'CSR CERNLIFE') datisflt=.true.
	if(mnem(5:8).eq.'14KV') datisflt=.true.    !power metering
	if(mnem(5:8).eq.'DT80') datisflt=.true.    !dt80 logger
        if(mnem(1:2).eq.'R5') datisflt=.false.   !temp fix for c5 meter
!	 other cases are imbedded in mixed nodes; will need a
!	fancier sytem; for now these tend not to be logged, so matters little
!	retval = vmisfloat(mnem, ele, ele, intflag)
!	if (intflag .eq. 1) datisflt=.true.
	return
	end