Тип переменной в Compile (ошибка в программе)

Форум пользователей пакета Mathematica

Модератор: Admin

suntanka
Сообщения: 16
Зарегистрирован: Ср дек 22, 2010 9:03 pm

Тип переменной в Compile (ошибка в программе)

Сообщение suntanka » Сб сен 08, 2012 10:58 am

Подскажите пожалуйста, если кто знает, какой переменной (ее типом) не доволен компилятор, может дело в графике... Программа рисует правильную картинку, но ругается...

Код: Выделить всё

poly =
 Compile[
  {n, n2, n1},
  Module[
   {g1, g2, g3},
   g1 = \[Pi]*n1/n;
   g2 = \[Pi]*n2/n;
   g3 = \[Pi]*n1;
   (*{i=2,n=3,w={},pr}*)
   RegionPlot[
    Abs[x] <= g1  && Abs[y] <= g2 &&
     Abs[n1*y - n2*x] <= g3, {x, -g2 - \[Pi],
     g2 + \[Pi]}, {y, -g1 - \[Pi], g2 + \[Pi]},
    PlotStyle -> Directive[Green, Opacity[0.5]]]
   (*Show[gr]*)   
   ]
  ]


Потом пишу:

Код: Выделить всё

 poly[3, 2, 1]

И получаю:
картинку и ошибки[/code]
(загружен файл с кодом) Подскажите пожалуйста в чем ошибка