2 ! Define boundary condition values
for cgins
21 ! outflowOption values:
22 integer extrapolateOutflow,neumannAtOuflow
23 parameter( extrapolateOutflow=0,neumannAtOuflow=1 )
26 ! define interfaceType values
for fortran routines
27 integer noInterface ! no
interface conditions are imposed
28 integer heatFluxInterface ! [
T.
n ] = g
29 integer tractionInterface ! [
n.tau ] = g
30 integer tractionAndHeatFluxInterface
31 parameter( noInterface=0, heatFluxInterface=1 )
32 parameter( tractionInterface=2,tractionAndHeatFluxInterface=3 )