diff options
Diffstat (limited to 'propagation.m')
| -rw-r--r-- | propagation.m | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/propagation.m b/propagation.m index 35547f5..15d52c2 100644 --- a/propagation.m +++ b/propagation.m @@ -23,7 +23,7 @@ optics={lns1,lns2,lns3}; x=0:.001:Ltot; printf('======== Forward propagation ======\n') -q1=prop(x,q0,0,optics); +q1=gbeam_propagation(x,q0,0,optics); w1=q2waste(q1, lambda); r1=q2radius(q1,lambda); @@ -32,7 +32,7 @@ printf('======== Backward propagation ===\n') rf=-rf; q1b=waste_r2q(wf,rf,lambda); -q2b=prop(x,q1b,Ltot,optics); +q2b=gbeam_propagation(x,q1b,Ltot,optics); printf('=================================\n') wb=q2waste(q2b, lambda); rb=q2radius(q2b,lambda); @@ -48,7 +48,7 @@ r0 wf rf q0=waste_r2q(w0,r0,lambda); -qtf=prop(Ltot, q0,0, optics); +qtf=gbeam_propagation(Ltot, q0,0, optics); printf('values below should match wf and rf: \n') waste = q2waste(qtf, lambda) radius = q2radius(qtf,lambda) |