Dies ist eine statische Kopie unseres alten Forums. Es sind keine Interaktionen möglich.
This is a static copy of our old forum. Interactions are not possible.

Uprooter

Junior Schreiberling

  • "Uprooter" is male
  • "Uprooter" started this thread

Posts: 249

Date of registration: Oct 7th 2003

Occupation: Angw. Inf.

1

Friday, October 31st 2003, 5:40pm

kleines problem

wenn ich folgendes programm ausführen will schmiert bei mir drscheme ab, wieso?

(define (sp a1 a2 a3 b1 b2 b3) (+ (* a1 b1) (* a2 b2) (* a3 b3))
(if (= (sp a1 a2 a3 b1 b2 b3) 0) 1 0))

schem schmiert dann ab, wenn ich es mit konkreten werten teste

This post has been edited 1 times, last edit by "Uprooter" (Oct 31st 2003, 5:41pm)

  • Send private message

T2k

Erfahrener Schreiberling

  • "T2k" is male

Posts: 339

Date of registration: Oct 9th 2002

Location: da drüben, gleich dort.

Occupation: Warum? Hmm, weil ich sonst nix mit meiner Zeit anzufangen weiß :D

2

Friday, October 31st 2003, 5:44pm

beweg mal eine der letzten klammern eine zeile hoch, is zwar schon ewig her das ich was geschemet hab aber imho ist das define falsch geklammert


T2k
Die zweithäufigste Todesursache eines Soldaten ist das Gewicht seines Rückentornisters ("http://olnigg.de/" Aug05/Nr120)
  • Send private message

Uprooter

Junior Schreiberling

  • "Uprooter" is male
  • "Uprooter" started this thread

Posts: 249

Date of registration: Oct 7th 2003

Occupation: Angw. Inf.

3

Friday, October 31st 2003, 5:57pm

da meldet er n fehler
  • Send private message

Uprooter

Junior Schreiberling

  • "Uprooter" is male
  • "Uprooter" started this thread

Posts: 249

Date of registration: Oct 7th 2003

Occupation: Angw. Inf.

4

Friday, October 31st 2003, 6:15pm

zu bemerken wäre vielleicht noch, dass dieses prog skalaprodukt bidlen soll und überprüfen obs=0 ist oder nicht
  • Send private message

T2k

Erfahrener Schreiberling

  • "T2k" is male

Posts: 339

Date of registration: Oct 9th 2002

Location: da drüben, gleich dort.

Occupation: Warum? Hmm, weil ich sonst nix mit meiner Zeit anzufangen weiß :D

5

Friday, October 31st 2003, 6:19pm

dann nochmal die erste zeile klammern, sodass das define mit seinen argumenten als solches geklammert ist, wenn nicht musste warten bis jemand der scheme noch etwas besser im kop hat antwortet :D


T2k
Die zweithäufigste Todesursache eines Soldaten ist das Gewicht seines Rückentornisters ("http://olnigg.de/" Aug05/Nr120)
  • Send private message

Uprooter

Junior Schreiberling

  • "Uprooter" is male
  • "Uprooter" started this thread

Posts: 249

Date of registration: Oct 7th 2003

Occupation: Angw. Inf.

6

Friday, October 31st 2003, 7:33pm

wenn ich die klammer bei define schliesse, worauf soll sich dann if beziehen? einfach so? ne, ich glaub, das ist falshc und der compiler sagt es auch :)
  • Send private message

Joachim

Guru

  • "Joachim" is male

Posts: 2,863

Date of registration: Dec 11th 2001

Location: Hämelerwald

Occupation: Wissenschaftlicher Mitarbeiter (Forschungszentrum L3S, TU Braunschweig)

7

Friday, October 31st 2003, 7:34pm

RE: kleines problem

Quoted

Original von Uprooter
wenn ich folgendes programm ausführen will schmiert bei mir drscheme ab, wieso?

(define (sp a1 a2 a3 b1 b2 b3) (+ (* a1 b1) (* a2 b2) (* a3 b3))
(if (= (sp a1 a2 a3 b1 b2 b3) 0) 1 0))

