Changeset 1238
- Timestamp:
- 07/06/09 11:22:46 (16 years ago)
- Location:
- issm/trunk/test/Miscellaneous/Bump
- Files:
-
- 5 added
- 1 deleted
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/test/Miscellaneous/Bump/DomainOutline.exp
r1144 r1238 5 5 # X pos Y pos 6 6 0 0 7 100000 008 100000 0 10000009 0 100000 07 100000 0 8 100000 100000 9 0 100000 10 10 0 0 -
issm/trunk/test/Miscellaneous/Bump/runme.m
r1144 r1238 3 3 %initialize model with Stokes model 4 4 md=model; 5 md=mesh(md,'DomainOutline.exp',20000); 5 md=mesh(md,'DomainOutline.exp',2000); 6 md=meshexprefine(md,'ContourBump.exp',500); 6 7 md=geography(md,'',''); 7 md=parameterize(md,'Square.par'); 8 md=parameterize(md,'Bump.par'); 9 md.drag=50*ones(md.numberofgrids,1); 8 10 md=extrude(md,8,4); 9 11 md.pressure=zeros(md.numberofgrids,1); … … 22 24 %now run a control method on macayeal 23 25 md=model; 24 md=mesh(md,'DomainOutline.exp',20000); 26 md=mesh(md,'DomainOutline.exp',2000); 27 md=meshexprefine(md,'ContourBump.exp',500); 25 28 md=geography(md,'',''); 26 md=parameterize(md,' Square.par');29 md=parameterize(md,'Bump.par'); 27 30 md.pressure=zeros(md.numberofgrids,1); 28 31 md.vx=zeros(md.numberofgrids,1); … … 40 43 md=solve(md,'analysis_type','control') 41 44 42 %%now run a control method on pattyn 43 %md=model; 44 %md=mesh(md,'DomainOutline.exp',20000); 45 %md=geography(md,'',''); 46 %md=parameterize(md,'Square.par'); 47 %md=extrude(md,8,4); 48 %md.pressure=zeros(md.numberofgrids,1); 49 %md.vx=zeros(md.numberofgrids,1); 50 %md.vy=zeros(md.numberofgrids,1); 51 %md.vz=zeros(md.numberofgrids,1); 52 %md=setelementstype(md,'pattyn','all'); 53 % 54 %%Initialize the CM 55 %md.vx_obs=mds.results.diagnostic.vx; 56 %md.vy_obs=mds.results.diagnostic.vy; 57 %md.vel_obs=mds.results.diagnostic.vel; 58 % 59 %%Compute the CM 60 %md=solve(md,'analysis_type','control') 45 %save model macayeal 46 mdm=md; 47 save modelmacayeal mdm 48 49 %now run a control method on pattyn 50 md=model; 51 md=mesh(md,'DomainOutline.exp',2000); 52 md=meshexprefine(md,'ContourBump.exp',500); 53 md=geography(md,'',''); 54 md=parameterize(md,'Bump.par'); 55 md=extrude(md,8,4); 56 md.pressure=zeros(md.numberofgrids,1); 57 md.vx=zeros(md.numberofgrids,1); 58 md.vy=zeros(md.numberofgrids,1); 59 md.vz=zeros(md.numberofgrids,1); 60 md=setelementstype(md,'pattyn','all'); 61 62 %Initialize the CM 63 md.vx_obs=mds.results.diagnostic.vx; 64 md.vy_obs=mds.results.diagnostic.vy; 65 md.vel_obs=mds.results.diagnostic.vel; 66 67 %Compute the CM 68 md=solve(md,'analysis_type','control') 69 70 %save model pattyn 71 mdp=md; 72 save modelpattyn mdp
Note:
See TracChangeset
for help on using the changeset viewer.