Changeset 48
- Timestamp:
- 02/08/16 14:12:52 (8 years ago)
- Location:
- trunk
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SOURCES/Hemin40_files/lect-hemin40_mod.f90
r47 r48 106 106 call lect_input(1,'H',1,H0,topo_ref,file_ncdf) ! epaisseur 107 107 108 ! lecture de la topo de départ 109 call lect_input(1,'Bsoc',1,Bsoc,topo_dep,file_ncdf) ! socle 110 call lect_input(1,'S',1,S,topo_dep,file_ncdf) ! surface 111 call lect_input(1,'H',1,H,topo_dep,file_ncdf) ! epaisseur 112 108 113 109 114 ! calcul des courbures du socle
Note: See TracChangeset
for help on using the changeset viewer.