diff options
Diffstat (limited to 'gbeam_propagation_froward_only.m')
| -rw-r--r-- | gbeam_propagation_froward_only.m | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gbeam_propagation_froward_only.m b/gbeam_propagation_froward_only.m index 612d30f..91cca20 100644 --- a/gbeam_propagation_froward_only.m +++ b/gbeam_propagation_froward_only.m @@ -28,14 +28,14 @@ function q = gbeam_propagation_froward_only(x_pos, q_in, x_in, optics_elements) el=optics_elements{k}; if ( (x_last_calc < el.x) && (el.x <= x_pos_i) ) abcd=abcd_free_space(el.x-x_last_calc); - q_last_calc=q_afteer_element(q_last_calc,abcd); - q_last_calc=q_afteer_element(q_last_calc,el.abcd); + q_last_calc=q_after_element(q_last_calc,abcd); + q_last_calc=q_after_element(q_last_calc,el.abcd); x_last_calc=el.x; endif endfor if (x_pos_i > x_last_calc); abcd=abcd_free_space(x_pos_i-x_last_calc); - q_last_calc=q_afteer_element(q_last_calc,abcd); + q_last_calc=q_after_element(q_last_calc,abcd); x_last_calc=x_pos_i; endif q(i)=q_last_calc; |