/ *****************************************************************
/ Disclaimer: This file was written by GAMBIT and contains
/ all the continuum and boundary entities and coordinate systems
/ defined in GAMBIT. Additionally, some frequently used FIPREP
/ commands are added. Modify/Add/Uncommment any necessary commands.
/ Refer to FIPREP documentation for complete listing of commands.
/ *****************************************************************
/
/          CONVERSION OF NEUTRAL FILE TO FIDAP Database
/
FICONV( NEUTRAL )
INPUT( FILE="1Dflow.FDNEUT" )
OUTPUT( DELETE )
END
/
TITLE
1Dflow
/
FIPREP(  )
ENTITY( ADD, NAME = "fluid", FLUI )
ENTITY( ADD, NAME = "top", PLOT )
ENTITY( ADD, NAME = "bottom", PLOT )
ENTITY( ADD, NAME = "left", PLOT )
ENTITY( ADD, NAME = "right", PLOT )
BCNODE( ADD, VELO, ENTI = "bottom", ZERO, X, Y, Z )
BCNODE( ADD, UX, ENTI = "top", CONS = 1 )
BCNODE( ADD, UY, ENTI = "top", ZERO )
ICNODE( ADD, VELO, ZERO, ENTI = "fluid", X, Y, Z )
DENSITY( ADD, SET = 1, CONS = 1 )
VISCOSITY( ADD, SET = 1, CONS = 1 )
EXECUTION( ADD, NEWJ )
PROBLEM( ADD, 2-D, INCO, TRAN, LAMI, NONL, NEWT, MOME, ISOT, FIXE, SING )
TIMEINTEGRATION( ADD, TRAP, NSTE = 300, TSTA = 0, DT = 0.01, FIXE, WIND, NOFI )
END(  )