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

Diff of /trunk/phylmd/clqh.f

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

revision 101 by guez, Mon Jul 7 17:45:21 2014 UTC revision 104 by guez, Thu Sep 4 10:05:52 2014 UTC
# Line 282  contains Line 282  contains
282      CALL interfsurf_hq(itime, dtime, jour, rmu0, nisurf, knon, knindex, &      CALL interfsurf_hq(itime, dtime, jour, rmu0, nisurf, knon, knindex, &
283           pctsrf, rlat, debut, nsoilmx, tsoil, qsol, u1lay, v1lay, &           pctsrf, rlat, debut, nsoilmx, tsoil, qsol, u1lay, v1lay, &
284           temp_air, spechum, tq_cdrag, petAcoef, peqAcoef, petBcoef, peqBcoef, &           temp_air, spechum, tq_cdrag, petAcoef, peqAcoef, petBcoef, peqBcoef, &
285           precip_rain, precip_snow, fder, rugos, rugoro, snow, qsurf, ts, &           precip_rain, precip_snow, fder, rugos, rugoro, snow, qsurf, ts(:knon), &
286           p1lay, psref, radsol, evap, fluxsens, fluxlat, dflux_l, dflux_s, &           p1lay, psref, radsol, evap, fluxsens, fluxlat, dflux_l, dflux_s, &
287           tsurf_new, alb_new, alblw, z0_new, pctsrf_new, agesno, fqcalving, &           tsurf_new(:knon), alb_new, alblw, z0_new, pctsrf_new, agesno, fqcalving, &
288           ffonte, run_off_lic_0, flux_o, flux_g)           ffonte, run_off_lic_0, flux_o, flux_g)
289    
290      do i = 1, knon      do i = 1, knon
Legend:
Removed from v.101  
changed lines
  Added in v.104
  ViewVC Help
Powered by ViewVC 1.1.21