*HEADING
ONE DIMENSIONAL COUPLED DEMAND WETTABILITY, WITH GEL, QUADRATIC ELEMENTS
*** UNITS: M, SEC, NEWTON
*NODE,NSET=ALLN
*NGEN,NSET=BOT
*NGEN,NSET=TOP
*NFILL,NSET=ALLN
BOT,TOP,20,5
*NSET,NSET=LHS,GENERATE
*NSET,NSET=RHS,GENERATE
*NSET,NSET=PORN,GENERATE
*ELEMENT,TYPE=CPE8RP,ELSET=BLOCK
*ELGEN,ELSET=BLOCK
*ELSET,ELSET=OUTE
********************************************
*ORIENTATION,NAME=RECT
*SOLID SECTION,ELSET=BLOCK,MATERIAL=CORE,ORIENT=RECT
.02,
*MATERIAL,NAME=CORE
*ELASTIC
10000.,0.
*POROUS BULK MODULI
*PERMEABILITY,SPECIFIC=10000.
3.7E-4,
*SORPTION
*SORPTION,TYPE=EXSORPTION
*GEL
*MOISTURE SWELLING
*RATIOS
********************************************
*INITIAL CONDITIONS,TYPE=SATURATION
ALLN,.05
*INITIAL CONDITIONS,TYPE=PORE PRESSURE
PORN,-10000.
*INITIAL CONDITIONS,TYPE=RATIO
ALLN,5.
*BOUNDARY
BOT,2
ALLN,1
*RESTART,WRITE,FREQUENCY=10
********************************************
**
*STEP
*SOILS,CONSOLIDATION
*DLOAD
10,P3,-500.
*CONTROLS,PARA=FIELD,FIELD=DISP
.01,1.,,1.
*CONTROLS,PARA=FIELD,FIELD=PORE
.01,1.,,1.E-6
*CONTROLS,ANALYSIS=DISCONTINUOUS
*NODE PRINT,FREQUENCY=5,NSET=LHS
U,RF,POR,RVT
*EL PRINT,FREQUENCY=5,ELSET=OUTE
S,E
SAT,POR,GELVR,VOIDR
*NODE FILE,FREQUENCY=20,NSET=LHS
U,RF,POR,RVT
*EL FILE,FREQUENCY=20,ELSET=OUTE
S,E
SAT,POR,GELVR,VOIDR
*OUTPUT,FIELD, Frequency=100
*NODE OUTPUT,NSET=LHS
 U,POR
*ELEMENT OUTPUT,ELSET=OUTE
 S,SAT,VOIDR,GELVR
*OUTPUT,HISTORY,Frequency=5
*NODE OUTPUT,NSET=LHS
 U,RF,POR,RVT
*ELEMENT OUTPUT,ELSET=OUTE
 S22,POR
*END STEP
********************************************
*STEP,INC=300,NLGEOM
*SOILS,CONSOLIDATION,UTOL=10000.
*PRINT, FREQ=10
*BOUNDARY
1,8,,-100.
3,8,,-100.
*END STEP