Custom Query (964 matches)

line 729 in set_data.F has an extra ) ?

cff=Dcrit(ng)-GRID(ng)%h(0,j))
                             ^

In def_info.F, the global attribute bio_file gets filled with '-' then written out as is. I suggest adding something like:

lstr=LEN_TRIM(BIONAME(i)) IF (lstr.gt.0) THEN

ie=is+lstr-1 bio_file(is:ie)=TRIM(BIONAME(i)) is=ie+1 bio_file(is:is)=',' is=is+2

END IF

This option is supposed to work like Lstations == F, i.e. we can compile with FLOATS or STATIONS and still deactivate them at runtime. But those options create segmentation faults when running. The solution is to modify the files inp_par.F, grid_coord.F and main3d.F by adding some tests there.