2014-09-10 3 views
0
> One := procedure();       
procedure> P2<x,y,z> := ProjectiveSpace(Rationals(),2); 
procedure> for i := 1 to 100 do 
procedure|for> C_i := Curve(P2, x^3+y^3-i*z^3); 
procedure|for> E_i, C_itoE_i := EllipticCurve(C_i); 
procedure|for> G, map := MordellWeilGroup(E_i); 
procedure|for> print Generators(E_i); 
procedure|for> end for; 
procedure> end procedure; 


> One; 
procedure() ... end procedure 

이 방법은 다음과 같은 경우에만 "절차() ... 종료 절차"를 인쇄합니다. 몇몇 이유. 나는 솔직히 왜 그런지 모르지만 나는 그것을 고치려고했지만 이전에는 그렇지 않았다. 코드 C_i와 E_i는 for 루프 내부의 유효한 개념이다. 정확한 실수를 말하거나 마그마를 알 필요는 없지만이 문제를 통해 나와 협력 할 수 있다면 (팀워크 같이) 좋을 것입니다.Magma CAS. 이성의 x, y에 대해 x^3 + y^3 = d가되도록 [1..100]의 모든 d를 찾습니다.

답변

1

절차를 호출보십시오 :

> One(); 

(나는 마그마 아무것도 한 적이 있기 때문에 그것은 오랜 시간이되었습니다하지만, 절차 자체에 대한 자체 평가됩니다에 One; 것 같습니다.)

+0

당신 맞아. 흠 .. 놀랍습니다. 프로그램 오류를 바로 잡으려고 많은 시간을 보내고 있습니다. 정말 간단합니다. 매우 감사합니다! 어쩌면 다른 사람들은 언젠가이 질문을 유용하게 생각할 것입니다. –