1.1 ! takayama 1: % $OpenXM$ ! 2: %% These functions should be moved to complex.sm1 ! 3: %% homogenize<m>, ord_w<m>, init<m>, ...