include lib/fp3.4th
include lib/fbetacdf.4th

fclear 100 set-precision

." Calculated (fbeta.cdf)" 9 emit ." Tabulated " cr cr
s" 0.01" s>float s" 0.5" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.06376856085851985" s>float f. cr
s" 0.1" s>float s" 0.5" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.2048327646991335" s>float f. cr
s" 1" s>float s" 0.5" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 1" s>float f. cr
s" 0" s>float s" 1" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0" s>float f. cr
s" 0.01" s>float s" 1" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.005012562893380045" s>float f. cr
s" 0.1" s>float s" 1" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.0513167019494862" s>float f. cr
s" 0.5" s>float s" 1" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.2928932188134525" s>float f. cr
s" 0.5" s>float s" 1" s>float s" 1" s>float fbeta.cdf f. 9 emit s" 0.5" s>float f. cr
s" 0.1" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.028" s>float f. cr
s" 0.2" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.104" s>float f. cr
s" 0.3" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.216" s>float f. cr
s" 0.4" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.352" s>float f. cr
s" 0.5" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.5" s>float f. cr
s" 0.6" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.648" s>float f. cr
s" 0.7" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.784" s>float f. cr
s" 0.8" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.896" s>float f. cr
s" 0.9" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.972" s>float f. cr
s" 0.5" s>float s" 5.5" s>float s" 5" s>float fbeta.cdf f. 9 emit s" 0.4361908850559777" s>float f. cr
s" 0.9" s>float s" 10" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.1516409096347099" s>float f. cr
s" 0.5" s>float s" 10" s>float s" 5" s>float fbeta.cdf f. 9 emit s" 0.08978271484375" s>float f. cr
s" 1" s>float s" 10" s>float s" 5" s>float fbeta.cdf f. 9 emit s" 1" s>float f. cr
s" 0.5" s>float s" 10" s>float s" 10" s>float fbeta.cdf f. 9 emit s" 0.5" s>float f. cr
s" 0.8" s>float s" 20" s>float s" 5" s>float fbeta.cdf f. 9 emit s" 0.4598773297575791" s>float f. cr
s" 0.6" s>float s" 20" s>float s" 10" s>float fbeta.cdf f. 9 emit s" 0.2146816102371739" s>float f. cr
s" 0.8" s>float s" 20" s>float s" 10" s>float fbeta.cdf f. 9 emit s" 0.9507364826957875" s>float f. cr
s" 0.5" s>float s" 20" s>float s" 20" s>float fbeta.cdf f. 9 emit s" 0.5" s>float f. cr
s" 0.6" s>float s" 20" s>float s" 20" s>float fbeta.cdf f. 9 emit s" 0.8979413687105918" s>float f. cr
s" 0.7" s>float s" 30" s>float s" 10" s>float fbeta.cdf f. 9 emit s" 0.2241297491808366" s>float f. cr
s" 0.8" s>float s" 30" s>float s" 10" s>float fbeta.cdf f. 9 emit s" 0.7586405487192086" s>float f. cr
s" 0.7" s>float s" 40" s>float s" 20" s>float fbeta.cdf f. 9 emit s" 0.7001783247477069" s>float f. cr
s" 0.1" s>float s" 1" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.0513167019494862" s>float f. cr
s" 0.2" s>float s" 1" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.1055728090000841" s>float f. cr
s" 0.3" s>float s" 1" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.1633399734659245" s>float f. cr
s" 0.4" s>float s" 1" s>float s" 0.5" s>float fbeta.cdf f. 9 emit s" 0.2254033307585166" s>float f. cr
s" 0.2" s>float s" 1" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.36" s>float f. cr
s" 0.2" s>float s" 1" s>float s" 3" s>float fbeta.cdf f. 9 emit s" 0.488" s>float f. cr
s" 0.2" s>float s" 1" s>float s" 4" s>float fbeta.cdf f. 9 emit s" 0.5904" s>float f. cr
s" 0.2" s>float s" 1" s>float s" 5" s>float fbeta.cdf f. 9 emit s" 0.67232" s>float f. cr
s" 0.3" s>float s" 2" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.216" s>float f. cr
s" 0.3" s>float s" 3" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.0837" s>float f. cr
s" 0.3" s>float s" 4" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.03078" s>float f. cr
s" 0.3" s>float s" 5" s>float s" 2" s>float fbeta.cdf f. 9 emit s" 0.010935" s>float f. cr