#pragma rtGlobals=1 // Use modern global access method. Function KKIm2ReX(xx, GiwaveX, GiWave, nr0) // w[nw-3] = nr0 = const part of Re(G), Gr_inf Variable xx Wave GiwaveX Wave GiWave Variable nr0 Abort "This is just a dummy for the KKIm2ReX XOP, this cannot work" // Gr = KKIm2ReX(xx, GiwaveX, GiWave, w[nw-3]) // w[nw-3] = nr0 = const part of Re(G), Gr_inf End