Several code examples of using OpenMP in Fortran