package Ġcom . jem . liquid swipe . cli pp ath provider Ċ Ċ import Ġandroid . graphics . Path Ċ import Ġandroid . view . View Ċ import Ġcom . jem . liquid swipe . base . Clip Path Provider Ċ import Ġkotlin . math . cos Ċ import Ġkotlin . math . exp Ċ import Ġkotlin . math . pow Ċ Ċ /** Ċ Ġ* Ġ[ Clip Path Provider ] Ġwhich Ġprovides ĠLi quid Swipe Ġpath . Ċ Ġ*/ Ċ class ĠLi quid Swipe Clip Path Provider Ġ: ĠClip Path Provider () Ġ{ ĊĠĠĠ Ġ/** ĠCenter Ġof Ġthe Ġwave Ġ*/ ĊĠĠĠ Ġvar Ġwave Center Y : ĠFloat Ġ= Ġ 0 f ĊĠĠĠ Ġ/** ĠInitial Ġhorizontal Ġradius Ġof Ġthe Ġwave Ġ*/ ĊĠĠĠ Ġvar Ġinitial Horizontal Radius Ġ= Ġ 0 f ĊĠĠĠ Ġ/** ĠInitial Ġvertical Ġradius Ġof Ġthe Ġwave Ġ*/ ĊĠĠĠ Ġvar Ġinitial Vertical Radius Ġ= Ġ 8 2 f ĊĠĠĠ Ġ/** ĠInitial Ġreve aled Ġside Ġwidth Ġ*/ ĊĠĠĠ Ġvar Ġinitial Side Width Ġ= Ġ 0 f ĊĊĠĠĠ Ġprivate Ġvar Ġwave Horizontal Radius : ĠFloat Ġ= Ġ 0 f ĊĠĠĠ Ġprivate Ġvar Ġwave Vertical Radius : ĠFloat Ġ= Ġ 0 f ĊĠĠĠ Ġprivate Ġvar Ġside Width : ĠFloat Ġ= Ġ 0 f ĊĊĠĠĠ Ġcompanion Ġobject ĠConstants Ġ{ ĊĠĠĠĠĠĠĠ Ġprivate Ġfun ĠgetMax Horizontal Radius ( view : ĠView ): ĠFloat Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġview . width . toFloat () Ġ* Ġ 0 . 8 f ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġprivate Ġfun ĠgetMax Vertical Radius ( view : ĠView ): ĠFloat Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġview . height . toFloat () Ġ* Ġ 0 . 9 f ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġprivate Ġfun Ġget Initial Wave Center Y ( view : ĠView ): ĠFloat Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġview . height . toFloat () Ġ* Ġ 0 . 7 1 6 7 4 8 7 6 8 5 f ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġoverride Ġfun ĠgetPath ( percent : ĠFloat , Ġview : ĠView ): ĠPath Ġ{ ĊĠĠĠĠĠĠĠ Ġwave Center Y Ġ= Ġif Ġ( wave Center Y Ġ== Ġ 0 f ) Ġview . height . toFloat () Ġ/ Ġ 2 Ġelse Ġwave Center Y ĊĠĠĠĠĠĠĠ Ġwave Horizontal Radius Ġ= Ġget Wave Hor Radius ( 1 Ġ- Ġ( percent Ġ/ Ġ 1 0 0 ), Ġview ) ĊĠĠĠĠĠĠĠ Ġwave Vertical Radius Ġ= Ġget Wave Vert Radius ( 1 Ġ- Ġ( percent Ġ/ Ġ 1 0 0 ), Ġview ) ĊĠĠĠĠĠĠĠ Ġside Width Ġ= Ġget Side Width ( 1 Ġ- Ġ( percent Ġ/ Ġ 1 0 0 ), Ġview ) ĊĊĠĠĠĠĠĠĠ Ġpath . reset () ĊĠĠĠĠĠĠĠ Ġval Ġmask Width Ġ= Ġview . width Ġ- Ġside Width ĊĠĠĠĠĠĠĠ Ġpath . moveTo ( mask Width Ġ- Ġside Width , Ġ 0 f ) ĊĠĠĠĠĠĠĠ Ġpath . lineTo ( 0 f , Ġ 0 f ) ĊĠĠĠĠĠĠĠ Ġpath . lineTo ( 0 f , Ġview . height . toFloat ()) ĊĠĠĠĠĠĠĠ Ġpath . lineTo ( mask Width , Ġview . height . toFloat ()) ĊĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ== Ġ 1 0 0 f ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġpath . close () ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġpath ĊĠĠĠĠĠĠĠ Ġ} ĊĊĠĠĠĠĠĠĠ Ġval Ġcurve Start Y Ġ= Ġwave Center Y Ġ+ Ġwave Vertical Radius ĊĠĠĠĠĠĠĠ Ġpath . lineTo ( mask Width , Ġcurve Start Y ) ĊĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmask Width , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 1 3 4 6 1 9 4 7 5 6 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 0 5 3 4 1 3 3 9 5 8 3 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 2 4 1 2 7 7 9 6 3 4 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 1 5 6 1 5 0 1 4 5 8 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 3 3 2 2 3 7 4 2 6 8 ). toFloat () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 2 3 6 1 6 5 9 1 6 7 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 4 0 3 0 8 0 5 2 4 4 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 3 3 0 5 2 8 5 6 2 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 4 5 6 1 1 9 3 2 9 3 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 5 0 1 2 4 8 4 7 9 2 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 5 3 5 0 5 7 6 9 5 1 ). toFloat () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 5 1 5 8 7 8 1 2 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 5 4 1 8 2 2 2 3 1 7 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 5 6 6 4 1 3 4 7 9 2 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 5 6 5 0 3 4 9 8 7 8 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 5 7 4 9 3 4 8 7 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 5 6 8 9 6 5 5 1 2 2 ). toFloat () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 7 2 8 3 7 1 5 2 0 8 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 6 3 9 7 3 8 7 1 9 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 8 0 8 6 6 1 8 9 5 8 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 6 8 3 3 4 5 6 5 8 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 8 7 7 4 0 3 2 2 9 2 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 7 3 9 9 0 3 7 4 3 9 ). toFloat () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 9 6 5 3 4 6 4 5 8 3 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 8 1 2 2 6 0 5 1 2 2 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmask Width Ġ- Ġwave Horizontal Radius , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 0 . 8 9 3 6 1 8 3 6 5 9 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmask Width Ġ- Ġwave Horizontal Radius , Ġcurve Start Y Ġ- Ġwave Vertical Radius ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmask Width Ġ- Ġwave Horizontal Radius , ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 1 0 0 1 4 2 8 7 8 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 9 5 9 5 7 4 6 6 6 7 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 1 8 8 7 9 9 1 9 5 1 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 8 6 0 8 4 1 1 6 6 7 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 2 7 0 4 8 4 4 3 9 ). toFloat () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 7 8 5 2 1 2 3 3 3 3 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 3 3 3 0 5 4 4 7 5 6 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 7 0 3 3 8 2 1 2 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 3 7 9 5 8 4 8 0 4 9 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 5 2 9 1 1 2 5 6 2 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 4 6 6 5 1 0 2 8 0 5 ). toFloat () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 5 2 4 1 8 5 8 3 3 3 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 4 6 8 9 6 7 7 1 9 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 5 0 5 7 3 9 1 2 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 4 7 8 1 6 2 5 8 5 4 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 5 0 1 5 3 0 5 4 1 7 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 4 8 0 2 6 1 6 0 9 8 ). toFloat () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 3 1 8 7 4 8 6 0 4 2 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 5 7 1 4 2 3 9 0 2 4 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 2 3 3 2 0 5 7 0 8 3 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 6 2 0 4 1 1 6 4 6 3 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 1 5 4 1 1 6 5 4 1 7 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 6 8 7 4 0 3 ). toFloat () ĊĠĠĠĠĠĠĠ Ġ) ĊĠĠĠĠĠĠĠ Ġpath . cubic To ( ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( mask Width Ġ- Ġwave Horizontal Radius Ġ* Ġ 0 . 0 5 0 9 9 3 3 1 2 5 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 7 7 4 7 5 2 0 6 1 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmask Width , Ġ( curve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 1 . 8 7 0 9 2 5 6 8 2 9 ). toFloat (), ĊĠĠĠĠĠĠĠĠĠĠĠ Ġmask Width , Ġcurve Start Y Ġ- Ġwave Vertical Radius Ġ* Ġ 2 ĊĠĠĠĠĠĠĠ Ġ) ĊĊĠĠĠĠĠĠĠ Ġpath . lineTo ( mask Width , Ġ 0 f ) ĊĠĠĠĠĠĠĠ Ġpath . close () ĊĠĠĠĠĠĠĠ Ġreturn Ġpath ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġprivate Ġfun Ġget Wave Hor Radius ( percent : ĠFloat , Ġview : ĠView ): ĠFloat Ġ{ ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ<= Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġinitial Horizontal Radius ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ>= Ġ 1 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġ 0 f ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġp 1 : ĠFloat Ġ= Ġ 0 . 4 f ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ<= Ġp 1 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġinitial Horizontal Radius Ġ+ Ġpercent Ġ/ Ġp 1 Ġ* Ġ( getMax Horizontal Radius ( view ) Ġ- Ġinitial Horizontal Radius ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġt : ĠFloat Ġ= Ġ(( percent Ġ- Ġp 1 ) Ġ/ Ġ( 1 . 0 Ġ- Ġp 1 )). toFloat () ĊĠĠĠĠĠĠĠ Ġval ĠA : ĠFloat Ġ= ĠgetMax Horizontal Radius ( view ) ĊĠĠĠĠĠĠĠ Ġval Ġr : ĠFloat Ġ= Ġ 4 0 f ĊĠĠĠĠĠĠĠ Ġval Ġm : ĠFloat Ġ= Ġ 9 . 8 f ĊĠĠĠĠĠĠĠ Ġval Ġbeta : ĠFloat Ġ= Ġr Ġ/ Ġ( 2 Ġ* Ġm ) ĊĠĠĠĠĠĠĠ Ġval Ġk : ĠFloat Ġ= Ġ 5 0 f ĊĠĠĠĠĠĠĠ Ġval Ġomega 0 : ĠFloat Ġ= Ġk Ġ/ Ġm ĊĠĠĠĠĠĠĠ Ġval Ġomega : ĠFloat Ġ= Ġ(- beta . pow ( 2 ) Ġ+ Ġomega 0 . pow ( 2 )). pow ( 0 . 5 f ) ĊĊĠĠĠĠĠĠĠ Ġreturn ĠA Ġ* Ġexp (- beta Ġ* Ġt ) Ġ* Ġcos ( omega Ġ* Ġt ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġprivate Ġfun Ġget Wave Hor Radius Back ( percent : ĠFloat , Ġview : ĠView ): ĠFloat Ġ{ ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ<= Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġinitial Horizontal Radius ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ>= Ġ 1 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġ 0 f ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġp 1 : ĠFloat Ġ= Ġ 0 . 4 f ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ<= Ġp 1 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġinitial Horizontal Radius Ġ+ Ġpercent Ġ/ Ġp 1 Ġ* Ġinitial Horizontal Radius ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġval Ġt : ĠFloat Ġ= Ġ(( percent Ġ- Ġp 1 ) Ġ/ Ġ( 1 . 0 Ġ- Ġp 1 )). toFloat () ĊĠĠĠĠĠĠĠ Ġval ĠA : ĠFloat Ġ= Ġ 2 Ġ* Ġinitial Horizontal Radius ĊĠĠĠĠĠĠĠ Ġval Ġr : ĠFloat Ġ= Ġ 4 0 f ĊĠĠĠĠĠĠĠ Ġval Ġm : ĠFloat Ġ= Ġ 9 . 8 f ĊĠĠĠĠĠĠĠ Ġval Ġbeta : ĠFloat Ġ= Ġr Ġ/ Ġ( 2 Ġ* Ġm ) ĊĠĠĠĠĠĠĠ Ġval Ġk : ĠFloat Ġ= Ġ 5 0 f ĊĠĠĠĠĠĠĠ Ġval Ġomega 0 : ĠFloat Ġ= Ġk Ġ/ Ġm ĊĠĠĠĠĠĠĠ Ġval Ġomega : ĠFloat Ġ= Ġ(- beta . pow ( 2 ) Ġ+ Ġomega 0 . pow ( 2 )). pow ( 0 . 5 f ) ĊĊĠĠĠĠĠĠĠ Ġreturn ĠA Ġ* Ġexp (- beta Ġ* Ġt ) Ġ* Ġcos ( omega Ġ* Ġt ) ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġprivate Ġfun Ġget Wave Vert Radius ( percent : ĠFloat , Ġview : ĠView ): ĠFloat Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġp 1 : ĠFloat Ġ= Ġ 0 . 4 f ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ<= Ġ 0 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġinitial Vertical Radius ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ>= Ġp 1 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn ĠgetMax Vertical Radius ( view ) ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġreturn Ġinitial Vertical Radius Ġ+ Ġ( getMax Vertical Radius ( view ) Ġ- Ġinitial Vertical Radius ) Ġ* Ġpercent Ġ/ Ġp 1 ĊĠĠĠ Ġ} ĊĊĠĠĠ Ġprivate Ġfun Ġget Side Width ( percent : ĠFloat , Ġview : ĠView ): ĠFloat Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġp 1 : ĠFloat Ġ= Ġ 0 . 2 f ĊĠĠĠĠĠĠĠ Ġval Ġp 2 : ĠFloat Ġ= Ġ 0 . 8 f ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ<= Ġp 1 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġinitial Side Width ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġif Ġ( percent Ġ>= Ġp 2 ) Ġ{ ĊĠĠĠĠĠĠĠĠĠĠĠ Ġreturn Ġview . width . toFloat () ĊĠĠĠĠĠĠĠ Ġ} ĊĠĠĠĠĠĠĠ Ġreturn Ġinitial Side Width Ġ+ Ġ( view . width Ġ- Ġinitial Side Width ) Ġ* Ġ(( percent Ġ- Ġp 1 ) Ġ/ Ġ( p 2 Ġ- Ġp 1 )) ĊĠĠĠ Ġ} Ċ }