/[lmdze]/trunk/dyn3d/dynetat0.f
ViewVC logotype

Diff of /trunk/dyn3d/dynetat0.f

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

revision 10 by guez, Fri Apr 18 14:45:53 2008 UTC revision 13 by guez, Fri Jul 25 19:59:34 2008 UTC
# Line 24  contains Line 24  contains
24      use advtrac_m, only: tname      use advtrac_m, only: tname
25      use netcdf95, only: nf95_open, nf95_inq_varid, handle_err, NF95_CLOSE      use netcdf95, only: nf95_open, nf95_inq_varid, handle_err, NF95_CLOSE
26      use netcdf, only: NF90_NOWRITE, NF90_GET_VAR, NF90_NOERR      use netcdf, only: NF90_NOWRITE, NF90_GET_VAR, NF90_NOERR
27      use nrutil, only: assert      use numer_rec, only: assert
28    
29      !   Arguments:      !   Arguments:
30      REAL, intent(out):: vcov(: , :), ucov(:, :), teta(:, :)      REAL, intent(out):: vcov(: , :), ucov(:, :), teta(:, :)
Legend:
Removed from v.10  
changed lines
  Added in v.13
  ViewVC Help
Powered by ViewVC 1.1.21