Выделение дробной части в Fortran

[Ulrih]

Здравствуйте!

Возник вопрос: какой оператор позволяет в Фортране выделить целую часть.
Так чтобы: O(1.50d0) = 0.50d0
где O(number) --- тот самый заветный оператор.

.Олег.

[Ajabsandal]

Ulrih в сообщении #292186 писал(а):

Здравствуйте!

Возник вопрос: какой оператор позволяет в Фортране выделить целую часть.
Так чтобы: O(1.50d0) = 0.50d0
где O(number) --- тот самый заветный оператор.

.Олег.

Мне "кажется", что оператор в Фортране нечто другое, а вот встроеная функция Фортрана INT(A) (AINT, DINT) есть!
http://www.accel.ru/inf/fortran/for_8400.html

[godsdog]

Ulrih в сообщении #292186 писал(а):

Здравствуйте!

Возник вопрос: какой оператор позволяет в Фортране выделить целую часть.
Так чтобы: O(1.50d0) = 0.50d0
где O(number) --- тот самый заветный оператор.

.Олег.

Так, чтобы O(1.50d0) = 0.50d0, то Fraction(1.50d0). Только это выделение дробной части.

[godsdog]

Прошу прощения. Сболтнул глупость. В Фортране Fraction(x) нечто другое, чем просто выделение дробной части.

Fraction(1.5d0)=0.75d0

[allchemist]

Что мешает использовать floor?
X-FLOOR(X), как-то так.

[LAL]

Я бы сделала так:
(1.50d0)-int(1.50d0) получим 0.50d0