Variable not initialized in OA package compiled with f77

[RubenDiez-Lazaro]

In the input "oa.in" file, the "iclima" variable can get values from 0 to 3.
Nevertheless in the "oamain.F" source file only is considered this possibility:

Code: Select all

if((iclima.eq.1).or.(iclima.eq.2))then
.......some_code_that_initialize_"nclm"........

so, when "iclima" is 0 or 3, the nclm variable is not initialized, at least when compile with f77...
It usually return a segmentation fault.

I avoid the problem inserting the line

Code: Select all

nclm=0

in the "oamain.F" file, at line 63...