; *************************************** 
; Master Library 16
; ***************************************
; Combinations, Permutations, Factorials



lbl c                                   ;000
cp eq mean 

lbl pi                                  ;005
rcl 1 prd 4 dsz 1 pi

lbl sin                                 ;014
rcl 4 iff 1 cos rtn

lbl d                                   ;022
cp eq mean d' dsz 2 d gto sin

lbl e                                   ;033
cp eq mean d' rcl 2 inv prd 4 dsz 2 
e gto sin

lbl mean                                ;049
1 sto 4 gto sin

lbl a                                   ;056
x%t inv stf 1 1 sto 4 sto 3 x%t 

lbl b'                                  ;068
cp ge iff stf 1 abs

lbl iff                                 ;077
st* 3 x%t rc* 3 int eq dms stf 1

lbl dms                                 ;088
st* 3 rtn

lbl cos                                 ;093
0 1/x rcl 4 rtn

lbl d'                                  ;100
rcl 1 prd 4 1 inv sum 1 rtn

lbl b                                   ;111
x%t 2 sto 3 x%t b' x%t rcl 1 ge tan 
0 1/x rtn

lbl tan                                 ;127
rcl 2 rtn


#end 
