Fortran random seed error in newton-x 2.2

[Fabricio Cannini]

Hello there.

A user is having trouble with the attached input.

It crashes a few seconds after running $NX/initcond.pl with the error

"Fortran runtime error: Array size of PUT is too small."

I've found that seems related to the problem, but did not helped, like this https://groups.google.com/forum/?fromgroups#!topic/newtonx/dx2C1F3gXe0

and https://groups.google.com/forum/?fromgroups#!topic/newtonx/KLxetYXXQRo

My suspicion is that the problem in the input, as I've run successfully some inputs from the included examples,

but I may be wrong.

Thanks in advance,

Fabricio.

[Chris Chang]

I'm getting this error during a source build on Linux. I ran make in ../lib/OBJ_lib, then:

[cchang@el1 initcond]$ pwd
/projects/critmatlanth/cchang/Packages/NX-2.2-B09/source/initcond

[cchang@el1 initcond]$ make

...

gfortran -c -static -lpthread initqp.f90 -I../lib/OBJ_lib -IOBJ_initcond; mv initqp.o OBJ_initcond/initqp.o; chmod 700 OBJ_initcond/initqp.o
initqp.f90:88:25:

     call random_seed(put=seed)
                         1
Error: Size of 'put' argument of 'random_seed' intrinsic at (1) too small (12/33)
mv: cannot stat ‘initqp.o’: No such file or directory

[Chris Chang]

Hat's off to https://stackoverflow.com/questions/29987816/gfortran-compilation-error-size-of-put-argument-of-random-seed-intrinsic-at

Just have to make the seed array dimension a little larger, >= 33 (which the error actually pointed out).

Changing line 31 of initqp.f90 from

integer, dimension(12)                 :: seed

to

integer, dimension(50)                 :: seed

gets the gfortran build moving.

[Mario Barbatti]

This error has been fixed in Newton-X version 2.4.