home *** CD-ROM | disk | FTP | other *** search
/ Boston 2 / boston-2.iso / DOS / PROGRAM / PASCAL / NRPAS / SCRSHO.DEM < prev    next >
Text File  |  1993-12-01  |  217b  |  17 lines
  1. PROGRAM d9r1(input,output);
  2. (* driver for routine SCRSHO *)
  3.  
  4. (*$I MODFILE.PAS *)
  5. (*$I BESSJ0.PAS *)
  6.  
  7. FUNCTION fx(x: real): real;
  8. BEGIN
  9.    fx := bessj0(x)
  10. END;
  11.  
  12. (*$I SCRSHO.PAS *)
  13.  
  14. BEGIN
  15.    scrsho
  16. END.
  17.