MVLib - Short Writeup - Version 4.0 Example Number 34 - Cellular Automata |
This example show hout to use cellularinit, cellularplot and cellularplotrule
routines
The fortran code is available here and the complete script running the code is available here. |
|||||||
| ||||||||
parameter (nx=90,ny=90) ; integer m(nx,ny) m=0 do ic=9,81,9 ; do jc=9,81,9 call cellularinit(m,nx,ny,1,ic,jc) enddo ; enddo call cellularplot(m,nx,ny) call displayexample('example34','cellularplot routine',' ') call cellularplotrule(0,'example34') end |