|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 1536 (0x600)
Types: TextFile
Names: »trclib«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »trclib«
; library procedure rclib=algol external integer procedure rclib; begin write(out,<: protectcf rungekutta eberlein headl extplosion solvesym newtrans changelink stderroradp headfilei bossout resultcf readyin setdescrcf getreci besseljy extendcf gamma householder beta readyout pzero zero1 transfer fit invertsym headm decompose dbrecdecode adpcode heapsortpr besselik recordinput buflengthi readaline minimum jacobi externaladp fpexecute buflengthcf adapint mdsortproc newreclcf fft :>); rclib:= 44; end; end; scope project rclib rclib =compresslib list.yes protectcf rungekutta eberlein , headl extplosion solvesym newtrans changelink , stderroradp headfilei bossout resultcf readyin , setdescrcf getreci besseljy extendcf gamma , householder beta readyout pzero zero1 , transfer fit invertsym headm , decompose dbrecdecode adpcode heapsortpr , besselik recordinput buflengthi readaline minimum , jacobi externaladp fpexecute buflengthcf adapint , mdsortproc newreclcf fft ▶EOF◀