Back to home page

EIC code displayed by LXR

 
 

    


Warning, /include/higz/hiwcps.inc is written in an unsupported language. File is not indexed.

0001 *
0002 * $Id$
0003 *
0004 * $Log$
0005 * Revision 1.1  1996/02/14 13:10:14  mclareni
0006 * Initial revision
0007 *
0008 *
0009 #ifndef CERNLIB_HIGZ_HIWCPS_INC
0010 #define CERNLIB_HIGZ_HIWCPS_INC
0011 *
0012 *
0013 * hiwcps.inc
0014 *
0015 *CMZ :  1.18/00 23/04/93  17.27.57  by  O.Couet
0016 *-- Author :
0017       IXWCPS(U)=NINT(4.*WKMAX(IPSI)*(FX*(U-X1W)+X1V))
0018       IYWCPS(V)=NINT(4.*WKMAX(IPSI)*(FY*(V-Y1W)+Y1V))
0019 
0020 #endif