8.181 LSHIFT — Сдвиг битов влево

LSHIFT возвращает значение, соответствующее I со всеми битами, сдвинутыми влево на SHIFT позиций. SHIFT должно быть неотрицательным и меньше или равно BIT_SIZE(I), в противном случае значение результата не определено. Биты, сдвинутые с левого конца, теряются; нули сдвигаются с противоположного конца.

Эта функция была заменена на ISHFT внутреннюю функцию, которая является стандартной в Fortran 95 и более поздних версиях, и SHIFTL внутреннюю функцию, которая является стандартной в Fortran 2008 и более поздних версиях.

Расширение GNU

Элементарная функция

RESULT = LSHIFT(I, SHIFT)

Возвращаемое значение имеет тип INTEGER и тот же вид, что и I.

ISHFT — Сдвиг битов, ISHFTC — Циклический сдвиг битов, RSHIFT — Сдвиг битов вправо, SHIFTA — Сдвиг вправо с заполнением, SHIFTL — Сдвиг влево, SHIFTR — Сдвиг вправо