cmo / create / cmo_tet / / / tet read / avs / hex_l4.inp / cmo_hex copypts / cmo_tet / cmo_hex filter 1 0 0 rmpoint / compress connect noadd cmo/setatt//ipolydat/no dump / gmv / tmp_connect.gmv / cmo_tet interpolate / map / cmo_tet itetclr /1,0,0/ cmo_hex itetclr keepatt resetpts / itp dump / gmv / tmp_connect.gmv / cmo_tet cmo/addatt/cmo_tet/id_ports/VINT/scalar/nelements interpolate / map / cmo_tet id_ports /1,0,0/ cmo_hex id_ports cmo/addatt/cmo_tet/itetlev/VINT/scalar/nelements interpolate / map / cmo_tet itetlev /1,0,0/ cmo_hex itetlev dump / gmv / tmp_connect.gmv / cmo_tet dump / avs / tmp_connect.inp / cmo_tet * * Color the nodes from the elements * * Color the imt values from the itetclr values * resetpts/cell_color * cmo/addatt/cmo_tet/n_id_pt/VINT/scalar/nnodes * * Loop through all the elements colored by monitor points * and set their nodes to the color of the elements. * loop/ do / IDNUM / 1 / 3 / 1 / loop_end / & infile set_node_id_from_elem.lgi * * Output the grid * dump / gmv / tet_l4.gmv / cmo_tet dump / avs / tet_l4.inp / cmo_tet * * Output the FEHM files * dump / fehm / tet_l4 / cmo_tet * Report Mesh Information cmo/status/cmo_tet cmo/printatt/cmo_tet/-xyz- minmax quality finish