fortran

Write Fortran statements that the functions described below (20): Write the main Fortran program that calls it (20). Algorithm 1 Stochastic gradient descent with momentum 1: input: initial w1, decays y, learning rates a, loss func- tion L(w,e,t) 2: initialize vi 0 3: for t = 1 to T do 4: 8 = VwLw+, 0,t) Devaluate gradient 5: Vt+1 = 7V4 - (1 - Y)gt Dupdate velocity 6: W4+1 = w+ V update position 7: end for 8: output trained parameters WT t