clawpack/amrclaw — pull request #4 by rjleveque (2012-01-03 07:41:22+00:00)
Title: Fixed amr_module.f and removed integer*1 arrays from the module.

Marsha rewrote the pre-module code to move the integer*1 arrays out of the common blocks in call.i and used stack-based allocation instead in subroutine calls. We thought this might fix the problems observed when call.i was replaced by amr_module.f (worked but never flagged cells for refinement).

Marsha's changes were then merged into rjl's module code but this didn't solve the problem. Further debugging showed that some variables from call.i didn't make it into amr_module.f, and the lack of refining was due to some variables specified only in parameter statements had the wrong type. Adding 'implicit double precision' fixed the problem.

Seems to work now with the swirl example, still need to do more debugging.