*dim,j_von_E,table,6 ! Erstellen einer Tabelle, Stromdichte in Abhängigkeit von Feldstärke aus 6 Werten j_von_E(1,0)=0,2,4,6,8,10 j_von_E(0,1)=1 j_von_E(1,1)=0,1.1*1e-3,2.4*1e-3,5.3*1e-3,15*1e-3,50*1e-3 *vplo,j_von_E(1,0),j_von_E(1,1) ! Zeichnen der Kennlinie, E(1,0) auf Absizze, hier elektrische Feldstärke, E(1,1) auf Ordinate, hier die Stromdichte ! *dim,rho_von_e,table,6 ! Erstellen einer Tabelle, spezifischer Widerstand in Abhängigkeit von Feldstärke aus 6 Werten rho_von_E(1,0)=0,2,4,6,8,10 rho_von_E(0,1)=1 rho_von_E(1,1)=2/j_von_E(2) ! Anfangsanstieg *do,i,2,6 E=(i-1)*2 ! Feldstärke in !Einheit? rho_von_E(i,1)=E/j_von_E(E) ! Auffüllen der Tabelle *enddo *vplo,rho_von_E(1,0),rho_von_E(1,1) ! Zeichnen der Kennlinie, E(1,0) auf Absizze, hier elektrische Feldstärke, E(1,1) auf Ordinate, hier der spezifische Widerstand