11 |
! Objet : filtre matriciel longitudinal, avec les matrices précalculées |
! Objet : filtre matriciel longitudinal, avec les matrices précalculées |
12 |
! pour l'opérateur filtre. |
! pour l'opérateur filtre. |
13 |
|
|
|
USE dimens_m, ONLY: iim, jjm |
|
14 |
USE coefils, ONLY: sddu, sddv, unsddu, unsddv |
USE coefils, ONLY: sddu, sddv, unsddu, unsddv |
15 |
|
USE dimens_m, ONLY: iim, jjm |
16 |
use inifilr_m, only: jfiltnu, jfiltnv, jfiltsu, jfiltsv, matriceun, & |
use inifilr_m, only: jfiltnu, jfiltnv, jfiltsu, jfiltsv, matriceun, & |
17 |
matriceus, matricevn, matricevs, matrinvn, matrinvs |
matriceus, matricevn, matricevs, matrinvn, matrinvs |
18 |
|
|