Module M
	Sub Main()
		Dim a#
		a=23.45D		
	End Sub
End Module