Searched refs:ptsdflt (Results 1 – 2 of 2) sorted by relevance
29734 static real ptsdflt; in pmxb_() local30840 ptsdflt = esk * comask_1.poenom - comask_1.wheadpt; in pmxb_()30842 if ((ptsndb > ptsdflt || comnsp_2.ptsgnd > 0.f) && comget_1.movbrk == in pmxb_()30857 if (ptsndb - ptsdflt > comnsp_2.ptsgnd - comask_1.poenom * in pmxb_()
20066 ptsdflt = esk*poenom-wheadpt20067 c if ((ptsndb.gt.ptsdflt.or.ptsgnd.gt.0.) .and. movbrk.eq.0) then20068 if ((ptsndb.gt.ptsdflt.or.ptsgnd.gt.0.) .and. movbrk.eq.020075 if (ptsndb-ptsdflt .gt. ptsgnd-poenom*eskgnd) then