/[lmdze]/trunk/Sources/phylmd/histwrite_phy.f
ViewVC logotype

Diff of /trunk/Sources/phylmd/histwrite_phy.f

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 191 by guez, Mon May 9 19:56:28 2016 UTC revision 212 by guez, Thu Jan 12 12:31:31 2017 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    

Legend:
Removed from v.191  
changed lines
  Added in v.212

  ViewVC Help
Powered by ViewVC 1.1.21