      parameter(im=41, jm=61, kb=16)
