Repetir un string el número de veces deseado en Maxima

hacer_clave(clave,longitud):=block(

    [solucion],
    solucion:"",
    for i:0 thru longitud do (
        solucion:concat(solucion,clave[mod(i,slength(clave))])
    ),
    solucion
);


La solución es una cadena con la palabra clave, repetida tantas veces como sea necesario hasta que la cadena tenga la longitud introducida.