Lines Matching refs:DFLAG

52       DOUBLE PRECISION DFLAG,DH11,DH12,DH21,DH22,DP1,DP2,DQ1,DQ2,DTEMP,  local
72       DFLAG = -TWO
90       DFLAG = ZERO
101       DFLAG = ONE
113       DFLAG = -ONE
126       IF (.NOT.DFLAG.GE.ZERO) GO TO 90
128       IF (.NOT.DFLAG.EQ.ZERO) GO TO 80
131       DFLAG = -ONE
136       DFLAG = -ONE
189       IF (DFLAG) 250,230,240
204       DPARAM(1) = DFLAG