Ignore:
Timestamp:
2014-03-03T19:12:24+01:00 (7 years ago)
Author:
cetlod
Message:

v3.6alpha : bugfixes in PISCES, see ticket #1251

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/2013/dev_MERGE_2013/NEMOGCM/NEMO/TOP_SRC/PISCES/P4Z/p4zsbc.F90

    r4230 r4521  
    479479         CALL iom_close( numhydro ) 
    480480         ! 
    481          hydrofe(:,:,:) = ( hydrofe(:,:,:) * hratio ) / ( cvol(:,:,:) * ryyss + rtrn ) / fse3t(:,:,:) 
     481         hydrofe(:,:,:) = ( hydrofe(:,:,:) * hratio ) / ( cvol(:,:,:) * ryyss + rtrn ) / 1000._wp 
    482482         ! 
    483483      ENDIF 
Note: See TracChangeset for help on using the changeset viewer.