DataMuseum.dk

Presents historical artifacts from the history of:

RC4000/8000/9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC4000/8000/9000

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦9de6e0e64⟧ TextFile

    Length: 768 (0x300)
    Types: TextFile
    Names: »ttestfp«

Derivation

└─⟦00964e8f7⟧ Bits:30007478 RC8000 Dump tape fra HCØ.
    └─⟦b2ec5d50f⟧ 
        └─⟦this⟧ »ttestfp«

TextFile

mode list.yes
;wa
;o u80
testfp=pascal list.yes
program testfp(input,output);
var
points,degree,i,inr,res: integer;
fit: boolean;
w: real;
inp,outp,ident: alfa;
(*$i tfpread*)
begin
fplist:=true;
end.
;
mode list.no
finis
▶EOF◀