/*  Make a continous fraction of 1/(1+x)  */
/*  From the 'Mathematica core language' manual  */

/*  Maxima uses:  a + 1/(b)  */
cfdisrep(append([0], makelist(1, 2), [1 + x]));