Excite Plane wave 回答済み

Avatar
David Harra

Hi, I am looking to change the type of waves I am propagating in my model to a plane wave, but from my script, I am not sure exactly where and what changes to make. After looking through the forum I believe it's done in the pressure load section. I have posted the relevant section of my code and hopefully, someone can help.

c Define drive function, can be accessed using func argument
func wvlt 10000000.000000 1.000000

c Pressure Load
plod
	pdef ptx func
 	matr dir1 watr out
    symb ibeg = $i_el5
    symb jbeg = $j_el5
 
    symb jend = $jbeg + 1
    sdef ptx dir1 $ibeg $ibeg $jbeg $jend
	end


Thanks

Dave :)

2件のコメント

  • Avatar
    David Harra

    I have now solved this problem, so I will post  a solution in case anyone in the future comes to this forum for the same reason.

    Initially my transmitted wave was activated at a specific element  end ended  at the next element location. My elements in this example are placed on the edge of my boundary in y-direction. Elements 1 - 9. (This example transmits on element 5)

     symb ibeg = $i_el5
     symb jbeg = $j_el5
     
     symb jend = $jbeg + 1



    I was aiming to excite a plane wave from the LHS of my of my boundary. In my y-domain, I had 2 key points $j1 and $j2  (bottom and top boundary). Since I am not adjusting the x-domain I just had to change the y-domain to 

     symb ibeg = $i_el5
     symb jbeg = $j1
     
     symb jend = $j2

    Dave :)

    コメントアクション パーマリンク
  • Avatar
    Chloe Allison

    Thank you for sharing Dave!

    コメントアクション パーマリンク

サインインしてコメントを残してください。

お探しのものを見つけられませんでしたか？

新規投稿