--- trunk/Sources/filtrez/filtreg_hemisph.f 2015/08/24 16:30:33 167 +++ trunk/Sources/filtrez/filtreg_hemisph.f 2015/09/09 10:41:47 168 @@ -9,8 +9,10 @@ USE dimens_m, ONLY: iim REAL, intent(inout):: champ(:, :, :) ! (iim + 1, :, :) - REAL, intent(in):: sdd(:) ! (iim) - real, intent(in), dimension(:, :, :):: matri ! (iim, iim, :) + REAL, intent(in):: sdd(:) ! (iim) xprim[uv]^{\pm 1/2} + + real, intent(in), dimension(:, :, :):: matri ! (iim, iim, :) + ! filtering matrix ! Local: integer l, j