П Р О Ц Е Д У Р А  "psi2pn"

     Машинная процедура psi2pn служит для получения степени 2 в формате числа
     с двойной точностью. Число на входе может быть только целым.

 Формат обращения:
                 <psi2pn w1>
 Результат замены:
                 w3 (w3 = 2. ** w1)