1! { dg-do run } 2! { dg-additional-options "-fdefault-integer-8" } 3! { dg-skip-if "" { ! run_expensive_tests } { "*" } { "-O2" } } 4! { dg-set-target-env-var OMP_PROC_BIND "spread,close" } 5! { dg-set-target-env-var OMP_PLACES "{6,7}:4:-2,!{2,3}" } 6! { dg-set-target-env-var OMP_NUM_THREADS "2" } 7 8include 'affinity1.f90' 9