home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / lifeos2.zip / LIFE-1.02 / TESTS / IN / QSORT1.IN < prev    next >
Text File  |  1996-06-04  |  241b  |  10 lines
  1. q_sort([2,4,3,4,1],order=> <)=P?
  2. Q=q_sort([2,9,5,1,7,3],order=> <)?
  3. Q=P?
  4. .
  5. P=q_sort([9,8,7,6,5,4,3,2,1],order=> <)?
  6. Q=q_sort([9,8,4,5,3,2,7,1,6],order=> <)?
  7. Q=P?
  8. .
  9. q_sort([9,8,7,6,5,4,3,2,1],order=> <)=q_sort([9,8,4,5,3,2,7,1,6],order=> <)?
  10.