definition module fixed /* Number with 5 decimal precision Pieter Koopman, 2010 Radboud Universty, Nijmegen The Netherlands pieter@cs.ru.nl */ import StdEnv, BigInt :: Fixed instance toString Fixed class toFixed a :: a -> Fixed instance toFixed Int instance toFixed String //instance toFixed BigInt instance == Fixed instance < Fixed // Arithmetic: instance + Fixed instance - Fixed instance zero Fixed instance * Fixed instance / Fixed // Truncated to 0 instance one Fixed instance abs Fixed instance ~ Fixed instance mod Fixed instance rem Fixed instance toInt Fixed