INTERFACE:
subroutine clean_3d() IMPLICIT NONE
Here, a call to the routine clean_variables_3d which howewer does not do anything yet. LOCAL VARIABLES: