User Portlet User Portlet

Discussions
Luckily, somebody else came with a solution which actually works. Clear @"Global`*" Square[t_] := 1/2*HeavisideTheta[(-t^2 + 1)] FourierTransform[Square[t], t, \[Omega]] So seems like something messed mathematica up which needed...