tempDT.k 386 B

12345678910111213141516
  1. / tempDT.k.csv compiled
  2. tempDTat: `i`i
  3. tempDT: {[args]
  4. cr:((1 0N 0 0N 0);(0 1 0 0N 0);(0 0 1 0 0N);(1 1 1 0 0);(1 0 0 1 0);(0 0 1 0 1);(0 0 0 0 0));
  5. R1:{heater[1];ac[0];};
  6. R2:{heater[0];ac[0];};
  7. R3:{heater[0];ac[1];};
  8. R4:{heater[1];ac[0];};
  9. R5:{heater[0];ac[1];};
  10. r:(R1;R2;R3;R4;R5);
  11. c:(args[0]<20;args[0]<26;args[0]>25;args[1]=0;args[1]=1;args[1]=2);
  12. cr@&c
  13. };
  14. tempDT[(0 0)]