Lines Matching defs:DFLAG
19 * WITH DPARAM(1)=DFLAG, H HAS ONE OF THE FOLLOWING FORMS..
21 * DFLAG=-1.D0 DFLAG=0.D0 DFLAG=1.D0 DFLAG=-2.D0
47 * DPARAM(1)=DFLAG
56 DOUBLE PRECISION DFLAG,DH11,DH12,DH21,DH22,TWO,W,Z,ZERO
63 DFLAG = DPARAM(1)
64 IF (N.LE.0 .OR. (DFLAG+TWO.EQ.ZERO)) GO TO 140
68 IF (DFLAG) 50,10,30
107 IF (DFLAG) 120,80,100
