psmile_control_cell_gauss2_real.F90 File Reference

Go to the source code of this file.

Defines
#define	ALLOW_DEGRADED_CELL
Functions/Subroutines
subroutine	psmile_control_cell_gauss2_real (grid_id, ic, nc, list, j, k, coords1, coords2, shape, corners1, corners2, corner_shape, nbr_corners, tol, fnd, ierror)

---

Define Documentation

#define ALLOW_DEGRADED_CELL

---

Function Documentation

subroutine psmile_control_cell_gauss2_real	(	Integer,intent(in)	grid_id,
		Integer,dimension (nc),intent(in)	ic,
		Integer,intent(in)	nc,
		Integer,dimension (nc),intent(in)	list,
		Integer,intent(in)	j,
		Integer,intent(in)	k,
		Real,dimension (shape(1,1),intent(in)	coords1,
		Real,dimension (shape(1,1),intent(in)	coords2,
		Integer,dimension(2,3),intent(in)	shape,
		Real,dimension ( corner_shape(1,1),intent(in)	corners1,
		Real,dimension ( corner_shape(1,1),intent(in)	corners2,
		Integer,dimension(2,1),intent(in)	corner_shape,
		Integer,intent(in)	nbr_corners,
		Real,intent(in)	tol,
		Logical,dimension (nc),intent(out)	fnd,
		Integer,intent(out)	ierror
	)

Definition at line 11 of file psmile_control_cell_gauss2_real.F90.

References a, i5, psmile_debug_trace::ictl_ind, and max.