diff --git a/src/MNH/spawn_surf2_rain.f90 b/src/MNH/spawn_surf2_rain.f90 index 70da3423daccd0f368939bdeaf667169f92f8ab4..f780a1ff73669122a459c0cc833de864a767f376 100644 --- a/src/MNH/spawn_surf2_rain.f90 +++ b/src/MNH/spawn_surf2_rain.f90 @@ -304,7 +304,7 @@ ELSE KXOR,KYOR,KXEND,KYEND,KDXRATIO,KDYRATIO,1, & LBC_MODEL(1)%CLBCX,LBC_MODEL(1)%CLBCY,PRECIP_MODEL(1)%XACPRH,PACPRH) PINPRH(:,:)=MAX(0.,PINPRH(:,:)) - PACPRR(:,:)=MAX(0.,PACPRH(:,:)) + PACPRH(:,:)=MAX(0.,PACPRH(:,:)) END IF ! END IF