https://github.com/alphaparrot/ExoPlaSim
Raw File
Tip revision: c4366f3657ca1c17f0da500b7940eb8f77043d20 authored by Adiv Paradise on 15 September 2020, 18:52:09 UTC
Added tunings to better-capture extant storms and avoid generating too much output
Tip revision: c4366f3
f90check.f90
program f90check
integer :: i = 258
real    :: r = 1.0
open(21,file='F90_INTEGER',form='unformatted')
write (21) i
close(21)
open(21,file='F90_REAL',form='unformatted')
write (21) r
close(21)
!call csub(i,r)
stop
end program f90check
back to top