Matrix A is dimensioned as a 4x4 matrix.

The program zeros all elements except the diagonal which is set to 1.

This is a 4x4 identity matrix.

The end sequence 1000,0100,0010,0001 are the elements read out from register (i) which in this case points to A.

When running matrix programs don't set USER mode.

The program will set this if needed.

John Patterson

jepatterson

http://www.jepspectro.com

Name | Description | |
---|---|---|

4 | GSB 4 to run program | |

9 | Test loop | |

.4 |

Name | Description | |
---|---|---|

0 | Test | |

1 | Test | |

I | Register pointing to A in this program |

Number | Description | |
---|---|---|

8 | CF8 clear complex mode |

Line | Display | Key Sequence | Line | Display | Key Sequence | ||
---|---|---|---|---|---|---|---|

000 | 013 | 45 1 | RCL 1 | ||||

001 | 42,21, 4 | f LBL 4 | 014 | 43,30, 6 | g TEST x≠y | ||

002 | 43, 5, 8 | g CF 8 | 015 | 43 35 | g CLx | ||

003 | 42,16, 0 | f MATRIX 0 | 016 | 43,30, 5 | g TEST x=y | ||

004 | 4 | 4 | 017 | 26 | EEX | ||

005 | 36 | ENTER | 018 | u 44 24 | USER STO (i) | ||

006 | 4 | 4 | 019 | 22 9 | GTO 9 | ||

007 | 42,23,11 | f DIM A | 020 | 42,21, .4 | f LBL . 4 | ||

008 | 45,16,11 | RCL MATRIX A | 021 | 42 31 | f PSE | ||

009 | 44 25 | STO I | 022 | u 45 24 | USER RCL (i) | ||

010 | 42,16, 1 | f MATRIX 1 | 023 | 22 .4 | GTO . 4 | ||

011 | 42,21, 9 | f LBL 9 | 024 | 42 31 | f PSE | ||

012 | 45 0 | RCL 0 | 025 | 43 32 | g RTN |