#This shell script will piece together string data to animate the puppy #Plot 15 frames for use with whirlgif clear #Change defaults echo 'Changing background color' gmtset PAGE_COLOR 225/225/225 COLOR_BACKGROUND 225/225/225 COLOR_FOREGROUND 225/225/225 BASEMAP_FRAME_RGB 50/50/50 #Plot 75 frames for use with whirlgif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame1.ps echo 'Plotting string for frame1' psxy fort.10 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame1.ps psxy fort.110 -JX -R -O -K -W12/0/200/0 -H1 >> frame1.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame1.ps 10 -1.0 10 1.0 END echo 'Plotting source' psxy -JX -R -O -K -Sv0.03/0.07/0.08 -G255/255/0 -L -W1/0/0/0 <> frame1.ps 7.0 0.4 -90. 0.6 END pstext -JX -R -N -O <> frame1.ps -0.3 -1.35 15 0 1 1 Time Step = 1 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 7.0 0.50 12 0 1 1 Source END ps2gif -flip cw -crop frame1.ps -out frame1.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame2.ps echo 'Plotting string for frame2' psxy fort.11 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame2.ps psxy fort.111 -JX -R -O -K -W12/0/200/0 -H1 >> frame2.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame2.ps 10 -1.0 10 1.0 END echo 'Plotting source' psxy -JX -R -O -K -Sv0.03/0.07/0.08 -G255/255/0 -L -W1/0/0/0 <> frame2.ps 7.0 0.4 -90. 0.6 END pstext -JX -R -N -O <> frame2.ps -0.3 -1.35 15 0 1 1 Time Step = 2 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 7.0 0.50 12 0 1 1 Source END ps2gif -flip cw -crop frame2.ps -out frame2.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame3.ps echo 'Plotting string for frame3' psxy fort.12 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame3.ps psxy fort.112 -JX -R -O -K -W12/0/200/0 -H1 >> frame3.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame3.ps 10 -1.0 10 1.0 END echo 'Plotting source' psxy -JX -R -O -K -Sv0.03/0.07/0.08 -G255/255/0 -L -W1/0/0/0 <> frame3.ps 7.0 0.4 -90. 0.6 END pstext -JX -R -N -O <> frame3.ps -0.3 -1.35 15 0 1 1 Time Step = 3 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 7.0 0.50 12 0 1 1 Source END ps2gif -flip cw -crop frame3.ps -out frame3.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame4.ps echo 'Plotting string for frame4' psxy fort.13 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame4.ps psxy fort.113 -JX -R -O -K -W12/0/200/0 -H1 >> frame4.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame4.ps 10 -1.0 10 1.0 END echo 'Plotting source' psxy -JX -R -O -K -Sv0.03/0.07/0.08 -G255/255/0 -L -W1/0/0/0 <> frame4.ps 7.0 0.4 -90. 0.6 END pstext -JX -R -N -O <> frame4.ps -0.3 -1.35 15 0 1 1 Time Step = 4 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 7.0 0.50 12 0 1 1 Source END ps2gif -flip cw -crop frame4.ps -out frame4.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame5.ps echo 'Plotting string for frame5' psxy fort.14 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame5.ps psxy fort.114 -JX -R -O -K -W12/0/200/0 -H1 >> frame5.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame5.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame5.ps -0.3 -1.35 15 0 1 1 Time Step = 5 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 5.0 0.60 12 0 1 1 At a free boundary 5.0 0.50 12 0 1 1 part of the wave is transmitted 5.0 0.40 12 0 1 1 and part is reflected END ps2gif -flip cw -crop frame5.ps -out frame5.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame6.ps echo 'Plotting string for frame6' psxy fort.15 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame6.ps psxy fort.115 -JX -R -O -K -W12/0/200/0 -H1 >> frame6.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame6.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame6.ps -0.3 -1.35 15 0 1 1 Time Step = 6 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 5.0 0.60 12 0 1 1 At a free boundary 5.0 0.50 12 0 1 1 part of the wave is transmitted 5.0 0.40 12 0 1 1 and part is reflected END ps2gif -flip cw -crop frame6.ps -out frame6.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame7.ps echo 'Plotting string for frame7' psxy fort.16 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame7.ps psxy fort.116 -JX -R -O -K -W12/0/200/0 -H1 >> frame7.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame7.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame7.ps -0.3 -1.35 15 0 1 1 Time Step = 7 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 5.0 0.60 12 0 1 1 At a free boundary 5.0 0.50 12 0 1 1 part of the wave is transmitted 5.0 0.40 12 0 1 1 and part is reflected END ps2gif -flip cw -crop frame7.ps -out frame7.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame8.ps echo 'Plotting string for frame8' psxy fort.17 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame8.ps psxy fort.117 -JX -R -O -K -W12/0/200/0 -H1 >> frame8.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame8.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame8.ps -0.3 -1.35 15 0 1 1 Time Step = 8 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 5.0 0.60 12 0 1 1 At a free boundary 5.0 0.50 12 0 1 1 part of the wave is transmitted 5.0 0.40 12 0 1 1 and part is reflected END ps2gif -flip cw -crop frame8.ps -out frame8.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame9.ps echo 'Plotting string for frame9' psxy fort.18 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame9.ps psxy fort.118 -JX -R -O -K -W12/0/200/0 -H1 >> frame9.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame9.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame9.ps -0.3 -1.35 15 0 1 1 Time Step = 9 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame9.ps -out frame9.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame10.ps echo 'Plotting string for frame10' psxy fort.19 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame10.ps psxy fort.119 -JX -R -O -K -W12/0/200/0 -H1 >> frame10.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame10.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame10.ps -0.3 -1.35 15 0 1 1 Time Step = 10 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 -0.40 12 0 1 1 At a fixed boundary 2.0 -0.50 12 0 1 1 the entire wave is reflected 2.0 -0.60 12 0 1 1 with an opposite amplitude END ps2gif -flip cw -crop frame10.ps -out frame10.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame11.ps echo 'Plotting string for frame11' psxy fort.20 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame11.ps psxy fort.120 -JX -R -O -K -W12/0/200/0 -H1 >> frame11.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame11.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame11.ps -0.3 -1.35 15 0 1 1 Time Step = 11 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 -0.40 12 0 1 1 At a fixed boundary 2.0 -0.50 12 0 1 1 the entire wave is reflected 2.0 -0.60 12 0 1 1 with an opposite amplitude END ps2gif -flip cw -crop frame11.ps -out frame11.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame12.ps echo 'Plotting string for frame12' psxy fort.21 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame12.ps psxy fort.121 -JX -R -O -K -W12/0/200/0 -H1 >> frame12.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame12.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame12.ps -0.3 -1.35 15 0 1 1 Time Step = 12 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 -0.40 12 0 1 1 At a fixed boundary 2.0 -0.50 12 0 1 1 the entire wave is reflected 2.0 -0.60 12 0 1 1 with an opposite amplitude END ps2gif -flip cw -crop frame12.ps -out frame12.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame13.ps echo 'Plotting string for frame13' psxy fort.22 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame13.ps psxy fort.122 -JX -R -O -K -W12/0/200/0 -H1 >> frame13.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame13.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame13.ps -0.3 -1.35 15 0 1 1 Time Step = 13 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 -0.40 12 0 1 1 At a fixed boundary 2.0 -0.50 12 0 1 1 the entire wave is reflected 2.0 -0.60 12 0 1 1 with an opposite amplitude END ps2gif -flip cw -crop frame13.ps -out frame13.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame14.ps echo 'Plotting string for frame14' psxy fort.23 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame14.ps psxy fort.123 -JX -R -O -K -W12/0/200/0 -H1 >> frame14.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame14.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame14.ps -0.3 -1.35 15 0 1 1 Time Step = 14 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 -0.40 12 0 1 1 At a fixed boundary 2.0 -0.50 12 0 1 1 the entire wave is reflected 2.0 -0.60 12 0 1 1 with an opposite amplitude END ps2gif -flip cw -crop frame14.ps -out frame14.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame15.ps echo 'Plotting string for frame15' psxy fort.24 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame15.ps psxy fort.124 -JX -R -O -K -W12/0/200/0 -H1 >> frame15.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame15.ps 10 -1.0 10 1.0 END echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame15.ps echo 'Plotting string for frame15' psxy fort.24 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame15.ps psxy fort.124 -JX -R -O -K -W12/0/200/0 -H1 >> frame15.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame15.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame15.ps -0.3 -1.35 15 0 1 1 Time Step = 15 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 0.80 12 0 1 1 Some waves interfere constructively END ps2gif -flip cw -crop frame15.ps -out frame15.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame16.ps echo 'Plotting string for frame16' psxy fort.25 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame16.ps psxy fort.125 -JX -R -O -K -W12/0/200/0 -H1 >> frame16.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame16.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame16.ps -0.3 -1.35 15 0 1 1 Time Step = 16 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 0.80 12 0 1 1 Some waves interfere constructively END ps2gif -flip cw -crop frame16.ps -out frame16.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame17.ps echo 'Plotting string for frame17' psxy fort.26 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame17.ps psxy fort.126 -JX -R -O -K -W12/0/200/0 -H1 >> frame17.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame17.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame17.ps -0.3 -1.35 15 0 1 1 Time Step = 17 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 0.80 12 0 1 1 Some waves interfere constructively END ps2gif -flip cw -crop frame17.ps -out frame17.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame18.ps echo 'Plotting string for frame18' psxy fort.27 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame18.ps psxy fort.127 -JX -R -O -K -W12/0/200/0 -H1 >> frame18.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame18.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame18.ps -0.3 -1.35 15 0 1 1 Time Step = 18 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 2.0 0.80 12 0 1 1 Some waves interfere constructively END ps2gif -flip cw -crop frame18.ps -out frame18.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame19.ps echo 'Plotting string for frame19' psxy fort.28 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame19.ps psxy fort.128 -JX -R -O -K -W12/0/200/0 -H1 >> frame19.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame19.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame19.ps -0.3 -1.35 15 0 1 1 Time Step = 19 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame19.ps -out frame19.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame20.ps echo 'Plotting string for frame20' psxy fort.29 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame20.ps psxy fort.129 -JX -R -O -K -W12/0/200/0 -H1 >> frame20.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame20.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame20.ps -0.3 -1.35 15 0 1 1 Time Step = 20 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame20.ps -out frame20.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame21.ps echo 'Plotting string for frame21' psxy fort.30 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame21.ps psxy fort.130 -JX -R -O -K -W12/0/200/0 -H1 >> frame21.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame21.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame21.ps -0.3 -1.35 15 0 1 1 Time Step = 21 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame21.ps -out frame21.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame22.ps echo 'Plotting string for frame22' psxy fort.31 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame22.ps psxy fort.131 -JX -R -O -K -W12/0/200/0 -H1 >> frame22.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame22.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame22.ps -0.3 -1.35 15 0 1 1 Time Step = 22 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame22.ps -out frame22.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame23.ps echo 'Plotting string for frame23' psxy fort.32 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame23.ps psxy fort.132 -JX -R -O -K -W12/0/200/0 -H1 >> frame23.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame23.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame23.ps -0.3 -1.35 15 0 1 1 Time Step = 23 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame23.ps -out frame23.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame24.ps echo 'Plotting string for frame24' psxy fort.33 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame24.ps psxy fort.133 -JX -R -O -K -W12/0/200/0 -H1 >> frame24.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame24.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame24.ps -0.3 -1.35 15 0 1 1 Time Step = 24 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame24.ps -out frame24.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame25.ps echo 'Plotting string for frame25' psxy fort.34 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame25.ps psxy fort.134 -JX -R -O -K -W12/0/200/0 -H1 >> frame25.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame25.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame25.ps -0.3 -1.35 15 0 1 1 Time Step = 25 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame25.ps -out frame25.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame26.ps echo 'Plotting string for frame26' psxy fort.35 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame26.ps psxy fort.135 -JX -R -O -K -W12/0/200/0 -H1 >> frame26.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame26.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame26.ps -0.3 -1.35 15 0 1 1 Time Step = 26 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame26.ps -out frame26.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame27.ps echo 'Plotting string for frame27' psxy fort.36 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame27.ps psxy fort.136 -JX -R -O -K -W12/0/200/0 -H1 >> frame27.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame27.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame27.ps -0.3 -1.35 15 0 1 1 Time Step = 27 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame27.ps -out frame27.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame28.ps echo 'Plotting string for frame28' psxy fort.37 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame28.ps psxy fort.137 -JX -R -O -K -W12/0/200/0 -H1 >> frame28.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame28.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame28.ps -0.3 -1.35 15 0 1 1 Time Step = 28 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame28.ps -out frame28.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame29.ps echo 'Plotting string for frame29' psxy fort.38 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame29.ps psxy fort.138 -JX -R -O -K -W12/0/200/0 -H1 >> frame29.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame29.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame29.ps -0.3 -1.35 15 0 1 1 Time Step = 29 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame29.ps -out frame29.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame30.ps echo 'Plotting string for frame30' psxy fort.39 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame30.ps psxy fort.139 -JX -R -O -K -W12/0/200/0 -H1 >> frame30.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame30.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame30.ps -0.3 -1.35 15 0 1 1 Time Step = 30 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame30.ps -out frame30.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame31.ps echo 'Plotting string for frame31' psxy fort.40 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame31.ps psxy fort.140 -JX -R -O -K -W12/0/200/0 -H1 >> frame31.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame31.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame31.ps -0.3 -1.35 15 0 1 1 Time Step = 31 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame31.ps -out frame31.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame32.ps echo 'Plotting string for frame32' psxy fort.41 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame32.ps psxy fort.141 -JX -R -O -K -W12/0/200/0 -H1 >> frame32.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame32.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame32.ps -0.3 -1.35 15 0 1 1 Time Step = 32 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame32.ps -out frame32.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame33.ps echo 'Plotting string for frame33' psxy fort.42 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame33.ps psxy fort.142 -JX -R -O -K -W12/0/200/0 -H1 >> frame33.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame33.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame33.ps -0.3 -1.35 15 0 1 1 Time Step = 33 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame33.ps -out frame33.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame34.ps echo 'Plotting string for frame34' psxy fort.43 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame34.ps psxy fort.143 -JX -R -O -K -W12/0/200/0 -H1 >> frame34.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame34.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame34.ps -0.3 -1.35 15 0 1 1 Time Step = 34 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame34.ps -out frame34.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame35.ps echo 'Plotting string for frame35' psxy fort.44 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame35.ps psxy fort.144 -JX -R -O -K -W12/0/200/0 -H1 >> frame35.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame35.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame35.ps -0.3 -1.35 15 0 1 1 Time Step = 35 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame35.ps -out frame35.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame36.ps echo 'Plotting string for frame36' psxy fort.45 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame36.ps psxy fort.145 -JX -R -O -K -W12/0/200/0 -H1 >> frame36.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame36.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame36.ps -0.3 -1.35 15 0 1 1 Time Step = 36 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame36.ps -out frame36.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame37.ps echo 'Plotting string for frame37' psxy fort.46 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame37.ps psxy fort.146 -JX -R -O -K -W12/0/200/0 -H1 >> frame37.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame37.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame37.ps -0.3 -1.35 15 0 1 1 Time Step = 37 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame37.ps -out frame37.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame38.ps echo 'Plotting string for frame38' psxy fort.47 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame38.ps psxy fort.147 -JX -R -O -K -W12/0/200/0 -H1 >> frame38.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame38.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame38.ps -0.3 -1.35 15 0 1 1 Time Step = 38 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame38.ps -out frame38.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame39.ps echo 'Plotting string for frame39' psxy fort.48 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame39.ps psxy fort.148 -JX -R -O -K -W12/0/200/0 -H1 >> frame39.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame39.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame39.ps -0.3 -1.35 15 0 1 1 Time Step = 39 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame39.ps -out frame39.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame40.ps echo 'Plotting string for frame40' psxy fort.49 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame40.ps psxy fort.149 -JX -R -O -K -W12/0/200/0 -H1 >> frame40.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame40.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame40.ps -0.3 -1.35 15 0 1 1 Time Step = 40 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame40.ps -out frame40.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame41.ps echo 'Plotting string for frame41' psxy fort.50 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame41.ps psxy fort.150 -JX -R -O -K -W12/0/200/0 -H1 >> frame41.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame41.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame41.ps -0.3 -1.35 15 0 1 1 Time Step = 41 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame41.ps -out frame41.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame42.ps echo 'Plotting string for frame42' psxy fort.51 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame42.ps psxy fort.151 -JX -R -O -K -W12/0/200/0 -H1 >> frame42.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame42.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame42.ps -0.3 -1.35 15 0 1 1 Time Step = 42 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame42.ps -out frame42.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame43.ps echo 'Plotting string for frame43' psxy fort.52 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame43.ps psxy fort.152 -JX -R -O -K -W12/0/200/0 -H1 >> frame43.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame43.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame43.ps -0.3 -1.35 15 0 1 1 Time Step = 43 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame43.ps -out frame43.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame44.ps echo 'Plotting string for frame44' psxy fort.53 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame44.ps psxy fort.153 -JX -R -O -K -W12/0/200/0 -H1 >> frame44.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame44.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame44.ps -0.3 -1.35 15 0 1 1 Time Step = 44 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame44.ps -out frame44.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame45.ps echo 'Plotting string for frame45' psxy fort.54 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame45.ps psxy fort.154 -JX -R -O -K -W12/0/200/0 -H1 >> frame45.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame45.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame45.ps -0.3 -1.35 15 0 1 1 Time Step = 45 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame45.ps -out frame45.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame46.ps echo 'Plotting string for frame46' psxy fort.55 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame46.ps psxy fort.155 -JX -R -O -K -W12/0/200/0 -H1 >> frame46.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame46.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame46.ps -0.3 -1.35 15 0 1 1 Time Step = 46 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame46.ps -out frame46.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame47.ps echo 'Plotting string for frame47' psxy fort.56 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame47.ps psxy fort.156 -JX -R -O -K -W12/0/200/0 -H1 >> frame47.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame47.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame47.ps -0.3 -1.35 15 0 1 1 Time Step = 47 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame47.ps -out frame47.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame48.ps echo 'Plotting string for frame48' psxy fort.57 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame48.ps psxy fort.157 -JX -R -O -K -W12/0/200/0 -H1 >> frame48.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame48.ps 10 -1.0 10 1.0 END echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame48.ps echo 'Plotting string for frame48' psxy fort.57 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame48.ps psxy fort.157 -JX -R -O -K -W12/0/200/0 -H1 >> frame48.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame48.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame48.ps -0.3 -1.35 15 0 1 1 Time Step = 48 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 Another example of 14.0 0.70 12 0 1 1 constructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame48.ps -out frame48.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame49.ps echo 'Plotting string for frame49' psxy fort.58 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame49.ps psxy fort.158 -JX -R -O -K -W12/0/200/0 -H1 >> frame49.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame49.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame49.ps -0.3 -1.35 15 0 1 1 Time Step = 49 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 Another example of 14.0 0.70 12 0 1 1 constructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame49.ps -out frame49.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame50.ps echo 'Plotting string for frame50' psxy fort.59 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame50.ps psxy fort.159 -JX -R -O -K -W12/0/200/0 -H1 >> frame50.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame50.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame50.ps -0.3 -1.35 15 0 1 1 Time Step = 50 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 Another example of 14.0 0.70 12 0 1 1 constructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame50.ps -out frame50.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame51.ps echo 'Plotting string for frame51' psxy fort.60 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame51.ps psxy fort.160 -JX -R -O -K -W12/0/200/0 -H1 >> frame51.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame51.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame51.ps -0.3 -1.35 15 0 1 1 Time Step = 51 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 Another example of 14.0 0.70 12 0 1 1 constructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame51.ps -out frame51.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame52.ps echo 'Plotting string for frame52' psxy fort.61 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame52.ps psxy fort.161 -JX -R -O -K -W12/0/200/0 -H1 >> frame52.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame52.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame52.ps -0.3 -1.35 15 0 1 1 Time Step = 52 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 Another example of 14.0 0.70 12 0 1 1 constructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame52.ps -out frame52.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame53.ps echo 'Plotting string for frame53' psxy fort.62 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame53.ps psxy fort.162 -JX -R -O -K -W12/0/200/0 -H1 >> frame53.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame53.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame53.ps -0.3 -1.35 15 0 1 1 Time Step = 53 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame53.ps -out frame53.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame54.ps echo 'Plotting string for frame54' psxy fort.63 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame54.ps psxy fort.163 -JX -R -O -K -W12/0/200/0 -H1 >> frame54.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame54.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame54.ps -0.3 -1.35 15 0 1 1 Time Step = 54 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 An example of 14.0 0.70 12 0 1 1 destructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame54.ps -out frame54.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame55.ps echo 'Plotting string for frame55' psxy fort.64 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame55.ps psxy fort.164 -JX -R -O -K -W12/0/200/0 -H1 >> frame55.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame55.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame55.ps -0.3 -1.35 15 0 1 1 Time Step = 55 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 An example of 14.0 0.70 12 0 1 1 destructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame55.ps -out frame55.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame56.ps echo 'Plotting string for frame56' psxy fort.65 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame56.ps psxy fort.165 -JX -R -O -K -W12/0/200/0 -H1 >> frame56.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame56.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame56.ps -0.3 -1.35 15 0 1 1 Time Step = 56 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 An example of 14.0 0.70 12 0 1 1 destructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame56.ps -out frame56.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame57.ps echo 'Plotting string for frame57' psxy fort.66 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame57.ps psxy fort.166 -JX -R -O -K -W12/0/200/0 -H1 >> frame57.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame57.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame57.ps -0.3 -1.35 15 0 1 1 Time Step = 57 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 14.0 0.80 12 0 1 1 An example of 14.0 0.70 12 0 1 1 destructive 14.0 0.60 12 0 1 1 intereference END ps2gif -flip cw -crop frame57.ps -out frame57.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame58.ps echo 'Plotting string for frame58' psxy fort.67 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame58.ps psxy fort.167 -JX -R -O -K -W12/0/200/0 -H1 >> frame58.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame58.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame58.ps -0.3 -1.35 15 0 1 1 Time Step = 58 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame58.ps -out frame58.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame59.ps echo 'Plotting string for frame59' psxy fort.68 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame59.ps psxy fort.168 -JX -R -O -K -W12/0/200/0 -H1 >> frame59.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame59.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame59.ps -0.3 -1.35 15 0 1 1 Time Step = 59 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame59.ps -out frame59.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame60.ps echo 'Plotting string for frame60' psxy fort.69 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame60.ps psxy fort.169 -JX -R -O -K -W12/0/200/0 -H1 >> frame60.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame60.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame60.ps -0.3 -1.35 15 0 1 1 Time Step = 60 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame60.ps -out frame60.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame61.ps echo 'Plotting string for frame61' psxy fort.70 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame61.ps psxy fort.170 -JX -R -O -K -W12/0/200/0 -H1 >> frame61.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame61.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame61.ps -0.3 -1.35 15 0 1 1 Time Step = 61 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame61.ps -out frame61.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame62.ps echo 'Plotting string for frame62' psxy fort.71 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame62.ps psxy fort.171 -JX -R -O -K -W12/0/200/0 -H1 >> frame62.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame62.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame62.ps -0.3 -1.35 15 0 1 1 Time Step = 62 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame62.ps -out frame62.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame63.ps echo 'Plotting string for frame63' psxy fort.72 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame63.ps psxy fort.172 -JX -R -O -K -W12/0/200/0 -H1 >> frame63.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame63.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame63.ps -0.3 -1.35 15 0 1 1 Time Step = 63 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame63.ps -out frame63.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame64.ps echo 'Plotting string for frame64' psxy fort.73 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame64.ps psxy fort.173 -JX -R -O -K -W12/0/200/0 -H1 >> frame64.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame64.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame64.ps -0.3 -1.35 15 0 1 1 Time Step = 64 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame64.ps -out frame64.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame65.ps echo 'Plotting string for frame65' psxy fort.74 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame65.ps psxy fort.174 -JX -R -O -K -W12/0/200/0 -H1 >> frame65.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame65.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame65.ps -0.3 -1.35 15 0 1 1 Time Step = 65 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame65.ps -out frame65.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame66.ps echo 'Plotting string for frame66' psxy fort.75 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame66.ps psxy fort.175 -JX -R -O -K -W12/0/200/0 -H1 >> frame66.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame66.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame66.ps -0.3 -1.35 15 0 1 1 Time Step = 66 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame66.ps -out frame66.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame67.ps echo 'Plotting string for frame67' psxy fort.76 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame67.ps psxy fort.176 -JX -R -O -K -W12/0/200/0 -H1 >> frame67.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame67.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame67.ps -0.3 -1.35 15 0 1 1 Time Step = 67 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame67.ps -out frame67.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame68.ps echo 'Plotting string for frame68' psxy fort.77 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame68.ps psxy fort.177 -JX -R -O -K -W12/0/200/0 -H1 >> frame68.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame68.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame68.ps -0.3 -1.35 15 0 1 1 Time Step = 68 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame68.ps -out frame68.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame69.ps echo 'Plotting string for frame69' psxy fort.78 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame69.ps psxy fort.178 -JX -R -O -K -W12/0/200/0 -H1 >> frame69.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame69.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame69.ps -0.3 -1.35 15 0 1 1 Time Step = 69 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame69.ps -out frame69.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame70.ps echo 'Plotting string for frame70' psxy fort.79 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame70.ps psxy fort.179 -JX -R -O -K -W12/0/200/0 -H1 >> frame70.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame70.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame70.ps -0.3 -1.35 15 0 1 1 Time Step = 70 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame70.ps -out frame70.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame71.ps echo 'Plotting string for frame71' psxy fort.80 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame71.ps psxy fort.180 -JX -R -O -K -W12/0/200/0 -H1 >> frame71.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame71.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame71.ps -0.3 -1.35 15 0 1 1 Time Step = 71 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame71.ps -out frame71.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame72.ps echo 'Plotting string for frame72' psxy fort.81 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame72.ps psxy fort.181 -JX -R -O -K -W12/0/200/0 -H1 >> frame72.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame72.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame72.ps -0.3 -1.35 15 0 1 1 Time Step = 72 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame72.ps -out frame72.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame73.ps echo 'Plotting string for frame73' psxy fort.82 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame73.ps psxy fort.182 -JX -R -O -K -W12/0/200/0 -H1 >> frame73.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame73.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame73.ps -0.3 -1.35 15 0 1 1 Time Step = 73 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame73.ps -out frame73.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame74.ps echo 'Plotting string for frame74' psxy fort.83 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame74.ps psxy fort.183 -JX -R -O -K -W12/0/200/0 -H1 >> frame74.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame74.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame74.ps -0.3 -1.35 15 0 1 1 Time Step = 74 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame74.ps -out frame74.gif echo 'Making frame for cropping' psbasemap -JX7/4 -R0/7/0/4 -X2.0 -Y2.0 -Bswne -K > frame75.ps echo 'Plotting string for frame75' psxy fort.84 -JX6/3 -R0/20/-1.0/1.0 -Bf2/f.2swne -O -K -W4/255/0/0 -H1 -X0.6 -Y0.6 >> frame75.ps psxy fort.184 -JX -R -O -K -W12/0/200/0 -H1 >> frame75.ps psxy -JX -R -O -K -W3/125/125/125ta <> frame75.ps 10 -1.0 10 1.0 END pstext -JX -R -N -O <> frame75.ps -0.3 -1.35 15 0 1 1 Time Step = 75 0.0 1.08 12 0 0 1 @~r@~ = 1.0, c = 3.0 20.0 1.08 12 0 0 3 @~r@~ = 4.0, c = 1.5 0.2 -0.80 12 0 0 1 L-R Reflection Coefficient = -1/3 0.2 -0.90 12 0 0 1 L-R Transmission Coefficient = 2/3 10.5 -0.80 12 0 0 1 R-L Reflection Coefficient = 1/3 10.5 -0.90 12 0 0 1 R-L Transmission Coefficient = 4/3 END ps2gif -flip cw -crop frame75.ps -out frame75.gif whirlgif -v -time 20 frame1.gif frame2.gif frame3.gif frame4.gif frame5.gif frame6.gif frame7.gif frame8.gif frame9.gif frame10.gif frame11.gif frame12.gif frame13.gif frame14.gif frame15.gif frame16.gif frame17.gif frame18.gif frame19.gif frame20.gif frame21.gif frame22.gif frame23.gif frame24.gif frame25.gif frame26.gif frame27.gif frame28.gif frame29.gif frame30.gif frame31.gif frame32.gif frame33.gif frame34.gif frame35.gif frame36.gif frame37.gif frame38.gif frame39.gif frame40.gif frame41.gif frame42.gif frame43.gif frame44.gif frame45.gif frame46.gif frame47.gif frame48.gif frame49.gif frame50.gif frame51.gif frame52.gif frame53.gif frame54.gif frame55.gif frame56.gif frame57.gif frame58.gif frame59.gif frame60.gif frame61.gif frame62.gif frame63.gif frame64.gif frame65.gif frame66.gif frame67.gif frame68.gif frame69.gif frame70.gif frame71.gif frame72.gif frame73.gif frame74.gif frame75.gif > string.gif echo 'Restoring background color' gmtset PAGE_COLOR 255/255/255 COLOR_BACKGROUND 0/0/0 COLOR_FOREGROUND 0/0/0 BASEMAP_FRAME_RGB 0/0/0