typo in wrt_stations.F (ROMS 2.2)

[jacopo]

when trying to write rain in a station file, I see (l. 602)

Code: Select all

!  Write out precipitation rate (kg/m2/s).
!
      IF (Sout(idrain,ng)) THEN
        scale=1.0_r8
        CALL extract_sta2d (ng, Cgrid, idrain, r2dvar,                  &
   

I believe it should be

Code: Select all

!  Write out precipitation rate (kg/m2/s).
!
      IF (Sout(idrain,ng)) THEN
        scale=1.0_r8
        CALL extract_sta2d (ng, iNLM, Cgrid, idrain, r2dvar,         &
     

Jacopo

[arango]

Yes. Thank you for finding and reporting this bug. I Updated the corrections file for ROMS 2.2.