<p>In file <b>C:\xampp\htdocs\eclass\include\action.php</b> on line <b>25</b> : <i>Unable to execute statement:"Table '.\eclass\actions_daily' is marked as crashed and should be repaired", sqlstate:"145", errornum:"HY000", 	statement:"SELECT id, TIME_TO_SEC(TIMEDIFF(NOW(), last_update)) AS diff, module_id                                                FROM actions_daily                                                WHERE user_id = ?                                                AND course_id = ?                                                AND day = DATE(NOW())                                                ORDER BY last_update DESC LIMIT 1", 	elapsed:0.002</i></p><p>In file <b>C:\xampp\htdocs\eclass\include\action.php</b> on line <b>50</b> : <i>Unable to execute statement:"Table '.\eclass\actions_daily' is marked as crashed and should be repaired", sqlstate:"145", errornum:"HY000", 	statement:"SELECT id                                    FROM actions_daily                                    WHERE user_id = ?                                    AND module_id = ?                                    AND course_id = ?                                    AND day = '2026-11-12'", 	elapsed:0.001</i></p><p>In file <b>C:\xampp\htdocs\eclass\include\action.php</b> on line <b>71</b> : <i>Unable to execute statement:"Table '.\eclass\actions_daily' is marked as crashed and should be repaired", sqlstate:"145", errornum:"HY000", 	statement:"INSERT INTO actions_daily SET                    user_id = ?,                    module_id = ?,                    course_id = ?,                    hits = 1,                    duration = 900,                    day = '2026-11-12'                     , last_update = NOW() ", 	elapsed:0.001</i></p>      program bisect 

      implicit none
  	  real (8)::a,b,fa,fb,epsilon,m,fm
	  integer ::i,NMAX
	  real (8),external :: f

    1 print *, ' Enter xa:' 
      read *, a 
      print *, ' Enter xb:' 
      read *, b 

      if ( f(a)* f(b) .ge. 0 ) then 
           write(*,*) ' Enter another pair of a and b!' 
           goto 1
      end if 

      print *, ' Enter tolerance epsilon:' 
      read *, epsilon
      print *, ' Enter maximum iteration number:' 
      read *, NMAX 

      fa = f(a) 
      fb = f(b) 

      Do I=1, NMAX 
         m  = a + (b-a) /2.d00 
         fm = f(m) 
         print *, i, a, b, m, fm  
         if( dabs((b-a) /2.d00) .lt. epsilon ) then 
             write(*,*)' **** Method has converged! '  
             stop
         end if 
         If( (fa*fm) .lt. 0.d00 ) then 
             b  = m 
             fb = fm 
         else
             a  = m 
             fa = fm 
         end if 
      end do 

      end

      real function F(X)
      implicit none
	  real (8)::x
      F = x - DCOS(x)
      return
      end



