/[lmdze]/trunk/phylmd/initphysto.f
ViewVC logotype

Diff of /trunk/phylmd/initphysto.f

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

revision 82 by guez, Wed Mar 5 14:57:53 2014 UTC revision 92 by guez, Wed Mar 26 18:16:05 2014 UTC
# Line 25  SUBROUTINE initphysto(infile,rlon,rlat,t Line 25  SUBROUTINE initphysto(infile,rlon,rlat,t
25    
26    !   L. Fairhead, 03/99    !   L. Fairhead, 03/99
27    
   USE calendar  
28    USE histbeg_totreg_m, ONLY : histbeg_totreg    USE histbeg_totreg_m, ONLY : histbeg_totreg
29    USE histdef_m, ONLY : histdef    USE histdef_m, ONLY : histdef
30    USE histend_m, ONLY : histend    USE histend_m, ONLY : histend
# Line 42  SUBROUTINE initphysto(infile,rlon,rlat,t Line 41  SUBROUTINE initphysto(infile,rlon,rlat,t
41    USE temps    USE temps
42    USE ener    USE ener
43    USE nr_util, ONLY : pi    USE nr_util, ONLY : pi
44      USE ymds2ju_m
45    
46    IMPLICIT NONE    IMPLICIT NONE
47    
Legend:
Removed from v.82  
changed lines
  Added in v.92
  ViewVC Help
Powered by ViewVC 1.1.21