anchor.diff:                  DoubleTensor.From (data, toTorchShape shape) 
               | Dtype.Other _ -> failwith "deserialize other type in torch nyi"
   
  -        let tt2 = 
  -            match device with 
  -            | Device.CPU -> tt
  -            | Device.GPU -> tt.Cuda()
  -            | _ -> invalidOp (sprintf "the device '%A' is not supported by the Torch backend" device)
  +        let tt2 = torchMoveTo tt device
           TorchRawTensor(tt2, shape, dtype, device)
   
       interface System.Runtime.Serialization.ISerializable with
  
positive.code:     let fromTorchShape (shape: int64[]) = shape |> Array.map int
  
      let inline combineHashes (h1 : int) (h2 : int) = ((h1 <<< 5) + h1) ^^^ h2
  
      type RawTensor with
          member x.TorchTensor = (x :?> TorchRawTensor).TorchTensor
  
negative.code:         t1.MakeLike(result, dtype=Dtype.Bool)
  
      override t.MaxIndexT() = 
  
          let res = Array.zeroCreate<int64> t.Dim
          let idxs = Array.zeroCreate t.Dim
          let mutable values = tt
  