Репозиторий Sisyphus
Последнее обновление: 1 октября 2023 | Пакетов: 18631 | Посещений: 37038344
en ru br
Репозитории ALT
S:2.0.20190610-alt3
5.1: 2.0-alt1
www.altlinux.org/Changes

Группа :: Науки/Математика
Пакет: sparskit

 Главная   Изменения   Спек   Патчи   Исходники   Загрузить   Gear   Bugs and FR  Repocop 

c-----------------------------------------------------------------------
function distdot(n,x,ix,y,iy)
integer n, ix, iy
real*8 distdot, x(*), y(*), ddot
external ddot
distdot = ddot(n,x,ix,y,iy)
return
end
c-----end-of-distdot
 
дизайн и разработка: Vladimir Lettiev aka crux © 2004-2005, Andrew Avramenko aka liks © 2007-2008
текущий майнтейнер: Michael Shigorin