bonjour,
pour pouvoir plus s habituer a tracer des courbes 2d (surfaces) sous gnuplot d un programe f77, j ai fait ce petit programme pour tracer une surface, mais sous gnuplot j ai obtenu une courbe , alors ou est l erreur? dans le programme ou autre? merci
voila mon code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 program m integer i,j real h,T(0:50,0:50) h=0.1 open(1,file='jet1.dat',status='unknown') do i=0,50 do j=0,50 T(i,j)=f(i*h,j*h) write(1,*) i*h,j*h,T(i,j) enddo enddo close(1) end function f(x,y) real x,y,f f=x*y return end
Partager