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