[dammerung]

Can anyone explain what the program is doing to the real numbers to get the output I posted. Is this some sort of bit manipulation? I'm trying to replicate this in c++, but I haven't been able to figure out what is going on...

code:

	PROGRAM TESTING
	
	IMPLICIT NONE

	real(4) test
	character(4) buff

	test = 123

	write(buff, 100) test
	write(*,*) buff	

	test = 123.0

	write(buff, 100) test
	write(*,*) buff	
	test = 123.01

	write(buff, 100) test
	write(*,*) buff	
	
	test = 123.001

	write(buff, 100) test
	write(*,*) buff	

100	FORMAT(A4)	
 
	END PROGRAM

output:

   ÷B
   ÷B
 ▼♣÷B
 â ÷B
Press any key to continue

thanks!

[dammerung]

some more sample code (and a bump):

	PROGRAM TESTING
	
	IMPLICIT NONE

	real(4) test
	character(4) buff

	test = 0.123

	write(buff, 100) test
	write(*,*) buff	

	test = 1.23

	write(buff, 100) test
	write(*,*) buff	
	test = 12.3

	write(buff, 100) test
	write(*,*) buff	
	
	test = 1230

	write(buff, 100) test
	write(*,*) buff	

100	FORMAT(A4)	
 
	END PROGRAM

with output:

 mτ√=
 ñp¥?
 ═╠DA
  └ÖD
Press any key to continue