C*+*+*+*+*+*
C     This program was produced by the  ATOMFT  translator version 3.11
C                                 Copyright(c) 1979-93, by Y. F. Chang
C*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+*+
C This is for the inputs below.
C
COPTION DOUBLE,DUMP=1
C     DIFF (X1,X,1) = 4.0 * X2 -  2.0 * DIFF (X2,X ,1) - 2.0 * X1
C     DIFF (X2,X,2) = 3.0*DIFF(X2,X,1)-2.0*X2-DIFF(X1,X,2)-DIFF(X1,X,1)
C    C +X1