home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l210 / 1.ddi / REFEXAMP.ARC / STRCHAR2.PRO < prev    next >
Encoding:
Text File  |  1988-06-21  |  266 b   |  14 lines
  1. %====================== str_char/2            ===============================
  2. Goal: str_char("A",CH)
  3. CH=A
  4. 1 Solution
  5. Goal: str_char(STR,'A')
  6. STR=A
  7. 1 Solution
  8. Goal: str_char("A",'A')
  9. True
  10. Goal: str_char("AB",CH)
  11. No Solution
  12. Goal: str_char("B",'A')
  13. False
  14.