CG-USER(46): (pascal 5) 0[6]: (PASCAL 5) 1[6]: (GENERATE-LIST (1) # 5) 2[6]: (GET-NEXT-ROW (1)) 3[6]: (GET-NEXT-ROW-SEQ (1)) 3[6]: returned (1) 2[6]: returned (1 1 1) 2[6]: (GENERATE-LIST (1 1 1) # 4) 3[6]: (GET-NEXT-ROW (1 1 1)) 4[6]: (GET-NEXT-ROW-SEQ (1 1 1)) 5[6]: (GET-NEXT-ROW-SEQ (1)) 5[6]: returned (1) 4[6]: returned (2 1) 3[6]: returned (1 2 1 1) 3[6]: (GENERATE-LIST (1 2 1 1) # 3) 4[6]: (GET-NEXT-ROW (1 2 1 1)) 5[6]: (GET-NEXT-ROW-SEQ (1 2 1 1)) 6[6]: (GET-NEXT-ROW-SEQ (1 1)) 7[6]: (GET-NEXT-ROW-SEQ NIL) 7[6]: returned (1) 6[6]: returned (2 1) 5[6]: returned (3 2 1) 4[6]: returned (1 3 2 1 1) 4[6]: (GENERATE-LIST (1 3 2 1 1) # 2) 5[6]: (GET-NEXT-ROW (1 3 2 1 1)) 6[6]: (GET-NEXT-ROW-SEQ (1 3 2 1 1)) 7[6]: (GET-NEXT-ROW-SEQ (2 1 1)) 8[6]: (GET-NEXT-ROW-SEQ (1)) 8[6]: returned (1) 7[6]: returned (3 1) 6[6]: returned (4 3 1) 5[6]: returned (1 4 3 1 1) 5[6]: (GENERATE-LIST (1 4 3 1 1) # 1) 6[6]: (GET-NEXT-ROW (1 4 3 1 1)) 7[6]: (GET-NEXT-ROW-SEQ (1 4 3 1 1)) 8[6]: (GET-NEXT-ROW-SEQ (3 1 1)) 9[6]: (GET-NEXT-ROW-SEQ (1)) 9[6]: returned (1) 8[6]: returned (4 1) 7[6]: returned (5 4 1) 6[6]: returned (1 5 4 1 1) 6[6]: (GENERATE-LIST (1 5 4 1 1) # 0) 6[6]: returned NIL 5[6]: returned ((1 4 3 1 1)) 4[6]: returned ((1 3 2 1 1) (1 4 3 1 1)) 3[6]: returned ((1 2 1 1) (1 3 2 1 1) (1 4 3 1 1)) 2[6]: returned ((1 1 1) (1 2 1 1) (1 3 2 1 1) (1 4 3 1 1)) 1[6]: returned ((1) (1 1 1) (1 2 1 1) (1 3 2 1 1) (1 4 3 1 1)) 0[6]: returned ((1) (1 1 1) (1 2 1 1) (1 3 2 1 1) (1 4 3 1 1)) ((1) (1 1 1) (1 2 1 1) (1 3 2 1 1) (1 4 3 1 1))