*Heading EXPLICIT-TO-STANDARD IMPORT *PREPRINT,MODEL=YES *IMPORT, STATE=YES, UPDATE=YES SOLID, FLUID *PARAMETER f=15 omega=2*3.14159*f *AMPLITUDE,NAME=SINE,DEF=PERIODIC 1,,-0.005,0.0 0,1,0,0 *SURFACE,NAME=SOLID 3,S2 4,S2 *SURFACE,NAME=FLUID 5,S1 6,S1 7,S1 8,S1 *TIE,NAME=COUPLE SOLID,FLUID *NSET, NSET=BACK_S 1,3,5,7,1010,1100 *NSET,NSET=FRONT_F 12,14,16, 18, 1050,1500 *BOUNDARY BACK_S,1,3 *STEP *DYNAMIC, HAFTOL=3e04 0.0001,0.005,0.0001,0.005 *BOUNDARY,AMP=SINE FRONT_F,8,,1e6 *END STEP