Buenas noches !!!

[thomas_bevan@aardvark.net.au]

Ya has intentado algo como,

 twiddlefactor (1 :: Float) (1 :: Integer)  ?

El problema tuya es que no hay un 'type' que es 'Floating' y 'Integral'
en el mismo tiempo.

Tom

> Buenas noches, quisiera consultarles sobre lo siguiente, tengo estas
> dos funciones
>
> -- Calcula Raiz Wn
>
> wn n = cos c :+ (-1*sin c) where c=2*pi/n
>
>
>
>
>
>
>
> twiddlefactor r k =
>
>     concat [(map (^i) [(wn rs)^i | i<-[0..s-1]])| i<-[0..r-1]]
>
>       where
>
>        rs = (r^k) ;
>
>        s = (r^(k-1))
>
> la dificultad que tengo es que twiddlefactor no me acepta enteros
>
> compila pero no me acepta los parametros, sin embargo si la defino como
>
>
>
>
> --Calcula vector de Twiddle Factor
>
> twiddlefactor r s rs= concat [(map (^i) diag) | i<-[0..r-1]]
>
>     where
>
>       diag = [(wn rs)^i | i<-[0..s-1]]
>
> no tengo problema, lo que sucede es que posteriormente esta definicion
> me es inconveniente pues el valor de rs es r^k y lo necesito en un
> programa recursivo, que me esta dando inconvenientes precisamente por
> que debo estar reenviando el valor r^k.  Agradezco la ayuda que puedan
> darme