Parent Directory
| 
Revision Log
| 
Patch
| trunk/Sources/phylmd/histwrite_phy.f revision 191 by guez, Mon May 9 19:56:28 2016 UTC | trunk/phylmd/histwrite_phy.f revision 254 by guez, Mon Feb 5 10:39:38 2018 UTC | |
|---|---|---|
| # | Line 8 module histwrite_phy_m | Line 8 module histwrite_phy_m |
| 8 | ||
| 9 | implicit none | implicit none |
| 10 | ||
| INTEGER:: itap = 0 ! number of calls to "physiq" | ||
| 11 | INTERFACE histwrite_phy | INTERFACE histwrite_phy |
| 12 | MODULE PROCEDURE histwrite2d_phy, histwrite3d_phy | MODULE PROCEDURE histwrite2d_phy, histwrite3d_phy |
| 13 | end INTERFACE histwrite_phy | end INTERFACE histwrite_phy |
| 14 | ||
| 15 | private | private |
| 16 | public itap, histwrite_phy | public histwrite_phy |
| 17 | ||
| 18 | contains | contains |
| 19 |
|
||||||||
| ViewVC Help | |
| Powered by ViewVC 1.1.21 |