R help - Feb 2004 - Error on imodwt function - package waveslim

Hi,

I'm using package waveslim (V 1.3)  for wavelet analysis, and I get the 
following error:

mra1=mra(data,J=5)
imodwt(mra1)
Error in imodwt(mra1) : argument `y' is not of class "modwt"

I tried to overcome this doing

 class(mra1)="modwt"
 
but then I get

imodwt(mra1)
Error in switch(name, haar = select.haar(), d4 = select.d4(), mb4 = select.mb4
(),  :
        switch: EXPR must return a length 1 vector


I would appreciate any insights on this

Thanks in advance,

Susana Barbosa


Details:
platform i686-pc-linux-gnu
arch     i686
os       linux-gnu
system   i686, linux-gnu
status
major    1
minor    8.1
year     2003
month    11
day      21
language R