Логический тип и выбор в Фортране - PullRequest
0 голосов
/ 20 января 2010

Я встретил следующее утверждение на фортране:

  integer           iparam(11), ipntr(14)
  logical           select(maxncv)
  Double precision
 &                  ax(maxn), d(maxncv,3), resid(maxn), 
 &                  v(ldv,maxncv), workd(3*maxn), 
 &                  workev(3*maxncv), 
 &                  workl(3*maxncv*maxncv+6*maxncv)

Ну, я могу понять, что такое integer, Double precision.

Но что насчет logical select?Что они имеют в виду?

Ответы [ 2 ]

1 голос
/ 20 января 2010

«логический» - логический тип, который принимает только значения .TRUE. или. ЛОЖЬ. Объявление создает одномерный массив с именем "select" длиной "maxncv", так же как предыдущее объявление создает целочисленный одномерный массив "iparam" длины "11".

Компоновка (например, символ продолжения в начале непрерывных линий) и использование Double Precision предлагают Fortran 77. Для нового кода я рекомендую Fortran 95 / 2003.

0 голосов
/ 20 января 2010

логический тип данных, как и двойная точность.выберите переменную так же, как d.maxncv - это массив, связанный с maxncv.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...