mark_cubes_FScrossold Subroutine
private subroutine mark_cubes_FScrossold(inc, lattice, cluster, tgmatrx, nCub3, nsteps, bounds, roottype, rooteps, nmarked, imarked)
Uses
-
- mod_parutils
- type_data
- mod_fermisurf_basic
- type_inc
- mod_mympi
Arguments
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| type(inc_TYPE), | intent(in) | :: | inc | |||
| type(lattice_TYPE), | intent(in) | :: | lattice | |||
| type(cluster_TYPE), | intent(in) | :: | cluster | |||
| type(tgmatrx_TYPE), | intent(in) | :: | tgmatrx | |||
| integer, | intent(in) | :: | nCub3(3) | |||
| integer, | intent(in) | :: | nsteps | |||
| double precision, | intent(in) | :: | bounds(3,2) | |||
| integer, | intent(in) | :: | roottype | |||
| double precision, | intent(in) | :: | rooteps | |||
| integer, | intent(inout) | :: | nmarked | |||
| integer, | intent(inout), | allocatable | :: | imarked(:) |