B!Str(diamor,5) $1>KXer(5BO\iv,9FS`mz 0 441 528 633 637 706 758 780 842 904 904 965