|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 572 (0x23c) Types: TextFile Notes: R1k Text-file segment
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦f3980844e⟧ └─⟦this⟧
-- test boolean_class --(3<4) Entexte. --(4 AuCarre>4 AuCube) Non ENTEXTE. -- -- pour test prendre { -- avec n. -- -- n<10 sifaux:{renvoyer 456} sivrai:{renvoyer 123}. -- }. -- -- test valeur:15. -- stylo vaenx:200 y:200. stylo ecrire:((3<3) | (1<2)) Entexte. -- stylo vaenx:100. -- stylo petiteplume. -- stylo ecrire:tortue etatplume. -- -- stylo vaenx:100 y:300. -- stylo largeplume. -- stylo ecrire: stylo taplume. -- 1 a: 10 repeter:{ -- avec i. -- -- pour stylo_deux prendre tortue copietoi. -- stylo ecrire: u entexte. -- }