 intent(inout) :: Tri_surf
        where data needed outside of module is stored
	
    logical, intent(in) :: conserve_energy
         .true. => kinetic energy that is lost due to vertical diffusion
	 is returned as heat in the temperature tendency so as to 
	 conserve energy

    logical, intent(in) :: use_virtual_temp_vert_diff

    logical, intent(in) :: do_mcm_plev

==========================================================================

 subroutine gcm_vert_diff_end()
 
        no arguments

=======