smoothTmpFld(i,j,bi,bj)=port_rand_norm()
_RL port_rand,port_rand_norm
smoothTmpFld(i,j,k,bi,bj)=port_rand_norm()
_RL port_rand, port_rand_norm
port_rand_norm = t*x1