|  | 
|  | 1 | +{ | 
|  | 2 | + "cells": [ | 
|  | 3 | +  { | 
|  | 4 | +   "cell_type": "code", | 
|  | 5 | +   "execution_count": 1, | 
|  | 6 | +   "id": "156447d2-9279-45a0-890b-4e519d2c796b", | 
|  | 7 | +   "metadata": {}, | 
|  | 8 | +   "outputs": [], | 
|  | 9 | +   "source": [ | 
|  | 10 | +    "#include <stdlib.h>\n", | 
|  | 11 | +    "#include <stdio.h>\n", | 
|  | 12 | +    "#include <omp.h>\n", | 
|  | 13 | +    "#include <clang/Interpreter/CppInterOp.h>" | 
|  | 14 | +   ] | 
|  | 15 | +  }, | 
|  | 16 | +  { | 
|  | 17 | +   "cell_type": "code", | 
|  | 18 | +   "execution_count": 2, | 
|  | 19 | +   "id": "c96fdeb0-817d-48c0-af8e-20a52947d60b", | 
|  | 20 | +   "metadata": {}, | 
|  | 21 | +   "outputs": [], | 
|  | 22 | +   "source": [ | 
|  | 23 | +    "#ifndef N\n", | 
|  | 24 | +    "#define N 5\n", | 
|  | 25 | +    "#endif\n", | 
|  | 26 | +    "#ifndef FS\n", | 
|  | 27 | +    "#define FS 38\n", | 
|  | 28 | +    "#endif" | 
|  | 29 | +   ] | 
|  | 30 | +  }, | 
|  | 31 | +  { | 
|  | 32 | +   "cell_type": "code", | 
|  | 33 | +   "execution_count": 3, | 
|  | 34 | +   "id": "8da842e1-db02-49e0-929d-4e67cbc08172", | 
|  | 35 | +   "metadata": {}, | 
|  | 36 | +   "outputs": [], | 
|  | 37 | +   "source": [ | 
|  | 38 | +    "Cpp::LoadLibrary(\"libomp\");" | 
|  | 39 | +   ] | 
|  | 40 | +  }, | 
|  | 41 | +  { | 
|  | 42 | +   "cell_type": "code", | 
|  | 43 | +   "execution_count": 4, | 
|  | 44 | +   "id": "22f97c49-78d1-496e-ac7c-978aed95331a", | 
|  | 45 | +   "metadata": {}, | 
|  | 46 | +   "outputs": [], | 
|  | 47 | +   "source": [ | 
|  | 48 | +    "struct node {\n", | 
|  | 49 | +    "  int data;\n", | 
|  | 50 | +    "  int fibdata;\n", | 
|  | 51 | +    "  struct node *next;\n", | 
|  | 52 | +    "};" | 
|  | 53 | +   ] | 
|  | 54 | +  }, | 
|  | 55 | +  { | 
|  | 56 | +   "cell_type": "code", | 
|  | 57 | +   "execution_count": 5, | 
|  | 58 | +   "id": "b16b1e8a-8831-4b8d-9d57-09deeaaa88ee", | 
|  | 59 | +   "metadata": {}, | 
|  | 60 | +   "outputs": [], | 
|  | 61 | +   "source": [ | 
|  | 62 | +    "struct node *init_list(struct node *p);\n", | 
|  | 63 | +    "void processwork(struct node *p);\n", | 
|  | 64 | +    "int fib(int n);" | 
|  | 65 | +   ] | 
|  | 66 | +  }, | 
|  | 67 | +  { | 
|  | 68 | +   "cell_type": "code", | 
|  | 69 | +   "execution_count": 6, | 
|  | 70 | +   "id": "0ef8af6c-1d6f-4c68-84bc-3dd1d8092b06", | 
|  | 71 | +   "metadata": {}, | 
|  | 72 | +   "outputs": [], | 
|  | 73 | +   "source": [ | 
|  | 74 | +    "int fib(int n) {\n", | 
|  | 75 | +    "  int x, y;\n", | 
|  | 76 | +    "  if (n < 2) {\n", | 
|  | 77 | +    "    return (n);\n", | 
|  | 78 | +    "  } else {\n", | 
|  | 79 | +    "    x = fib(n - 1);\n", | 
|  | 80 | +    "    y = fib(n - 2);\n", | 
|  | 81 | +    "    return (x + y);\n", | 
|  | 82 | +    "  }\n", | 
|  | 83 | +    "}" | 
|  | 84 | +   ] | 
|  | 85 | +  }, | 
|  | 86 | +  { | 
|  | 87 | +   "cell_type": "code", | 
|  | 88 | +   "execution_count": 7, | 
|  | 89 | +   "id": "1fa0307d-fdc9-4503-95cb-1c6448791354", | 
|  | 90 | +   "metadata": {}, | 
|  | 91 | +   "outputs": [], | 
|  | 92 | +   "source": [ | 
|  | 93 | +    "void processwork(struct node *p) {\n", | 
|  | 94 | +    "  int n, temp;\n", | 
|  | 95 | +    "  n = p->data;\n", | 
|  | 96 | +    "  temp = fib(n);\n", | 
|  | 97 | +    "\n", | 
|  | 98 | +    "  p->fibdata = temp;\n", | 
|  | 99 | +    "}" | 
|  | 100 | +   ] | 
|  | 101 | +  }, | 
|  | 102 | +  { | 
|  | 103 | +   "cell_type": "code", | 
|  | 104 | +   "execution_count": 8, | 
|  | 105 | +   "id": "03acb599-9329-49ff-8aff-c0902adb6c3c", | 
|  | 106 | +   "metadata": {}, | 
|  | 107 | +   "outputs": [], | 
|  | 108 | +   "source": [ | 
|  | 109 | +    "struct node *init_list(struct node *p) {\n", | 
|  | 110 | +    "  int i;\n", | 
|  | 111 | +    "  struct node *head = NULL;\n", | 
|  | 112 | +    "  struct node *temp = NULL;\n", | 
|  | 113 | +    "\n", | 
|  | 114 | +    "  head = (struct node*) malloc(sizeof(struct node));\n", | 
|  | 115 | +    "  p = head;\n", | 
|  | 116 | +    "  p->data = FS;\n", | 
|  | 117 | +    "  p->fibdata = 0;\n", | 
|  | 118 | +    "  for (i = 0; i < N; i++) {\n", | 
|  | 119 | +    "    temp = (struct node*) malloc(sizeof(struct node));\n", | 
|  | 120 | +    "    p->next = temp;\n", | 
|  | 121 | +    "    p = temp;\n", | 
|  | 122 | +    "    p->data = FS + i + 1;\n", | 
|  | 123 | +    "    p->fibdata = i + 1;\n", | 
|  | 124 | +    "  }\n", | 
|  | 125 | +    "\n", | 
|  | 126 | +    "  p->next = NULL;\n", | 
|  | 127 | +    "  return head;\n", | 
|  | 128 | +    "}" | 
|  | 129 | +   ] | 
|  | 130 | +  }, | 
|  | 131 | +  { | 
|  | 132 | +   "cell_type": "code", | 
|  | 133 | +   "execution_count": 9, | 
|  | 134 | +   "id": "f2dfb41b-e55f-43c0-b7f6-546a1697acb1", | 
|  | 135 | +   "metadata": {}, | 
|  | 136 | +   "outputs": [], | 
|  | 137 | +   "source": [ | 
|  | 138 | +    "int main() {\n", | 
|  | 139 | +    "  double start, end;\n", | 
|  | 140 | +    "  struct node *p = NULL;\n", | 
|  | 141 | +    "  struct node *temp = NULL;\n", | 
|  | 142 | +    "  struct node *head = NULL;\n", | 
|  | 143 | +    "\n", | 
|  | 144 | +    "  printf(\"Process linked list\\n\");\n", | 
|  | 145 | +    "  printf(\"  Each linked list node will be processed by function 'processwork()'\\n\");\n", | 
|  | 146 | +    "  printf(\"  Each ll node will compute %d fibonacci numbers beginning with %d\\n\", N, FS);\n", | 
|  | 147 | +    "\n", | 
|  | 148 | +    "  omp_set_num_threads(omp_get_max_threads());\n", | 
|  | 149 | +    "\n", | 
|  | 150 | +    "  p = init_list(p);\n", | 
|  | 151 | +    "  head = p;\n", | 
|  | 152 | +    "\n", | 
|  | 153 | +    "  start = omp_get_wtime();\n", | 
|  | 154 | +    "\n", | 
|  | 155 | +    "#pragma omp parallel\n", | 
|  | 156 | +    "  {\n", | 
|  | 157 | +    "#pragma omp master\n", | 
|  | 158 | +    "    printf(\"Threads:      %d\\n\", omp_get_num_threads());\n", | 
|  | 159 | +    "\n", | 
|  | 160 | +    "#pragma omp single\n", | 
|  | 161 | +    "    {\n", | 
|  | 162 | +    "      p = head;\n", | 
|  | 163 | +    "      while (p) {\n", | 
|  | 164 | +    "#pragma omp task firstprivate(p) // first private is required\n", | 
|  | 165 | +    "        {\n", | 
|  | 166 | +    "          processwork(p);\n", | 
|  | 167 | +    "        }\n", | 
|  | 168 | +    "        p = p->next;\n", | 
|  | 169 | +    "      }\n", | 
|  | 170 | +    "    }\n", | 
|  | 171 | +    "  }\n", | 
|  | 172 | +    "\n", | 
|  | 173 | +    "  end = omp_get_wtime();\n", | 
|  | 174 | +    "  p = head;\n", | 
|  | 175 | +    "  while (p != NULL) {\n", | 
|  | 176 | +    "    printf(\"%d : %d\\n\", p->data, p->fibdata);\n", | 
|  | 177 | +    "    temp = p->next;\n", | 
|  | 178 | +    "    free(p);\n", | 
|  | 179 | +    "    p = temp;\n", | 
|  | 180 | +    "  }\n", | 
|  | 181 | +    "\n", | 
|  | 182 | +    "  free(p);\n", | 
|  | 183 | +    "  printf(\"Compute Time: %f seconds\\n\", end - start);\n", | 
|  | 184 | +    "\n", | 
|  | 185 | +    "  return 0;\n", | 
|  | 186 | +    "}" | 
|  | 187 | +   ] | 
|  | 188 | +  }, | 
|  | 189 | +  { | 
|  | 190 | +   "cell_type": "code", | 
|  | 191 | +   "execution_count": 10, | 
|  | 192 | +   "id": "353e5dfd-fcae-43e6-97e3-ec98070811a1", | 
|  | 193 | +   "metadata": {}, | 
|  | 194 | +   "outputs": [ | 
|  | 195 | +    { | 
|  | 196 | +     "name": "stdout", | 
|  | 197 | +     "output_type": "stream", | 
|  | 198 | +     "text": [ | 
|  | 199 | +      "Process linked list\n", | 
|  | 200 | +      "  Each linked list node will be processed by function 'processwork()'\n", | 
|  | 201 | +      "  Each ll node will compute 5 fibonacci numbers beginning with 38\n", | 
|  | 202 | +      "Threads:      8\n", | 
|  | 203 | +      "38 : 39088169\n", | 
|  | 204 | +      "39 : 63245986\n", | 
|  | 205 | +      "40 : 102334155\n", | 
|  | 206 | +      "41 : 165580141\n", | 
|  | 207 | +      "42 : 267914296\n", | 
|  | 208 | +      "43 : 433494437\n", | 
|  | 209 | +      "Compute Time: 2.617225 seconds\n" | 
|  | 210 | +     ] | 
|  | 211 | +    } | 
|  | 212 | +   ], | 
|  | 213 | +   "source": [ | 
|  | 214 | +    "main();" | 
|  | 215 | +   ] | 
|  | 216 | +  } | 
|  | 217 | + ], | 
|  | 218 | + "metadata": { | 
|  | 219 | +  "kernelspec": { | 
|  | 220 | +   "display_name": "C++17 (xcpp+OpenMP)", | 
|  | 221 | +   "language": "cpp", | 
|  | 222 | +   "name": "xcpp17-omp" | 
|  | 223 | +  }, | 
|  | 224 | +  "language_info": { | 
|  | 225 | +   "codemirror_mode": "text/x-c++src", | 
|  | 226 | +   "file_extension": ".cpp", | 
|  | 227 | +   "mimetype": "text/x-c++src", | 
|  | 228 | +   "name": "C++", | 
|  | 229 | +   "version": "17" | 
|  | 230 | +  } | 
|  | 231 | + }, | 
|  | 232 | + "nbformat": 4, | 
|  | 233 | + "nbformat_minor": 5 | 
|  | 234 | +} | 
0 commit comments