Examine the code and identify two different types of module coupling that are happening in the code. Put in extracts of the code that illustrate the coupling and explain why you think that type of coupling is happening there. The code is given below: $//$Initial references

const container $=$ document.querySelector$(".$container"$)$;

const playerTurn $=$ document.getElementById$("$playerTurn$")$;

const startScreen $=$ document.querySelector$(".$startScreen"$)$;

const startButton $=$ document.getElementById$("$start$")$;

const message $=$ document.getElementById$("$message$")$;

let initialMatrix $=[$

$[0,0,0,0,0,0,0],$

$[0,0,0,0,0,0,0],$

$[0,0,0,0,0,0,0],$

$[0,0,0,0,0,0,0],$

$[0,0,0,0,0,0,0],$

$[0,0,0,0,0,0,0],$

$]$;

let currentPlayer;

$//$Random Number Between Range

const generateRandomNumber $=($min$,$ max$)=>$

Math.floor$($Math$.$random$()*($max $-$ min$))+$ min;

$//$Loop through array and check for same values

const verifyArray $=($arrayElement$)=>\{$

let bool $=$ false;

let elementCount $=0$;

arrayElement.forEach$(($element$,$ index$)=>\{$

if $($element $==$ currentPlayer$)\{$

elementCount $+=1$;

if $($elementCount $==4)\{$

bool $=$ true;

$\}$

$\}$ else $\{$

elementCount $=0$;

$\}$

$\})$;

return bool;

$\}$;

$//$Check for game over$($Last step$)$

const gameOverCheck $=()=>\{$

let truthCounnt $=0$;

for $($let innerArray of initialMatrix$)\{$

if $($innerArray$.$every$(($val$)=>$ val $!=0))\{$

truthCounnt $+=1$;

$\}$ else $\{$

return false;

$\}$

$\}$

if $($truthCounnt $==6)\{$

message.innerText $=$ "Game Over";

startScreen.classList.remove$("$hide$")$;

$\}$

$\}$;

$//$Check rows

const checkAdjacentRowValues $=($row$)=>\{$

return verifyArray$($initialMatrix$[$row$])$;

$\}$;

$//$Check columns

const checkAdjacentColumnValues $=($column$)=>\{$

let colWinCount $=0,$

colWinBool $=$ false;

initialMatrix.forEach$(($element$,$ index$)=>\{$

if $($element$[$column$]==$ currentPlayer$)\{$

colWinCount $+=1$;

if $($colWinCount $==4)\{$

colWinBool $=$ true;

$\}$

$\}$ else $\{$

colWinCount $=0$;

$\}$

$\})$;

$//$no match

return colWinBool;

$\}$;

$//$Get Right diagonal values

const getRightDiagonal $=($row$,$ column, rowLength, columnLength$)=>\{$

let rowCount $=$ row;

let columnCount $=$ column;

let rightDiagonal $=[]$;

while $($rowCount $>0)\{$

if $($columnCount $>=$ columnLength $-1)\{$

break;

$\}$

rowCount $-=1$;

columnCount $+=1$;

rightDiagonal.unshift$($initialMatrix$[$rowCount$][$columnCount$])$;

$\}$

rowCount $=$ row;

columnCount $=$ column;

while $($rowCount $<$ rowLength$)\{$

if $($columnCount $<0)\{$

break;

$\}$

rightDiagonal.push$($initialMatrix$[$rowCount$][$columnCount$])$;

rowCount $+=1$;

columnCount $-=1$;

$\}$

return rightDiagonal;

$\}$;

const getLeftDiagonal $=($row$,$ column, rowLength, columnLength$)=>\{$

let rowCount $=$ row;

let columnCount $=$ column;

let leftDiagonal $=[]$;

while $($rowCount $>0)\{$

if $($columnCount $<=0)\{$

break;

$\}$

rowCount $-=1$;

columnCount $-=1$;

leftDiagonal.unshift$($initialMatrix$[$rowCount$][$columnCount$])$;

$\}$

rowCount $=$ row;

columnCount $=$ column;

while $($rowCount $<$ rowLength$)\{$

if $($columnCount $>=$ columnLength$)\{$

break;

$\}$

leftDiagonal.push$($initialMatrix$[$rowCount$][$columnCount$])$;

rowCount $+=1$;

columnCount $+=1$;

$\}$

return leftDiagonal;

$\}$;

$//$Check diagonal

const checkAdjacentDiagonalValues $=($row$,$ column$)=>\{$

let diagWinBool $=$ false;

let tempChecks $=\{$

leftTop: $[],$

rightTop: $[],$

$\}$;

let columnLength $=$ initialMatrix$[$row$].$length;

let rowLength $=$ initialMatrix.length;

$//$Store left and right diagonal array

tempChecks.leftTop $=[$

$...$getLeftDiagonal$($row$,$ column, rowLength, columnLength$),$

$]$;

tempChecks.rightTop $=[$

$...$getRightDiagonal$($row$,$ column, rowLength, columnLength$),$

$]$;

$//$check both arrays for similarities

diagWinBool $=$ verifyArray$($tempChecks$.$rightTop$)$;

if $(!$diagWinBool$)\{$

diagWinBool $=$ verifyArray$($tempChecks$.$leftTop$)$;

$\}$

return diagWinBool;

$\}$;

$//$Win check logic

const winCheck $=($row$,$ column$)=>\{$

$//$if any of the functions return true we return true

return checkAdjacentRowValues$($row$)$

$?$ true

: checkAdjacentColumnValues$($column$)$

$?$ true

: checkAdjacentDiagonalValues$($row$,$ column$)$

$?$ true

: false;

$\}$;

$//$Sets the circle to exact points

const setPiece $=($startCount$,$ colValue$)=>\{$

let rows $=$ document.querySelectorAll$(".$grid$-$row"$)$;

$//$Initially it will place the circles in the last row else if no place availabke we will decrement the count until we find empty slot

if $($initialMatrix$[$startCount$][$colValue$]!=0)\{$

startCount $-=1$;

setPiece$($startCount$,$ colValue$)$;

$\}$ else $\{$

$//$place circle

let currentRow $=$ rows$[$startCount$].$querySelectorAll$(".$grid$-$box"$)$;

currentRow$[$colValue$].$classList.add$("$filled$",`$player$$\{$currentPlayer$\}`)$;

$//$Update Matrix

initialMatrix$[$startCount$][$colValue$]=$ currentPlayer;

$//$Check for wins

if $($winCheck$($startCount$,$ colValue$))\{$

message.innerHTML $=`$Player $$\{$currentPlayer$\}$ wins$`$;