DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 Tapes

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

See our Wiki for more about Rational R1000/400 Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦6821cf5db⟧ TextFile

    Length: 289 (0x121)
    Types: TextFile
    Names: »SPIRALE«

Derivation

└─⟦a7d1ea751⟧ Bits:30000550 8mm tape, Rational 1000, !users!projects 94_04_11
    └─ ⟦129cab021⟧ »DATA« 
        └─⟦this⟧ 

TextFile

-- dessin d'une spirale
-- ====================

pour spirale prendre    {
    avec pas: N angle: theta.
    tortue leveTaPlume.
    tortue vaEnx: 500 Y: 500.
    tortue baisseTaPlume.
    1 a: N repeter:  {
        avec L.
        tortue avance: L.
        tortue aGauche: theta.
    }.
}