Go to the source code of this file.
|
| !$Id ***************************************!ECRITURE DU pphis CALL | histwrite_phy (nid_tra,.FALSE.,"aire", itau_w, airephy) CALL histwrite_phy(nid_tra |
| |
| !$Id ***************************************!ECRITURE DU pphis CALL zmasse!RomP CALL | histwrite_phy (nid_tra,.FALSE.,"sourceBE", itau_w, sourceBE)!RomP<<< !TRACEURS!----------------DO it |
| |
|
| !$Id ***************************************!ECRITURE DU | FICHIER |
| |
| !$Id ***************************************!ECRITURE DU | FALSE |
| |
| !$Id ***************************************!ECRITURE DU | phis |
| |
| !$Id ***************************************!ECRITURE DU | itau_w |
| |
| !$Id ***************************************!ECRITURE DU pphis CALL | zmasse |
| |
| !$Id*************************************** ! ECRITURE DU pphis CALL histwrite_phy |
( |
nid_tra |
, |
|
|
. |
FALSE., |
|
|
"aire" |
, |
|
|
itau_w |
, |
|
|
airephy |
|
|
) |
| |
| !$Id*************************************** ! ECRITURE DU pphis CALL zmasse ! RomP CALL histwrite_phy |
( |
nid_tra |
, |
|
|
. |
FALSE., |
|
|
"sourceBE" |
, |
|
|
itau_w |
, |
|
|
sourceBE |
|
|
) |
| |
| !$Id ***************************************!ECRITURE DU pphis CALL FALSE |
| !$Id*************************************** ! ECRITURE DU FICHIER |
| !$Id*************************************** ! ECRITURE DU pphis CALL itau_w |
| !$Id*************************************** ! ECRITURE DU phis |
| !$Id*************************************** ! ECRITURE DU pphis CALL zmasse |