****************************** * * Carl W. Gable * gable@lanl.gov * LaGriT Control File * http://lagrit.lanl.gov * http://meshing.lanl.gov * ****************************** * Build a plane to stick inside the box * define / MO_PLANE / cmo_p1 * cmo / create / MO_PLANE / / / quad define / NXQ / 40 define / NYQ / 40 quadxy/NXQ NYQ/ & 5000.0 5000.0 -10000.0 & 21234.5 12345.6 -9876.0 & 21456.1 16543.2 -1234.5 & 5432.1 5123.4 -1543.2 createpts/brick/xyz/NXQ NYQ 1/1,0,0/connect cmo / setatt / MO_PLANE / imt / 1 0 0 / 1 cmo / setatt / MO_PLANE / itetclr / 1 0 0 / 1 * hextotet / 4 / cmotri_tmp1 / MO_PLANE resetpts / itp define / LENGTH_SCALE / 250.0 massage / LENGTH_SCALE 1. 0.1 / nosmooth / norecon recon / 0 * * Build a second fault plane * define / MO_PLANE / cmo_p2 * cmo / create / MO_PLANE / / / quad define / NXQ / 40 define / NYQ / 40 quadxy/NXQ NYQ/ & 8000.0 5000.0 -10000.0 & 23234.5 12345.6 -9876.0 & 23456.1 16543.2 -1234.5 & 8432.1 5123.4 -1543.2 createpts/brick/xyz/NXQ NYQ 1/1,0,0/connect cmo / setatt / MO_PLANE / imt / 1 0 0 / 1 cmo / setatt / MO_PLANE / itetclr / 1 0 0 / 1 * hextotet / 4 / cmotri_tmp2 / MO_PLANE resetpts / itp define / LENGTH_SCALE / 250.0 massage / LENGTH_SCALE 1. 0.1 / nosmooth / norecon recon / 0 * * Build a third fault plane * define / MO_PLANE / cmo_p3 * cmo / create / MO_PLANE / / / quad define / NXQ / 40 define / NYQ / 40 quadxy/NXQ NYQ/ & 13234.5 22345.6 -9876.0 & 10000.0 5000.0 -10000.0 & 12432.1 5123.4 -1543.2 & 13456.1 22543.2 -1234.5 createpts/brick/xyz/NXQ NYQ 1/1,0,0/connect cmo / setatt / MO_PLANE / imt / 1 0 0 / 1 cmo / setatt / MO_PLANE / itetclr / 1 0 0 / 1 * hextotet / 4 / cmotri_tmp3 / MO_PLANE resetpts / itp define / LENGTH_SCALE / 250.0 massage / LENGTH_SCALE 1. 0.1 / nosmooth / norecon recon / 0 * * Put the three faults into a single mesh object * addmesh / merge / cmo_all / cmotri_tmp1 / cmotri_tmp2 addmesh / merge / cmo_all / cmo_all / cmotri_tmp3 dump / gmv / faults_merge3.gmv / cmo_all cmo / delete / cmo_p1 cmo / delete / cmo_p2 cmo / delete / cmo_p3 cmo / delete / cmotri_tmp1 cmo / delete / cmotri_tmp2 cmo / delete / cmotri_tmp3 * cmo / copy / FLT_SET / cmo_all * cmo / delete / cmo_all cmo / select / FLT_SET * finish