In[]:=
Clear["Global`*"];​​FullSimplify[H^(1-Sec[β])(H-sSin[β])^(-1+Sec[β])//PowerExpand]//PowerExpand
Out[]=
1-Sec[β]
H
-1+Sec[β]
(H-sSin[β])