Langton's ant: Difference between revisions
Content added Content deleted
(Entry for the Fortran language added) |
m (→{{header|Fortran}}: Fixed tabbing) |
||
| Line 1,996: | Line 1,996: | ||
real(kind=dp), parameter :: pi = 3.1415926535897932_dp |
real(kind=dp), parameter :: pi = 3.1415926535897932_dp |
||
integer, parameter |
integer, parameter :: grid_size = 100 |
||
integer, dimension(:,:), allocatable :: grid |
integer, dimension(:,:), allocatable :: grid |
||
integer, dimension(3) :: ant = (/ grid_size/2, grid_size/2, 0 /) |
integer, dimension(3) :: ant = (/ grid_size/2, grid_size/2, 0 /) |
||