include file: gridmaker.size 7 PARAMETER(In=91,Jn=91,kn=46, & im=In-1,Jm=Jn-1,km=kn-1) parameter(is=46,js=46,ks=4) parameter(li=(in-1)/(is-1),lj=(jn-1)/(js-1), # lk=(kn-1)/(ks-1),lsm=(li+1)*(lj+1)*(lk+1)) parameter(ng=is*js)