anchor.diff:             CASE (EHYBRIDPL) !alwinnote
                call emis_model_synchth(e,ep%mu)
                call emis_model_synchpl(e,ep%gmin,ep%gmax,ep%p1)
  +           CASE (EMAXJUTT) !alwinnote 2015/03/05
  +             call emis_model_synchth(e,ep%mu)
              CASE (EPOLSYNCHTH)
                call emis_model_synchth(e,ep%mu)
              CASE (EPOLSYNCHPL)
  
positive.code:              e%ncgs=ncgs; e%bcgs=bcgs; e%tcgs=tcgs; e%ncgsnth=ncgsnth 
             CASE (EHYBRIDPL)
               e%ncgs=ncgs; e%bcgs=bcgs; e%tcgs=tcgs; e%ncgsnth=ncgsnth 
             CASE (EPOLSYNCHTH)
               e%ncgs=ncgs; e%bcgs=bcgs; e%tcgs=tcgs
             CASE (EPOLSYNCHPL)
  
negative.code:              deallocate(e%bcgs); deallocate(e%incang)
               deallocate(e%ncgsnth); deallocate(e%p)
               call del_polsynchpl(e%neq)              
             CASE (EMAXJUTT) !alwinnote 2015/03/05
               deallocate(e%tcgs); deallocate(e%ncgs)
               deallocate(e%bcgs); deallocate(e%incang)
             CASE (EPOLSYNCHTH)
               deallocate(e%tcgs); deallocate(e%ncgs)
               deallocate(e%bcgs); deallocate(e%incang)
  