diff options
-rw-r--r-- | propagation.m | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/propagation.m b/propagation.m index 4bab16d..60e94fe 100644 --- a/propagation.m +++ b/propagation.m @@ -19,7 +19,7 @@ source("answ.txt") q0=waste_r2q(w0,r0,lambda); -optics=list(lns1,lns2,lns3); +optics={lns1,lns2,lns3}; optics_forward=optics; x=0:.001:Ltot; @@ -40,7 +40,7 @@ q1b=waste_r2q(wf,rf,lambda); lns1.x=Ltot-lns1.x; lns2.x=Ltot-lns2.x; lns3.x=Ltot-lns3.x; -optics=list(lns3,lns2,lns1); +optics={lns3,lns2,lns1}; q2b=prop(x,q1b,optics); printf("=================================\n") wb=q2waste(q2b, lambda); |