diff options
| -rw-r--r-- | abcd.m | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -6,13 +6,13 @@ function lens_abcd =abcd_lens(focal_distance) lens_abcd = [1, 0; -1/focal_distance, 1]; endfunction -function qnew=q_afteer_element(q_old,abcd) +function qnew=q_after_element(q_old,abcd) qnew=(q_old*abcd(1,1)+abcd(1,2))/(q_old*abcd(2,1)+abcd(2,2)); endfunction function optics = arrange_optics_along_x(optics_unsorted) -% arrange optics in proper order so it x position increases with number +% arrange optics in proper order so its x position increases with consequent index N=length(optics_unsorted); % assign x positions |