Zoals gewoonlijk bij klimaat/weer-code in fortran.
! For Europe
if (season .eq. winter) then
too_warm=.true.
do t=1,64
if (temp(t) < 273) then ! in Kelvin
too_warm=.false. ! If it's colder than 32°F => OK.
endif
enddo
if (too_warm .eq. true) then
restart ! Give them hope
endif
endif
Eigenaardig stukje code lijkt me.
Wouter
Quote selectie