,SUBSCRIPT ,EXAMPLES #A4 ,OP5 P>5!SIS ;X SUB "O COMMA ;X SUB TWO CLOSE P>5!SIS IS WRITT5 _% (X1, X2) _: #B4 ,! >EA ( A TRAPEZOID ,A EQUALS OP5 FRAC;N ;H OV] TWO CLOSE FRAC;N OP5 P>5!SIS ;B SUB "O PLUS ;B SUB TWO CLOSE P>5!SIS IS EQUAL TO OP5 FRAC;N ;H OP5 P>5!SIS ;B SUB "O PLUS ;B SUB TWO CLOSE P>5!SIS OV] TWO EQUALS "O-HALF OP5 P>5!SIS ;B SUB "O PLUS ;B SUB TWO CLOSE P>5!SIS ;H IS WRITT5 _% ,A .K ?H/2#(B1+B2) .K ?H(B1+B2)/2# .K ?1/2#(B1+B2)H _: #C4 ,WAT] : IS AL "KN Z ;,H TWO ,O IS WRITT5 _% ,H2,O _: #D4 A SUB I IS WRITT5 _% A;I _: #E4 ,! EQUA;N A SUB ;N EQUALS A SUB ;N M9US "O PLUS ?REE #A IS WRITT5 _% A;N .K A;N-1"+3 _: #F4 ,! EQUA;N A EQUALS OP5 FRAC;N ;V SUB ;F M9US ;V SUB I OV] ;T CLOSE FRAC;N IS WRITT5 _% A .K ?V;F"-V;I"/T# _: #G4 ,! LOG BASE ;B ( A IS WRITT5 _% LOG;B A _: #H4 ,! LOG BASE TWO ( ;X IS WRITT5 _% LOG2 X _: #I4 ,! NUMB] ( P]MUTA;NS ( ;N OBJECTS TAK5 ;R AT A "T IS WRITT5 _% ;N",P;R ,'OR ,P;N[R _: #AJ4 ,! NUMB] ( COMB9A;NS ( ;N OBJECTS TAK5 ;R AT A "T IS WRITT5 _% ;N",C;R ,'OR ,C;N[R _: #AA4 ,! NUMB] ( P]MUTA;NS ( FIVE OBJECTS TAK5 ?REE AT A "T IS WRITT5 _% ;5",P3 ,'OR ,P;5[3 _: #AB4 ,! NUMB] ( COMB9A;NS ( FIVE OBJECTS TAK5 ?REE AT A "T #B IS WRITT5 _% ;5",C3 ,'OR ,C;5[3 _: #AC4 ,! EQUA;N "O Z]O "O "O Z]O SUB TWO EQUALS TW5TY-TWO SUB T5 IS WRITT5 _% #10110;2 .K #22;10 _: #C