/[lmdze]/trunk/phylmd/CV_routines/cv_trigger.f
ViewVC logotype

Diff of /trunk/phylmd/CV_routines/cv_trigger.f

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

revision 102 by guez, Fri Apr 25 14:58:31 2014 UTC revision 103 by guez, Fri Aug 29 13:00:05 2014 UTC
# Line 1  Line 1 
1    
2        SUBROUTINE cv_trigger(len,nd,icb,cbmf,tv,tvp,iflag)        SUBROUTINE cv_trigger(len,nd,icb,cbmf,tv,tvp,iflag)
3              use cvparam              use cv_param
4        implicit none        implicit none
5    
6  !-------------------------------------------------------------------  !-------------------------------------------------------------------
# Line 12  Line 12 
12    
13  ! inputs:  ! inputs:
14         integer, intent(in):: len, nd, icb(len)         integer, intent(in):: len, nd, icb(len)
15         real cbmf(len), tv(len,nd), tvp(len,nd)         real, intent(in):: cbmf(len), tv(len,nd), tvp(len,nd)
16    
17  ! outputs:  ! outputs:
18         integer iflag(len) ! also an input         integer iflag(len) ! also an input

Legend:
Removed from v.102  
changed lines
  Added in v.103

  ViewVC Help
Powered by ViewVC 1.1.21