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

Diff of /trunk/dyn3d/grilles_gcm_netcdf_sub.f

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

revision 265 by guez, Tue Mar 20 09:35:59 2018 UTC revision 294 by guez, Thu Jul 26 13:11:22 2018 UTC
# Line 61  contains Line 61  contains
61      call NF95_PUT_ATT(ncid, varid_latv, 'units', 'degrees_north')      call NF95_PUT_ATT(ncid, varid_latv, 'units', 'degrees_north')
62      call NF95_PUT_ATT(ncid, varid_latv, 'long_name', 'Latitude en v')      call NF95_PUT_ATT(ncid, varid_latv, 'long_name', 'Latitude en v')
63    
     call NF95_DEF_VAR(ncid, 'grille_u', NF90_FLOAT, (/dimid_lonu, &  
          dimid_latu/), varid)  
     call NF95_PUT_ATT(ncid, varid, 'long_name', 'Grille aux points u')  
   
     call NF95_DEF_VAR(ncid, 'grille_v', NF90_FLOAT, (/dimid_lonv, &  
          dimid_latv/), varid)  
     call NF95_PUT_ATT(ncid, varid, 'long_name', 'Grille aux points v')  
   
64      call NF95_DEF_VAR(ncid, 'grille_s', NF90_FLOAT, (/dimid_lonv, &      call NF95_DEF_VAR(ncid, 'grille_s', NF90_FLOAT, (/dimid_lonv, &
65           dimid_latu/), varid)           dimid_latu/), varid)
66      call NF95_PUT_ATT(ncid, varid, 'long_name', 'Grille aux points scalaires')      call NF95_PUT_ATT(ncid, varid, 'long_name', 'Grille aux points scalaires')
Legend:
Removed from v.265  
changed lines
  Added in v.294
  ViewVC Help
Powered by ViewVC 1.1.21