DataMuseum.dk

Presents historical artifacts from the history of:

MIKADOS

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

See our Wiki for more about MIKADOS

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦7dde0d391⟧ 

    Length: 992 (0x3e0)
    Notes: Mikados TextFile, Mikados_K
    Names: »MIT«

Derivation

└─⟦d110b5765⟧ Bits:30005308 Eksamensopgave i dynamiske systemer med FFT
    └─ ⟦this⟧ »MIT«

Text

SEGMENT PROCEDURE MIT(A:REAL;
                      VAR X:VEKTOR;
                      D:INTEGER);
  BEGIN
(* DENNE PROCEDURE KROP KAN ERSTATTES AF BRUGEREN
  PARAMETRE : A REEL KONSTANT KAN ANVENDES FRIT.
              R,I REAL- OG IMAGINAERDEL AF BRUGERSIGNALET.
                  (VEKTOR=ARRAY (0..256) )
              N ANTALLET AF SAMPLES.          *)
  END;