Searched refs:ONEMEP (Results 1 – 2 of 2) sorted by relevance
| /dports/graphics/dataplot/dataplot-2c1b27601a3b7523449de612613eadeead9a8f70/src/ |
| H A D | dp12.F | 7952 ONEMEP=1.0-EPS
7967 CALL CKINTE(ATMIN,EPS,ONEMEP,ONEPEP,ICMIN,IRTMIN)
7968 CALL CKINTE(ATMAX,EPS,ONEMEP,ONEPEP,ICMAX,IRTMAX)
8007 WRITE(ICOUT,9025)EPS,ONEMEP,ONEPEP
20939 ONEMEP=1.0-EPS
21007 CALL CKINTE(XTMAX2,EPS,ONEMEP,ONEPEP,ICINT,IXTMX2)
21011 CALL CKINTE(XTMAX2,EPS,ONEMEP,ONEPEP,ICINT,IXTMX2)
21015 CALL CKINTE(XTMAX2,EPS,ONEMEP,ONEPEP,ICINT,IXTMX2)
|
| H A D | dp4.F | 8925 SUBROUTINE CKINTE(X,EPS,ONEMEP,ONEPEP,ICINT,IX) argument
8966 WRITE(ICOUT,52)X,EPS,ONEMEP,ONEPEP
8983 IF(ONEMEP.LE.ABSREM.AND.ABSREM.LE.ONEPEP)GOTO1120
9019 WRITE(ICOUT,9012)X,EPS,ONEMEP,ONEPEP
9025 WRITE(ICOUT,9014)EPS,ONEMEP,ONEPEP
|