| 62 | |
| 63 | Problème résolu par Laurent et Frédéric et commis dans la r3586 |
| 64 | |
| 65 | Tu crois ça Fredho ? |
| 66 | |
| 67 | Il manquait encore |
| 68 | {{{ |
| 69 | - zpm1r = pplay(cell+1, jk)/paprs(cell+1, 1) |
| 70 | + !zpm1r = pplay(cell+1, jk)/paprs(cell+1, 1) |
| 71 | + zpm1r = pplay(cell, jk)/paprs(cell, 1) |
| 72 | }}} |
| 73 | L'indice du point est cell et pas cell+1 |
| 74 | A confirmer quand même (de Fredho). |
| 75 | |
| 76 | |
| 77 | Le MPI_REDUCEMIN, la routine MPI qui calcule le min global au fond des appels, ne fait pas de broadcast. |
| 78 | Elle centralise simplement le min sur le master. |
| 79 | L'ajout d'un bcast dans orografi_strato semble résoudre le problème. |
| 80 | |
| 81 | 4/ Encore un petit bug : dans phys_output_write |
| 82 | |
| 83 | Sans doute une variable non initialisée. On peut commenter momentannéement. |
| 84 | Mais ne pas oublier ... |
| 85 | |
| 86 | {{{ |
| 87 | CALL histwrite_phy(o_lcc3dstra, lcc3dstra) |
| 88 | CALL histwrite_phy(o_icc3dcon, icc3dcon) |
| 89 | CALL histwrite_phy(o_icc3dstra, icc3dstra) |
| 90 | CALL histwrite_phy(o_cldicemxrat, zfice) |
| 91 | !zx_tmp_fi3d(:,:)=1-zfice(:,:) |
| 92 | !CALL histwrite_phy(o_cldwatmxrat, zx_tmp_fi3d) |
| 93 | CALL histwrite_phy(o_reffclwtop, reffclwtop) |
| 94 | ENDIF |
| 95 | }}} |