Guest User

Untitled

a guest
Oct 16th, 2018
75
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.49 KB | None | 0 0
  1. cc[1, 2] = 1;
  2. cc[2, 6] = 12;
  3. cc[3, 7] = 3;
  4.  
  5. cctemp[1, 2] = 13;
  6. cctemp[2, 6] = 8;
  7. cctemp[3, 7] = 4;
  8. cctemp[1, 9] = 87;
  9.  
  10. DownValues[cc] = DownValues[cctemp] /. cctemp -> cc;
  11. cc[1, 9]
  12.  
  13. cc[1, 2]
  14.  
  15. DownValues[cc] = DeleteDuplicatesBy[
  16. Join[DownValues[cctemp], DownValues[cc]] /. cctemp -> cc, #[[1,1]]&]
  17.  
  18. cctemp[1,2] = 13;
  19. cctemp[2,6] = 8;
  20. cctemp[3,7] = 4;
  21. cctemp[1,9] = 87;
  22.  
  23. Language`ExtendedDefiniition[cc] = Language`ExtendedDefinition[cctemp] /. cctemp -> cc;
  24.  
  25. DownValues[cc]
Add Comment
Please, Sign In to add comment