Prozesse und Threads
Prozesse und Threads
Prozesse und Threads
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
Posix Thread Beispiel – 12<br />
test_thread3 - 2<br />
a = %LOC(thrnum)<br />
CALL TIME (CTime)<br />
PRINT *, a,' thread ',a,' gestartet um:',CTime<br />
DO count = 1, 999999<br />
y = 1.0<br />
x = sin(float(count))<br />
DO I =3, 5<br />
y = y+(y*(i+1)/(i))<br />
ENDDO<br />
IF(MOD (count,10000) .EQ. 0) THEN<br />
PRINT*,a,' x = sin(float(count))',x,' count ',count<br />
PRINT*,a,' y in Thread Typ 3 ',y<br />
ENDIF<br />
ENDDO<br />
PRINT*,a,' y in Thread Typ 3 ',y<br />
PRINT*,a,' Fertig!..thread ',a<br />
RETURN<br />
END<br />
Dienstag, 30. April<br />
2013<br />
Betriebssysteme <strong>und</strong> nebenläufige<br />
Anwendugen - <strong>Prozesse</strong> <strong>und</strong> <strong>Threads</strong> 48