home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / C / Applications / DataScope 2.0.3 / DataScope2l / DSSource / fcmp2.c < prev    next >
Encoding:
Text File  |  1994-05-04  |  10.0 KB  |  19 lines  |  [TEXT/MPS ]
  1. # include <stdio.h>
  2. # include <Math.h>
  3.  
  4. /*
  5.     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  6.     fn_lap5c        5-point laplacian, constant stepsize
  7.     
  8.                     p  = pointer to source array
  9.                     t  = pointer to target array
  10.                     x  = number of x-points
  11.                     n  = number of points in source array
  12.                     dx = 1 / (delta-x * delta-x)
  13.                     dy = 1 / (delta-y * delta-y)
  14.     ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
  15. */
  16. void fn_lap5c(p,t,x,n,dx,dy)
  17.         float        *p,*t;
  18.         int            x,n;
  19.         extended