*****************************************************************************************
*””””””””””””””””””””””””””””””””””””””””””''''''””””””””””””””””””””””””””””””””””””””””””
*””””””””””””””””””””””””””””””””””””””””''''''”””””””””””””””””””””””””””””””””””””””””””*
””””””””””””””””””””””””””””””””””””””””''''''''””””””””””””””””””””””””””””””””””””””””””””
*””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””''''''””””
”””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””'''''''
”'''''''””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””
”””””””””””””””””””””””'''''''””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””
[%]
”””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””'''''''””””””””
q≠1 ; q=1+p
”””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””””''''””””””””””””””””
q=1+
”””””””””””””””””””””””””””””””””””””””””””” ”””””””””””””””””””””””””””””””””””””””””””””
q≠1 ; q=1+p