Changeset 4850 for issm/trunk/test/Validation/ControlMethods/runmedrag.m
- Timestamp:
- 07/28/10 16:55:17 (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
issm/trunk/test/Validation/ControlMethods/runmedrag.m
r2553 r4850 1 step=[ 2];1 step=[1 2]; 2 2 division=2; 3 3 density=70000; … … 23 23 for i=1:division 24 24 for j=1:division 25 md.drag (find(md.x>=(minx+(i-1)*Lx/division) & md.x<=(minx+i*Lx/division) & md.y>=(miny+(j-1)*Ly/division) & md.y<=(miny+j*Ly/division)))=drag(count);25 md.drag_coefficient(find(md.x>=(minx+(i-1)*Lx/division) & md.x<=(minx+i*Lx/division) & md.y>=(miny+(j-1)*Ly/division) & md.y<=(miny+j*Ly/division)))=drag(count); 26 26 count=count+1; 27 27 end … … 29 29 30 30 %diagnostic with this drag 31 md=solve(md,'analysis_type','diagnostic'); 32 %md.cluster='wilkes'; md=solve(md,'analysis_type','diagnostic_horiz'); 31 md=solve(md,'analysis_type',DiagnosticSolutionEnum); 33 32 34 33 %save observed velocities and exact B 35 vx_obs=md.vx; vy_obs=md.vy; vel_obs=md.vel; 36 drag=md.drag; 37 save ObservedVelocities vx_obs vy_obs vel_obs 34 vx_obs=zeros(md.numberofgrids,1); 35 vx_obs(md.results.DiagnosticSolution.Vx.index)=md.results.DiagnosticSolution.Vx.value; 36 vy_obs=zeros(md.numberofgrids,1); 37 vy_obs(md.results.DiagnosticSolution.Vy.index)=md.results.DiagnosticSolution.Vy.value; 38 drag=md.drag_coefficient; 39 save ObservedVelocities vx_obs vy_obs 38 40 save Exactdrag drag 39 41 clear md … … 53 55 %plug computed velocities 54 56 load ObservedVelocities 55 md.vx_obs=vx_obs; md.vy_obs=vy_obs; md.vel_obs=vel_obs;57 md.vx_obs=vx_obs; md.vy_obs=vy_obs; 56 58 57 59 %control method 58 60 md.nsteps=10; 59 md.control_type='drag'; 60 md.mincontrolconstraint=0; 61 md.maxcontrolconstraint=100; 61 md.control_type='drag_coefficient'; 62 md.cm_min=0; 63 md.cm_max=100; 64 md.cm_jump=0.99*ones(md.nsteps,1); 62 65 md.plot=1; 63 md.debug=0; 66 md.verbose=0; 67 md.weights=1*ones(md.numberofgrids,1); 64 68 md.optscal=180*ones(md.nsteps,1); 65 69 md.fit=2*ones(md.nsteps,1); … … 69 73 70 74 %md.cluster='wilkes'; 71 %md=solve(md,'analysis_type','control'); 72 md=solve(md,'analysis_type','control'); 73 %md=solve(md,'analysis_type','control','package','macayeal'); 75 md.control_analysis=1; 76 md=solve(md,'analysis_type',DiagnosticSolutionEnum); 74 77 end
Note:
See TracChangeset
for help on using the changeset viewer.