/* display proper fraction */

dpfx int n,d,p [
 if p [MC 10*n/d,14;dpfx 10*n%d,d,p-1]
 ]

dpf int n,d,p [
 putchar '.'
 dpfx n,d,p
 ]