module user_allocate
contains
subroutine allocate_arrays
use variables
glamt=-2.
end subroutine allocate_arrays

end module user_allocate