schem schmiert dann ab, wenn ich es mit konkreten werten teste
Scheme schmiert ab, da Du eine unendliche Rekursion programmiert hast.

Wir schauen mal, was beim Aufruf (sp 1 2 3 4 5 6) passiert:

(sp 1 2 3 4 5 6)
=>
(+ (* 1 4) (* 2 5) (* 3 6))
(if (= (sp 1 2 3 4 5 6) 0) 1 0)
=>
(+ 4 10 18)
(if (= [HIER IST DIE REKURSION] 0) 1 0)

So würde es gehen:
(define (sp a1 a2 a3 b1 b2 b3) (+ (* a1 b1) (* a2 b2) (* a3 b3)))

(define (sp-null? a1 a2 a3 b1 b2 b3) (if (= (sp a1 a2 a3 b1 b2 b3) 0) 1 0))
The purpose of computing is insight, not numbers.
– Richard Hamming, 1962

This post has been edited 2 times, last edit by "Joachim" (Oct 31st 2003, 7:34pm)

  • Send private message

Uprooter

Junior Schreiberling

  • "Uprooter" is male
  • "Uprooter" started this thread

Posts: 249

Date of registration: Oct 7th 2003

Occupation: Angw. Inf.

8

Friday, October 31st 2003, 9:23pm

achsoo, ich hab mir schon sowas gedacht, dass es rekursiv ist, mein ich, aber es wollte nicht in meinen kopf, wie man es anders ausdrücken könnte, weil wir if mit prozeduren in der vorlesung nicht hatten.

aber danke, wieder einmal :)

This post has been edited 1 times, last edit by "Uprooter" (Oct 31st 2003, 9:24pm)

  • Send private message

hohly

Trainee

  • "hohly" is male

Posts: 56

Date of registration: Oct 31st 2003

Location: Hannover

Occupation: frag mich net

9

Friday, October 31st 2003, 9:46pm

Also ich bin auch dabei diesen Zettel abzuarbeiten, bei mir gibt er bei der berechnung des abstandes zweier Punkte zwar das richtige ergebnis ab, aber mit einer #i davor, wat soll das bedeuten? weiss einer das?
  • Send private message

Joachim

Guru

  • "Joachim" is male

Posts: 2,863

Date of registration: Dec 11th 2001

Location: Hämelerwald

Occupation: Wissenschaftlicher Mitarbeiter (Forschungszentrum L3S, TU Braunschweig)

10

Friday, October 31st 2003, 11:03pm

Quoted

Original von hohly
Also ich bin auch dabei diesen Zettel abzuarbeiten, bei mir gibt er bei der berechnung des abstandes zweier Punkte zwar das richtige ergebnis ab, aber mit einer #i davor, wat soll das bedeuten? weiss einer das?
Hmm, sagt mir grad nix. Poste doch mal ein wenig Beispielcode, an dem das Problem zu erkennen ist. Am besten ein Minimalbeispiel, das nur noch das Problem enthält.
The purpose of computing is insight, not numbers.
– Richard Hamming, 1962
  • Send private message

klepu

Junior Schreiberling

  • "klepu" is male

Posts: 144

Date of registration: Oct 11th 2003

Location: Rinteln/Hannover-List

Occupation: rate mal ;) spaß haben und (sekundär) lernen

11

Saturday, November 1st 2003, 3:41pm

ich _weiß_ es auch nicht (mit dem #1), aber ich würde _vermuten_ dass das einen imaginärteil ausdrücken soll... hast du irgendwo 'ne negative wurzel?
"In a world without leaders,
Who'd start all the wars?"
[The Offspring, Kill The President]
  • Send private message

Uprooter

Junior Schreiberling

  • "Uprooter" is male
  • "Uprooter" started this thread

Posts: 249

Date of registration: Oct 7th 2003

Occupation: Angw. Inf.

12

Sunday, November 2nd 2003, 10:49pm

a

This post has been edited 1 times, last edit by "Uprooter" (Nov 2nd 2003, 10:57pm)

  • Send private message