Heated rod with ice bath (Example 9.5.2) L := 50; u0:=100; k:=0.15;

IiNd

IiQrIg==

JCIjOiEiIw==

u := (x,t,N) -> (4*u0/Pi)* sum((1/(2*j-1)) * exp( -((2*j-1)*Pi/L)^2*k*t ) * sin((2*j-1)*Pi*x/L),j=1..N);

Zio2JUkieEc2IkkidEdGJUkiTkdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLCQqKEkjdTBHRiUiIiJJI1BpRyUqcHJvdGVjdGVkRyEiIi1JJHN1bUc2JEYwSShfc3lzbGliR0YlNiQqKCwmSSJqR0YlIiIjRjFGLkYxLUkkZXhwR0Y0NiMsJCosRjhGOkYvRjpJIkxHRiUhIiNJImtHRiVGLjklRi5GMUYuLUkkc2luR0Y0NiMqKkY4Ri5GL0YuOSRGLkZARjFGLi9GOTtGLjkmRi4iIiVGJUYlRiU=

plot3d(u(x,t,50),x=0..L,t=0..2000,color=black,style=wireframe,axes=boxed);

NictJSpBWEVTU1RZTEVHNiMlJEJPWEctJStBWEVTTEFCRUxTRzYlUSJ4NiJRInQ2IlEhNiItJSVHUklERzYmOyQiIiEiIiEkIiNdIiIhOyQiIiEiIiEkIiUrPyIiIVgsSSlhbnl0aGluZ0clKnByb3RlY3RlZEc2IjYiW2dsJyElIiEhI1xibSI6IjowMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwMDAwNDA1N0U5MjVFOTUxMzJBODQwNDAyNzY1MzRGRjUwREY0MDM3MkMxM0Y3MDgwQzRGNDAzMzAyQjVBMUQ3NzVEMTQwMzA4MEMzN0VCNDg0MEQ0MDJEOEZBQjc1RkVBRTFFNDAyQjAwMENBMEU3RTE4NDQwMjhGQzRFMURCNUM2NEU0MDI3NTQxREZERUZEQjZDNDAyNUVBNUE3OUE1OUQ0OTQwMjRBQ0I3MEUzOTgyMkI0MDIzOEY2RUM0NjE3NEU2NDAyMjhBQ0Y2MzFCRkZEODQwMjE5OUJDQTVBMEE4QkQ0MDIwQjhDMjc4MEFERDRDNDAxRkNBRkM4Q0E2Mzg2QTQwMUUzQzdEOTJBNEY0OUM0MDFDQzM4Q0M2MjQ1MDcwNDAxQjVFNDcxMkFGQzJFNzQwMUEwQjJFOUM1RkFBNzg0MDE4QzkwOUVBMTRDMkY2NDAxNzk2Q0VBQzA1RDIxMDQwMTY3MzkzRjY1MzQ2MjY0MDE1NUU4OTQ1MzVBQTBENDAxNDU2RjA5NTE0OTI2RjQwNThBQzc3RUU2NzYzNUU0MDREQzQ2NEI4RTYxRTE0NDA0NjM3MkJCMURBREVGQzQwNDI3QTg2QzRDMDBFMDc0MDQwMjc1NjY5MjZEMDY0NDAzRDBFQTJGNTM1MTMyMzQwM0E5Q0Q3QzA3QzU4ODA0MDM4QUMzN0U3QjgwQjNENDAzNzEwREE5MjA2QTMyRTQwMzVCMDAzNDJBNTNEOTg0MDM0NzhDRjM2RDQ0Mzc4NDAzMzYwNThBMTNCNUZERTQwMzI1RjdBMjRDMzhDNzQ0MDMxNzE3MTc0RUI3Mjc3NDAzMDkzMDQ1QzZBOTA5NTQwMkY4M0VCNjdGQjg1MTI0MDJERjk1OTE3QzNGMDc5NDAyQzgzRjY3MEQ3OUJEQzQwMkIyMUY1NzgzRUQ3N0Y0MDI5RDFFNjc3RkE1QjQyNDAyODkyOTlBMDA0MURCOTQwMjc2MzBCNjFBQjZCNzE0MDI2NDI1N0FFMUFGNTRENDAyNTJGQjFBMTkzMDAzMjQwMjQyQTVFMDZGNDFDOTI0MDU4RkQ3MDk0QzY1RTA0NDA1M0I3QUVEMjRFRkNDMjQwNEYyOTdCQjg3OEM3QkM0MDRBNzlDNEE4ODlDNTA1NDA0NzY2OUQ4MUFFRDIyNjQwNDUzMDFFNTJCN0FCNDQ0MDQzN0RBNjBCNzFCRTlENDA0MjFGQjUzMkVENDMzRDQwNDBGQTYwQ0U4RDgwNTI0MDNGRjhCRjE5N0M5MzM5NDAzRTM1NTk0NDE5MzFENjQwM0M5QzQxODM5OTUyNUY0MDNCMjQwQTE3RjkzQkMwNDAzOUM2NjJDOENGMTlBMjQwMzg3RUZDNDA1RjAxRkE0MDM3NEFEMkM1MzA1RDQ4NDAzNjI3QkEzQTNBQjcxQTQwMzUxNDEzQjFGQjg4REE0MDM0MEU5RDk3MjdFMEE2NDAzMzE2NTRERDk1NUY4RDQwMzIyQTYxMUY3NjZBNTA0MDMxNEEwN0JEMjBDRkJCNDAzMDc0QTM3RDI5NDg4OTQwMkY1MzNFMjFFRkI3NUI0MDJERDBFMkVCNDZDMTQ0NDA1OTI3N0VFOUQ3QUMyMDQwNTY5QzQ4OTJENzRCNTQ0MDUzMDkwMTgwOEVCNUM3NDA1MDlBMTNGNzk2OUI4QjQwNERDM0ZGNzU4MjZCNkU0MDRCMkZGRjAzRTgwNkM4NDA0OTI3OEY3NkFBRkU1MTQwNDc3QjZEMUI2NkEyRTE0MDQ2MEU3QTU5NDlGOUIyNDA0NENFM0U1QjlEODQxOTQwNDNBRUNBMEM1OUIwRjE0MDQyQTg0QkZGQTA0RDc0NDA0MUI1OTI4MjBFQjU3RTQwNDBEMzFCMjRDOTY5RTI0MDNGRkNGMzgzNzAxMTdDNDAzRTZCRUQ0QkMzQ0RGNDQwM0NGMDlGQTk5NTBENUQ0MDNCODkyMTc2MjQ1N0U1NDAzQTMzRjA3RkIzODFCODQwMzhFRkQwMUEwOEVBQUI0MDM3QkJCMzgxRjU2NUYzNDAzNjk2QUZEODE2RjFENzQwMzU3RkYyRkJEODlFMUQ0MDM0NzZCRDg4RTRGMDM2NDAzMzdBNUVEOTBDMjlDRTQwNTkzOTgwNEMyREY3N0I0MDU4MTFDOTVCRDg3NzRFNDA1NTdCNkVFQ0U0Qzc1MDQwNTM0NjBFQjIwNjU5QUM0MDUxOEYxN0NEQkJCMDI5NDA1MDMzRTE5MzQyRkZBODQwNEUyRkNCMDMxNkQwMTE0MDRDNEY2NTZEQTRGMjg2NDA0QUFDRThDNDBDOTU4QzQwNDkzNzdDQzgyNjk2RjM0MDQ3RTQwOUQwMjQ5QUEzNDA0NkFCMzFEMEM2NTkzRTQwNDU4N0ZGMTkzMzA1MTQ0MDQ0NzcwQUE0OEFDM0MzNDA0Mzc1RUZGRTRDMDk2MzQwNDI4MkYzMjlCNDU1RDU0MDQxOUNDNkIwRkQ3MzQxNDA0MEMyNjY1QjUzRkQzNjQwM0ZFNUZFNDk0Q0I0OEU0MDNFNUJCRjcwMTlGODg3NDAzQ0U0RENDMUVGNDkwQTQwM0I4MDQ0RkQ5ODVGNUE0MDNBMkQwMDczRjQwN0M1NDAzOEVBMkI1OTIyNTkzMTQwMzdCNkYxRjQ3MDg0RDI0MDU5Mzk5QTVENkI1NjFGNDA1OEIwODQyQjM4NURCMTQwNTcxMjhGNjI0N0UxQjM0MDU1NDZEOUM4OTY1MUJBNDA1M0I2OEQxOEJCMEFDRTQwNTI2NDJCMUQ2QkI5ODg0MDUxNDI1ODgyMUNGOTEyNDA1MDQ0OEUwOTUyMDMyQTQwNEVDMzE1MkNFNDM0OTU0MDREMjVEMjVCRTE0NzExNDA0QkE4QTZDMzJCQTA3QTQwNEE0NUFDODJDMTM4MkM0MDQ4RjhEMjdFRThBQzQ4NDA0N0JGM0E0ODM4NjdCRTQwNDY5NkNFMTI3MUVERTE0MDQ1N0RGQkZDQUY1NzBGNDA0NDczODlBRkM3RUE1RDQwNDM3Njc3QjdEOENEQUY0MDQyODVFRUZFRkY5NEIxNDA0MUExMzRDQjZBQ0FCMTQwNDBDN0EyRUQxM0VBQUY0MDNGRjE0NTM4RkM3MjVDNDAzRTY3NTIyOUFENDE1MjQwM0NGMDZBOTc5NzZBQ0I0MDNCOEI5Q0MzRDczMTM1NDA1OTJDQTlCQzk3QjVGNjQwNThFOTVCNzFGNUVBRjc0MDU4MDU0RUIzQzM2RTU0NDA1NkIxQUYzM0VBMDM0MzQwNTU1RjEwNEZENTc1RkM0MDU0MjhBRkY2QjA2MUZCNDA1MzBGNjgyQzI0QTJFNzQwNTIwRUE1RDBGMjY2OTk0MDUxMjFEOEM3QUY3MjMzNDA1MDQ1N0IxQzYxRTU2RjQwNEVFRTAwNjhFMzkxNUE0MDRENjkyNzc1MUZEOEQyNDA0QkY5QkZGODA1NTE5OTQwNEE5REM4N0U1Qjk2NDA0MDQ5NTNCMTM5REM2QThGNDA0ODFBMzZGMTRFQzA5RjQwNDZGMDRBRDc2QTQ4OTE0MDQ1RDUwMkQzNTE4ODE0NDA0NEM3OEY0MTVEMThCMTQwNDNDNzM0M0I1OTZGQjQ0MDQyRDM0NTI2Rjc2RTAzNDA0MUVCMjFCQjk2QTEzNTQwNDEwRTMzRkE3NDBDOEU0MDQwM0JFRUMzRDNCRkJFNDAzRUU3OTlBNDhDMjFBNDQwNTkxN0MxMjdGMDdBMjQ0MDU4RkE4MjBFMkYzNUJENDA1ODhBMTUzNjA4RjdFNDQwNTdBM0M1RjQzRTU0RUE0MDU2OTZDQUEwRkZFMTVGNDA1NTg3MDAwNERFMkRENzQwNTQ3Rjk3QTIxNDY5Qjc0MDUzODM3Q0VEMjFENjZBNDA1MjkzMUVBRUUxNkZERDQwNTFBRTM1NDhFMjE2OUE0MDUwRDQ0OENFMDUwRTU1NDA1MDA0RDgwMEE4ODkxODQwNEU3RUM2RURFRjg3QzU0MDREMDZFMTQzRTIyOTY2NDA0QkExMTRGM0IwMDA3ODQwNEE0QzgyRkI2QkJDM0I0MDQ5MDg1NzA1REJGNzAzNDA0N0QzQzZGMjYwMDY3NjQwNDZBRTEyNUE3QjU1N0U0MDQ1OTY4MjFBRTdFNTdGNDA0NDhDNjdFMUIyMzUyMjQwNDM4RjFEQzE5RDlCQjM0MDQyOUUwNUNBQjQ2QkEzNDA0MUI4ODlBN0NFQkI2MDQwNDBERTFBNDBENUJENjU0MDU5MDAyRUJDMkRFODE2NDA1OEZFREU0NjFFRDUxMTQwNThDQ0FDNEJDMDI5RkU0MDU4M0I5NDE1OEM2NEY2NDA1NzZGOEMwQjM0N0VBQjQwNTY4ODJGNTE2MzlFQUU0MDU1OTY1NEEyQzkxODAyNDA1NEEyRjQwRkI0ODE1MjQwNTNCMzBGNzc1QkRDRkQ0MDUyQzk3RkM3MEFBRjE5NDA1MUU3REFDMDc2MzMwRjQwNTEwRUYxRDBGRDRDMzg0MDUwM0YxRDQxNDBDODQ4NDA0RUYwRDUxOEU1QTBFMDQwNEQ3NTcyRjQ2MjFENkE0MDRDMEI5RDExNzM0MjlFNDA0QUIyQkQzMjJDMEE3NTQwNDk2QTJDQTJCMzQzMjg0MDQ4MzEzRDg0M0JDRkQzNDA0NzA3NDA5ODhBRUY1RDQwNDVFQjg4RDE5MzgzMDE0MDQ0REQ2RDc0NDc0M0IyNDA0M0RDNEI1MzRBQjQ4NzQwNDJFNzg1NzY4N0IxMEM0MDQxRkU4NTY2MDk0MTc3NDA1OEVCMDI4MDc1N0ZENjQwNThGRkNENTlDOEVFQUY0MDU4RUIyREJCQkMxOEI1NDA1ODkzRDM1MERENDgxNTQwNTdGQjI0Q0RCRUEyNjE0MDU3MzY2RUM3NzdCNUQ4NDA1NjU4NzBCODExMzRGODQwNTU2RTU3NjA2RThDQTk0MDU0ODBCRjdFOEIxODY2NDA1Mzk1MTRGNkE0RTg3MzQwNTJBRUE2M0Q0RTZFMkM0MDUxQ0Y2MzJENDFCMDAzNDA1MEY4NUI3MUZEODc0MTQwNTAyQTEwQjMwQjdDNzE0MDRFQzk1NzBBOEUxMUQ1NDA0RDUwM0FCRTU5RDE2RTQwNEJFODZDOUM3MzkyMDE0MDRBOTE2NTlBREMxN0E0NDA0OTRBODkxRTNFMzEwNzQwNDgxMzMwMTRBNDBBNTM0MDQ2RUFBRkVCNDlFMjNGNDA0NUQwNUVEREVFOUY0RjQwNDRDMzk2OTRENzcxRDg0MDQzQzNCNUFFQjhBMThFNDA0MkQwMjA5QjQwRTRDRjQwNThEQzcwRjFCRUJFNDA0MDU4RkZGODY3MkExQTBCNDA1OEY3OEUwNzA2QjlCQjQwNThDMDlDNjE4MkM4QjI0MDU4NDg2NzExOEIwQUM4NDA1NzlBRDI5QTY4REE5RTQwNTZDQUEzMjkwMkMzRkE0MDU1RTc2QTNFRTkzN0JFNDA1NEZDMEQ0QzZCRjdCNDQwNTQwRkE3NkEyRUFEMjA0MDUzMjZBQjI2NUZFMDMxNDA1MjQzQzc1NTY3NDY5OTQwNTE2ODg2NTE3QTk5NzU0MDUwOTVCN0FFMTEyOEVCNDA0Rjk3NjlGMjM2REIzMjQwNEUxNTFDMTE3RjBFOTI0MDRDQTQ0QUM2MERDMkZDNDA0QjQ0ODRDN0FENkMzNzQwNDlGNTM5OTY2RTM4NUY0MDQ4QjVDODIxQzM3RjIwNDA0Nzg1ODgwNDE5QUIyNTQwNDY2M0NGNDY0REM1QUI0MDQ1NEZGNUVCNjg1RkIzNDA0NDQ5NTgxMjBDRTIwRTQwNDM0RjU3MkY0RTI1MkI0MDU4RDc0MkFBMDQ2MzMwNDA1OEZGRkUxRjE0M0NDQTQwNThGQUNBN0ZFODMyOTU0MDU4Q0UyRDUzREJEQ0EwNDA1ODYxMDg1NjU5ODA2RDQwNTdCQjhERTdGQjY0OTQ0MDU2RjA0QkVBNUFFOTczNDA1NjBGOTgxQTMxMkFGRjQwNTUyNTFGODM0ODlCRjk0MDU0Mzg5MzA2OUM2Qjc4NDA1MzRFQ0I1NjI3Q0E5NzQwNTI2QUJBNDEyODY2Mjc0MDUxOEUxNTNCMTI2QTQyNDA1MEI5QzczRkMyOEIzMDQwNEZEQzc2Mzk3QzAwODM0MDRFNTcxNkJGNzg3NkMzNDA0Q0UzNDIyRkM1NzNDMjQwNEI4MDhFRkUzQ0VBNjI0MDRBMkU3MTAyNUY0Qzg5NDA0OEVDNDk1RDc2Rjg3NjQwNDdCOTcwODI4M0QxQUQ0MDQ2OTUzQzdDNkUwRjYyNDA0NTdGMDRDRDQ2RjM0MTQwNDQ3NjI0QzRGOTRBOEY0MDQzNzlGQ0RERjhFRDA5NDA1OERDNzBGMkI4MTFEMjQwNThGRkY4NjcxNkM4OTU0MDU4Rjc4RTA2Rjg0M0ZGNDA1OEMwOUM2MTc4MjQyMzQwNTg0ODY3MTE4Mjg1QTU0MDU3OUFEMjlBNjE5QjZGNDA1NkNBQTMyOEZDNURERTQwNTVFNzZBM0VFMzZFNDI0MDU0RkMwRDRDNjZBNjMzNDA1NDBGQTc2QTI5QkMwMzQwNTMyNkFCMjY1QjNGQUE0MDUyNDNDNzU1NjJFQkIyNDA1MTY4ODY1MTc2N0M0RDQwNTA5NUI3QUUwRDQzQTU0MDRGOTc2OUYyMkY3NzUyNDA0RTE1MUMxMTc4MEEwOTQwNENBNDRBQzYwNzE3QjA0MDRCNDQ4NEM3QTcxNERGNDA0OUY1Mzk5NjY4MzA0RjQwNDhCNUM4MjFCREMyMjM0MDQ3ODU4ODA0MTQzNTU5NDA0NjYzQ0Y0NjQ4OTM3QTQwNDU0RkY1RUI2MzZEQkU0MDQ0NDk1ODEyMDgyRDJENDA0MzRGNTcyRjQ5QUE2MDQwNThFQjAyN0Y2Mzg4QTk0MDU4RkZDRDU5QTMyNEQyNDA1OEVCMkRCQkEwREY4NzQwNTg5M0QzNTBDOEYzMkU0MDU3RkIyNENEQUUyM0VGNDA1NzM2NkVDNzY5OTBDNjQwNTY1ODcwQjgwNEE3MzU0MDU1NkU1NzYwNjMyODYyNDA1NDgwQkY3RTgwOUEyNjQwNTM5NTE0RjY5QjI0NzI0MDUyQUVBNjNENDU0NkRGNDA1MUNGNjMyRDM5MTBDRDQwNTBGODVCNzFGNTYxMzg0MDUwMkExMEIzMDNDNDY4NDA0RUM5NTcwQTdGNkM0QTQwNEQ1MDNBQkU0QkU4NEE0MDRCRTg2QzlDNjY1OTVGNDA0QTkxNjU5QUNGODUzNTQwNDk0QTg5MUUzMjNCQTU0MDQ4MTMzMDE0OThBOUFCNDA0NkVBQUZFQjNGMEVCMTQwNDVEMDVFRERFNDUxQzA0MDQ0QzM5Njk0Q0RBM0EzNDA0M0MzQjVBRUFGNEM3MDQwNDJEMDIwOUIzODAyREY0MDU5MDAyRUJDOTE2NDA2NDA1OEZFREU0NUU5RUFFMzQwNThDQ0FDNEI5QjRCNjc0MDU4M0I5NDE1NzAxNjBFNDA1NzZGOEMwQjFEMDZBRTQwNTY4ODJGNTE0RjNBMkE0MDU1OTY1NEEyQjZEODlDNDA1NEEyRjQwRkEzREI2QTQwNTNCMzBGNzc0Qzc4Q0Y0MDUyQzk3RkM2RkM1MkQwNDA1MUU3REFDMDY4QjczNjQwNTEwRUYxRDBGMDk0RjA0MDUwM0YxRDQxMzRDMTM1NDA0RUYwRDUxOENFRDQzNjQwNEQ3NTcyRjQ0Qzc5Q0E0MDRDMEI5RDExNUVCM0ZGNDA0QUIyQkQzMjE4N0ZEMDQwNDk2QTJDQTJBMEFEOUU0MDQ4MzEzRDg0MkEyMjEyNDA0NzA3NDA5ODdBMUQ0MjQwNDVFQjg4RDE4MzgxNUI0MDQ0REQ2RDc0MzgwODEwNDA0M0RDNEI1MzNDMzUxRjQwNDJFNzg1NzY3OUU0QTM0MDQxRkU4NTY1RkMxRjU1NDA1OTE3QzEyOEE4QUE2ODQwNThGQTgyMERGMjQ5RDU0MDU4OEExNTM1REU2NUVDNDA1N0EzQzVGNDFDMkM1QzQwNTY5NkNBQTBFMkI5OUQ0MDU1ODcwMDA0QzQ2N0NENDA1NDdGOTdBMUZEMTlENTQwNTM4MzdDRUQwQzZBQzY0MDUyOTMxRUFFQ0Q4OTg3NDA1MUFFMzU0OENGNzU5QTQwNTBENDQ4Q0RGMzg2Mzg0MDUwMDREODAwOTdGOUVGNDA0RTdFQzZFREQwMkJDQzQwNEQwNkUxNDNDNDZBRkQ0MDRCQTExNEYzOTNDMjA3NDA0QTRDODJGQjUwRTUwQTQwNDkwODU3MDVDMjcxQ0M0MDQ3RDNDNkYyNDdDMDY1NDA0NkFFMTI1QTY0M0Q5MDQwNDU5NjgyMUFEMUVDMUM0MDQ0OEM2N0UxOUQ0QkQxNDA0MzhGMURDMTg5QjRFQzQwNDI5RTA1Q0FBMTdBQUI0MDQxQjg4OUE3QkNCNDM0NDA0MERFMUE0MEM0OTRBNjQwNTkyQ0E5QkIwQTAwOEU0MDU4RTk1QjcxQkFDQUVENDA1ODA1NEVCMzk3MEQ1OTQwNTZCMUFGMzNDNDIzNzM0MDU1NUYxMDRGQjQwMDc0NDA1NDI4QUZGNjkyMzRGNzQwNTMwRjY4MkMwOEZFQ0Y0MDUyMEVBNUQwRDhDOUIzNDA1MTIxRDhDNzk3ODNDMTQwNTA0NTdCMUM0QjY3QTM0MDRFRUUwMDY4QjkxRUM1NDA0RDY5Mjc3NEY3QUUxRTQwNEJGOUJGRjdERjNDRUI0MDRBOURDODdFMzc2RkVDNDA0OTUzQjEzOUJBMTFENDQwNDgxQTM2RjEyRTE5ODc0MDQ2RjA0QUQ3NEIzQThENDA0NUQ1MDJEMzMzRkQxNDQwNDRDNzhGNDE0MEZDOTA0MDQzQzczNDNCM0VBRkNFNDA0MkQzNDUyNkRERjhGMzQwNDFFQjIxQkI3RTY2QUI0MDQxMEUzM0ZBNUNGRDFFNDA0MDNCRUVDM0JEQ0NEQTQwM0VFNzk5QTQ2MjU5NTg0MDU5Mzk5QTVFMENFQTc1NDA1OEIwODQyQjA3REYwQTQwNTcxMjhGNjIxQzkzMDM0MDU1NDZEOUM4NkU4MkVBNDA1M0I2OEQxODk2OTM3RjQwNTI2NDJCMUQ0QTIxRTI0MDUxNDI1ODgxRkRDNzY3NDA1MDQ0OEUwOTM0RDcxODQwNEVDMzE1MkNBRDU5MzY0MDREMjVEMjVCQUQ4MDBENDA0QkE4QTZDMkZBOUZERjQwNEE0NUFDODI5MkMxRjY0MDQ4RjhEMjdFQkM5MDg5NDA0N0JGM0E0ODBFN0VDOTQwNDY5NkNFMTI0QTE1QzY0MDQ1N0RGQkZDODk3MUYxNDA0NDczODlBRkEzREQ2NzQwNDM3Njc3QjdCNjgwNTU0MDQyODVFRUZFREVGMDNENDA0MUExMzRDQjRCQjlFRTQwNDBDN0EyRUNGNjU5QjQ0MDNGRjE0NTM4QzQyQTYxNDAzRTY3NTIyOTc3QUZDQjQwM0NGMDZBOTc2NDZFMDc0MDNCOEI5Q0MzQTZBOTM5NDA1OTM5ODA0QjUwMTQ5ODQwNTgxMUM5NUJCNjAzQkM0MDU1N0I2RUVDQkJCRkUwNDA1MzQ2MEVCMURERDI4RDQwNTE4RjE3Q0Q5NTRCREM0MDUwMzNFMTkzMUVFNTNGNDA0RTJGQ0IwMkQyRDU2MzQwNEM0RjY1NkQ2NEM2Q0E0MDRBQUNFOEMzQ0ZEQ0IyNDA0OTM3N0NDN0VEMDZCMjQwNDdFNDA5Q0ZFREY2RDQ0MDQ2QUIzMUQwOTI2RkZDNDA0NTg3RkYxOTAxQUJDQzQwNDQ3NzBBQTQ1QkQ1MTk0MDQzNzVFRkZFMUY2M0RENDA0MjgyRjMyOTg5REFFNDQwNDE5Q0M2QjBENTA2QUM0MDQwQzI2NjVCMkQ4NEFBNDAzRkU1RkU0OTAzN0ExRTQwM0U1QkJGNkZENDQ2MkQ0MDNDRTREQ0MxQUNGMkJDNDAzQjgwNDRGRDU5M0I1NzQwM0EyRDAwNzNCN0VFNkQ0MDM4RUEyQjU4RTkyNEU3NDAzN0I2RjFGNDNBMTFDRjQwNTkyNzdFRTcxODU5RkM0MDU2OUM0ODkyQkU2NDI4NDA1MzA5MDE4MDY3N0FDQjQwNTA5QTEzRjc2REZCMzE0MDREQzNGRjc1MzM2NEQ3NDA0QjJGRkYwMzlDNTVERDQwNDkyNzhGNzY2MkNGQ0I0MDQ3N0I2RDFCMjFFNDExNDA0NjBFN0E1OTA4ODc1ODQwNDRDRTNFNUI1RjM3OUY0MDQzQUVDQTBDMUU2NDI0NDA0MkE4NEJGRjY3REI4QTQwNDFCNTkyODFEOEZCNTI0MDQwRDMxQjI0OTY0NUY5NDAzRkZDRjM4MzBFQjY2QTQwM0U2QkVENEI2NzIyRUU0MDNDRjA5RkE5M0NEODlDNDAzQjg5MjE3NUQwNjI2OTQwM0EzM0YwN0Y2Mzk3MjY0MDM4RUZEMDE5QkNEOTJFNDAzN0JCQjM4MUFDRkUxRjQwMzY5NkFGRDdEMjA2ODQ0MDM1N0ZGMkZCOTcwNDUxNDAzNDc2QkQ4OEE2N0YwOTQwMzM3QTVFRDhEMEJBNTI0MDU4RkQ3MDk1NTM0MEE1NDA1M0I3QUVEMjM1MUQyODQwNEYyOTdCQjgyQUZFRTM0MDRBNzlDNEE4MzhBQjlBNDA0NzY2OUQ4MTVFOUVENDQwNDUzMDFFNTI2OUI0RjE0MDQzN0RBNjBCMjY5MjVGNDA0MjFGQjUzMkE1MUNBRjQwNDBGQTYwQ0U0ODcyOUQ0MDNGRjhCRjE4RjhBMzQ2NDAzRTM1NTk0MzlCNERBMjQwM0M5QzQxODMyMTRCQTY0MDNCMjQwQTE3ODZEQzQ3NDAzOUM2NjJDODYyMjc0QTQwMzg3RUZDM0ZGNzQxNEU0MDM3NEFEMkM0Q0Q5MzAyNDAzNjI3QkEzOURDQTkxQzQwMzUxNDEzQjFBMUZFQjc0MDM0MEU5RDk2RDJBM0ZBNDAzMzE2NTRERDQ0M0MxQzQwMzIyQTYxMUYyOTJFMTg0MDMxNEEwN0JDRDc0QUY0NDAzMDc0QTM3Q0UzNEQ5QjQwMkY1MzNFMjE2QTdFM0I0MDJERDBFMkVBQzdGMUZFNDA1OEFDNzdFRDhEMDY0QjQwNERDNDY0Qjg5QzI1RTU0MDQ2MzcyQkIxOEIwRjZFNDA0MjdBODZDNDZGMDYzNTQwNDAyNzU2NjhENjExMTA0MDNEMEVBMkY0OTY2QTkxNDAzQTlDRDdCRkUyMTA5NzQwMzhBQzM3RTcyMzEyNTg0MDM3MTBEQTkxNzc3ODZBNDAzNUIwMDM0MjFDMTY1QzQwMzQ3OENGMzY1MTI2M0E0MDMzNjA1OEEwQkUzNUZFNDAzMjVGN0EyNDRDMkREQjQwMzE3MTcxNzQ3OUFEMTQ0MDMwOTMwNDVCRkUyRDE4NDAyRjgzRUI2NzJEMEVDMjQwMkRGOTU5MTZGRjU2RjM0MDJDODNGNjcwMUM2Q0NDNDAyQjIxRjU3NzhDQTM3MzQwMjlEMUU2Nzc1MEI2ODE0MDI4OTI5OTlGNjJBMEE5NDAyNzYzMEI2MTExQjJDNjQwMjY0MjU3QUQ4OEEyMTE0MDI1MkZCMUExMDdCN0JCNDAyNDJBNUUwNjZGODg2NTQwNTdFOTI1RTk4Nzg5ODg0MDQwMjc2NTM0OUEyQjNDNDAzNzJDMTNGNjYyRTRGRDQwMzMwMkI1QTEzNTQ5QTY0MDMwODBDMzdFMTI5NTVGNDAyRDhGQUI3NEJFODJEMDQwMkIwMDBDOUZBRUUzRUU0MDI4RkM0RTFDODY2NUMxNDAyNzU0MURGQ0NCODk4NDQwMjVFQTVBNzg4RDEzRjI0MDI0QUNCNzBEMkQwMTc0NDAyMzhGNkVDMzYwRUY4MDQwMjI4QUNGNjIyNzM4RTU0MDIxOTlCQ0E0Qjc0NzNENDAyMEI4QzI3NzJDNzg4QTQwMUZDQUZDOEFGRTg3NkU0MDFFM0M3RDkxMTE3NTkxNDAxQ0MzOENDNEE0MUQ0QjQwMUI1RTQ3MTE0MUY5RTc0MDFBMEIyRTlCMDM3MDY4NDAxOEM5MDlFOEM5NDQ2MjQwMTc5NkNFQUFDQTQzRUM0MDE2NzM5M0Y1MjZFNjAzNDAxNTVFODk0NDE3QkUyMTQwMTQ1NkYwOTQwNDY5NjZCRUM1QTNBODc4RjQzMDNBQkU2QzUxNjQxMTRFMTBCOEJFNjRGNENBMkNEMDNDM0FCRTY0NDg2MERFMDlFMkNEQkU2NDQxNjk0MTg3RjBCRUJFNjQxMEMwNTg0NzJGMzBCRTYzQTZBNzcwMERBRjJBQkU2MzEyODY2QTEwQ0I3NEJFNjI2NENDODFCMUY2MEVCRTYxQTlCOTk1NEYyQzc5QkU2MEU5ODVGNjQ2OUNDQUJFNjAyOTcyRkFBOTg2RTJCRTVFRDk4MEU1MTI4N0UzQkU1RDZBQkNGNDRBM0M0M0JFNUMwOENBQzU5NTFGNkNCRTVBQjRDODdEREYxMTEyQkU1OTZGMjc1QUFCQzlDM0JFNTgzN0VDRjk1RDNDNUVCRTU3MEVERDIxOTg2REQwQkU1NUYzOTQ3MTk4MENBNkJFNTRFNTk5NTVCMkU0RTdCRTUzRTQ2NkM2QjA4REVEQkU1MkVGNzMwQkEwNTAxRkJFNTIwNjMzRUVCNDk0NUVCRTUxMjgyMTUwRDk1OERDLSUmQ09MT1JHNiYlJFJHQkckIiIhISIiJCIiISEiIiQiIiEhIiItJSxPUklFTlRBVElPTkc2JCQiJCFSISIiJCIkKyUhIiItJSZTVFlMRUc2IyUlTElORUc=

Heated rod with insulated ends (Example 9.5.3) f := x -> piecewise(0<x and x<=25, 4*x, 25<x and x<=50, 200-4*x);

Zio2I0kieEc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLUkqcGllY2V3aXNlRyUqcHJvdGVjdGVkRzYmMzIiIiE5JDFGMCIjRCwkRjAiIiUzMkYyRjAxRjAiI10sJiIkKyMiIiJGMCEiJUYlRiVGJQ==

plot(f(x),x=0..50, color=black);

NigtJSdDVVJWRVNHNiM3VTckJCIiISEiIiQiIiEhIiI3JCQiMk1MTCQzeCYpKjMiISM7JCIxTUxMTDNWZlYhIzo3JCQiMW5tIkgyUCJRPyEjOiQiMW5tbSJIW0Q6KSEjOjckJCIyTUxMZVJ3WDUkISM7JCIyTUxMJGUwJD1DIiEjOjckJCIxTUwkM3glM3lUISM6JCIyUExMJDNSQnI7ISM6NyQkIjFubSJ6JTRcWV8hIzokIjJtbW0iempmKTQjISM6NyQkIjFMTGVSLS9QaSEjOiQiMktMTGU0O1tcIyEjOjckJCItRGNtcGlzISM2JCIsRG15XSFIISIqNyQkIjFNTGUqKT5WQiQpISM6JCIyTkxMZXpzJEhMISM6NyQkIi1ESmJ3IVEqISM2JCIsREAxQnYkISIqNyQkIjJvbW1USU9vLyIhIzokIjJ1bW1tQFh0PSUhIzo3JCQiMk5MJDNfPmpVNiEjOiQiMU1MTDN5X3FYISM5NyQkIjIuKytEO3YvRCIhIzokIjEsKytdMSE+KyYhIzk3JCQiLHY9aChlOCEiKiQiKnZXXVYmISIoNyQkIjItKyt2JFs2ajkhIzokIjEsKytdJGZDJmUhIzk3JCQiMk5MZSpbeih5YiIhIzokIjFNTCRlejY6QichIzk3JCQiMW5tO2EvY3E7ISM5JCIxb21tOz1DI28nISM5NyQkIjJubW1tSjxndyIhIzokIjFubW1tI3BTMSghIzk3JCQiLkQxTWNxKD0hIzYkIixET0QjM3YhIio3JCQiMm9tbTtwV2AoPiEjOiQiMW5tbW0oeTgheiEjOTckJCIyLitEMWYjPSQzIyEjOiQiMSwrXWkudEskKSEjOTckJCIudj14cGU9IyEjNiQiLHYzek11KSEiKjckJCIxbm0iSDI4SUgjISM5JCIxb21tIkhfPzwqISM5NyQkIjFuO3pwU1MiUiMhIzkkIjFubTt6aWhsJiohIzk3JCQiMi1dUDQxb1dXIyEjOiQiMSwrdlZBKHl4KiEjOTckJCIyT0wkM18/YChcIyEjOiQiMU1MTDMjRywqKiohIzk3JCQiMk8kM19EMWxfRCEjOiQiMW1tInpcKFIqeSohIzk3JCQiMk9MZSopPnB4ZyMhIzokIjFtbTsvSyMqbyYqISM5NyQkIjIuK3YkZjR0LkYhIzokIjEqKioqXGloMiY9KiEjOTckJCIyTkwkZSpHc3QhRyEjOiQiMW1tbVQzXnEoKSEjOTckJCIrRFJXOUghIikkIilWQVUkKSEiJzckJCItREpFPj5JISM1JCIrdiVISyN6ISIpNyQkIi5EMVJVMDckISM2JCIsdlZJeV4oISIqNyQkIi12PVMyTEshIzUkIitEUnFucSEiKTckJCIxbm1tInApPU1MISM5JCIxTExMTF9Dam0hIzk3JCQiMi8rK3Y9XUBXJCEjOiQiMSkqKioqKlwjKlJKaSEjOTckJCIxTCRlKlskeipSTiEjOSQiMndtbVRnIzNTZSEjOjckJCIyMSsrRFlLcGskISM6JCIxKSoqKioqXCxGN2EhIzk3JCQiMmttIkgycWNaUCEjOiQiMlhMTDMoPnQ0XSEjOjckJCIyMCtESjVmRiZRISM6JCIxKSoqKlwoZWoqKWUlISM5NyQkIjJsbW1UZy5jJlIhIzokIjFNTEwkZSZleFQhIzk3JCQiLkRjRXNLMSUhIzYkIjEqKioqXFA0InB1JCEjOTckJCIxTUxMJCkqcHA7JSEjOSQiMWttbW0rN0tMISM5NyQkIjJNTCQzeGUsdFUhIzokIjJqbW07XE96IUghIzo3JCQiMnVtIkhkTz15ViEjOiQiMi5MTDNQbHNbIyEjOjckJCIyMCsrXSM+I1taJSEjOiQiMSkqKioqKipINzI1IyEjOTckJCIxbm1UJkchZSZlJSEjOSQiMkRMTCRlKXl3bCIhIzo3JCQiMU1MTCQpUWslbyUhIzkkIjFsbW1tV1VoNyEjOTckJCIxLF1pU2pFIXolISM5JCIxdSoqKlxQWSQqUSkhIzo3JCQiMSxdUDQwTyIqWyEjOSQiMXIqKipcaXpiTSUhIzo3JCQiJCsmISIiJCIiISEiIi0lJVZJRVdHNiQ7JCIiISEiIiQiJCsmISIiJShERUZBVUxURy0lJkNPTE9SRzYmJSRSR0JHJCIiISEiIiQiIiEhIiIkIiIhISIiLSUqQVhFU1NUWUxFRzYjJSdOT1JNQUxHLSUoU0NBTElOR0c2IyUuVU5DT05TVFJBSU5FREctJSVST09URzYnLSUpQk9VTkRTX1hHNiMkIiQrJCEiIi0lKUJPVU5EU19ZRzYjJCIjISohIiItJS1CT1VORFNfV0lEVEhHNiMkIiUhZSQhIiItJS5CT1VORFNfSEVJR0hURzYjJCIlIVwkISIiLSUpQ0hJTERSRU5HNiI=

Fourier series of f(t) a:= n-> (2/L) * int(f(x)*cos(n*Pi*x/L),x=0..L);

Zio2I0kibkc2IkYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLCQqJkkiTEdGJSEiIi1JJGludEc2JCUqcHJvdGVjdGVkR0koX3N5c2xpYkdGJTYkKiYtSSJmR0YlNiNJInhHRiUiIiItSSRjb3NHRi82IyoqOSRGOEkjUGlHRjBGOEY3RjhGK0YsRjgvRjc7IiIhRitGOCIiI0YlRiVGJQ==

f2 := (x,N) -> a(0)/2 + sum(a(n)*cos(n*Pi*x/L),n=1..N);

Zio2JEkieEc2IkkiTkdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLCYtSSJhR0YlNiMiIiEjIiIiIiIjLUkkc3VtRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliR0YlNiQqJi1GLDYjSSJuR0YlRjAtSSRjb3NHRjQ2IyoqRjtGMEkjUGlHRjVGMDkkRjBJIkxHRiUhIiJGMC9GOztGMDklRjBGJUYlRiU=

plot({f2(x,10),f(x)},x=0..50);

NigtJSdDVVJWRVNHNiQ3XW83JCQiIiEhIiIkIjI7RF10KVFBWkwhIzs3JCQiMk5MTDNGV1lzIyEjPCQiMSUqUXg5LFQ9TSEjOjckJCIxbm1tVCYpR1xhISM7JCIyYUZvRSN6KjRqJCEjOzckJCIsRCJHJFI8KSEjNiQiMmpnSU9oKDQjKVIhIzs3JCQiMk1MTCQzeCYpKjMiISM7JCIxKXB4ViMpb3BZJSEjOjckJCIuRDFSKCpSYyIhIzckIjFPWlpCJVImNGMhIzo3JCQiMW5tIkgyUCJRPyEjOiQiMVRlZEZebiI0KCEjOjckJCIyTUxMZVJ3WDUkISM7JCIyJj5NIW9ldGk4IiEjOjckJCIxTUwkM3glM3lUISM6JCIyOzNnRFxgZmoiISM6NyQkIjFubSJ6JTRcWV8hIzokIjJFJVwjNDsnKlw4IyEjOjckJCIxTExlUi0vUGkhIzokIjJEUG4lNFgnPmMjISM6NyQkIi1EY21waXMhIzYkIjIvWCgqRzkyJGZIISM6NyQkIjFNTGUqKT5WQiQpISM6JCIydSoqXE0wVSRSTCEjOjckJCItREpidyFRKiEjNiQiMWVoJ1J5P3VyJCEjOTckJCIyb21tVElPby8iISM6JCIxUHI0cDFeTFQhIzk3JCQiMk5MJDNfPmpVNiEjOiQiMlcxMi4xPTRgJSEjOjckJCIyLisrRDt2L0QiISM6JCIxcFElekooNC1dISM5NyQkIix2PWgoZTghIiokIjJ2QDVUaVddWiYhIzo3JCQiMi0rK3YkWzZqOSEjOiQiMTc+ZidRRmghZiEjOTckJCIyTkxlKlt6KHliIiEjOiQiMWsiZkc3QnhFJyEjOTckJCIxbm07YS9jcTshIzkkIjAxNTR4LjRuJyEjODckJCIybm1tbUo8Z3ciISM6JCIxKjQ5QD1GQiwoISM5NyQkIi5EMU1jcSg9ISM2JCIxMSw0VVk5VHUhIzk3JCQiMm9tbTtwV2AoPiEjOiQiMDBMV3V2XCd5ISM4NyQkIjIuK0QxZiM9JDMjISM6JCIxYz05a3V2byQpISM5NyQkIi52PXhwZT0jISM2JCIxVyFHUylvTlopKSEjOTckJCIxbm0iSDI4SUgjISM5JCIxWSNlKFtWJCl6IyohIzk3JCQiMW5UTnImM0FNIyEjOSQiMTtdT05VOk4lKiEjOTckJCIxbjt6cFNTIlIjISM5JCIxdCU+NFApM2EmKiEjOTckJCIyUGVrYDFPelQjISM6JCIxKlFOST4hSCwnKiEjOTckJCIyLV1QNDFvV1cjISM6JCIwVmsocEciZWoqISM4NyQkIjJuVDVsMCs1WiMhIzokIjBecXdYOXNsKiEjODckJCIyT0wkM18/YChcIyEjOiQiMTckXC85Pl9tKiEjOTckJCIyTTMtKVE4NEREISM6JCIxayc0bF9SI2YnKiEjOTckJCIyTyQzX0QxbF9EISM6JCIxeFU7KVt5KFEnKiEjOTckJCIyUWVSQSIqNC1lIyEjOiQiMUI6Iz1tP1RnKiEjOTckJCIyT0xlKik+cHhnIyEjOiQiMDxDJjNddWImKiEjODckJCIxbm07eit2YkUhIzkkIi9UQHlGJjNXKiEjNzckJCIyLit2JGY0dC5GISM6JCIxJT1KRGY8NkgqISM5NyQkIjJOTCRlKkdzdCFHISM6JCIxMyMqKlFrOnUoKSkhIzk3JCQiK0RSVzlIISIpJCIxcnl6aCZSK1EpISM5NyQkIi1ESkU+PkkhIzUkIjFSdCVmUEooKil5ISM5NyQkIi5EMVJVMDckISM2JCIwc11ycyEpNFgoISM4NyQkIi12PVMyTEshIzUkIjA6KXBcLW06cSEjODckJCIxbm1tInApPU1MISM5JCIxeF8sNGg5YW0hIzk3JCQiMi8rK3Y9XUBXJCEjOiQiMWVXNmInPndFJyEjOTckJCIxTCRlKlskeipSTiEjOSQiMSZcNS5jUFEqZSEjOTckJCIyMSsrRFlLcGskISM6JCIxOjYpRz5aMVgmISM5NyQkIjJrbSJIMnFjWlAhIzokIjE5Jj06IypRMiwmISM5NyQkIjIwK0RKNWZGJlEhIzokIjIlZSVwKHpsbl1YISM6NyQkIjJsbW1UZy5jJlIhIzokIjFYIjMwX2hQNyUhIzk3JCQiLkRjRXNLMSUhIzYkIjF6eTsiZXdDciQhIzk3JCQiMU1MTCQpKnBwOyUhIzkkIjJEaCpcKFxsPE0kISM6NyQkIjJNTCQzeGUsdFUhIzokIjIjeS5gI3pUPidIISM6NyQkIjJ1bSJIZE89eVYhIzokIjInPUphLDRDYUQhIzo3JCQiMjArK10jPiNbWiUhIzokIjJvSlopR3VRUEAhIzo3JCQiMW5tVCZHIWUmZSUhIzkkIjIkcGFtZWAlKT47ISM6NyQkIjFNTEwkKVFrJW8lISM5JCIyb3BqJHBaN2U2ISM6NyQkIjEsXWlTakUheiUhIzkkIjFlZ3B1JG95SCghIzo3JCQiK0RNIjMlWyEiKSQiMSY0XXpubHhvJiEjOjckJCIxLF1QNDBPIipbISM5JCIxUlc3SUMqKmZXISM6NyQkIjFeNy4jUT8mPVwhIzkkIjImSHZdXjA2eVIhIzs3JCQiMi9dKG9hLW9YXCEjOiQiMj0ieTRnYz9ITyEjOzckJCIwdlZ0N1NHKFwhIzgkIjF2YS8mKSplelQkISM6NyQkIiQrJiEiIiQiMjtEXXQpUUFaTCEjOy0lJkNPTE9SRzYmJSRSR0JHJCIjNSEiIiQiIiEhIiIkIiIhISIiLSUnQ1VSVkVTRzYkN1U3JCQiIiEhIiIkIiIhISIiNyQkIjJNTEwkM3gmKSozIiEjOyQiMU1MTEwzVmZWISM6NyQkIjFubSJIMlAiUT8hIzokIjFubW0iSFtEOikhIzo3JCQiMk1MTGVSd1g1JCEjOyQiMk1MTCRlMCQ9QyIhIzo3JCQiMU1MJDN4JTN5VCEjOiQiMlBMTCQzUkJyOyEjOjckJCIxbm0ieiU0XFlfISM6JCIybW1tInpqZik0IyEjOjckJCIxTExlUi0vUGkhIzokIjJLTExlNDtbXCMhIzo3JCQiLURjbXBpcyEjNiQiLERteV0hSCEiKjckJCIxTUxlKik+VkIkKSEjOiQiMk5MTGV6cyRITCEjOjckJCItREpidyFRKiEjNiQiLERAMUJ2JCEiKjckJCIyb21tVElPby8iISM6JCIydW1tbUBYdD0lISM6NyQkIjJOTCQzXz5qVTYhIzokIjFNTEwzeV9xWCEjOTckJCIyLisrRDt2L0QiISM6JCIxLCsrXTEhPismISM5NyQkIix2PWgoZTghIiokIip2V11WJiEiKDckJCIyLSsrdiRbNmo5ISM6JCIxLCsrXSRmQyZlISM5NyQkIjJOTGUqW3ooeWIiISM6JCIxTUwkZXo2OkInISM5NyQkIjFubTthL2NxOyEjOSQiMW9tbTs9QyNvJyEjOTckJCIybm1tbUo8Z3ciISM6JCIxbm1tbSNwUzEoISM5NyQkIi5EMU1jcSg9ISM2JCIsRE9EIzN2ISIqNyQkIjJvbW07cFdgKD4hIzokIjFubW1tKHk4IXohIzk3JCQiMi4rRDFmIz0kMyMhIzokIjEsK11pLnRLJCkhIzk3JCQiLnY9eHBlPSMhIzYkIix2M3pNdSkhIio3JCQiMW5tIkgyOElIIyEjOSQiMW9tbSJIXz88KiEjOTckJCIxbjt6cFNTIlIjISM5JCIxbm07emlobCYqISM5NyQkIjItXVA0MW9XVyMhIzokIjEsK3ZWQSh5eCohIzk3JCQiMk9MJDNfP2AoXCMhIzokIjFNTEwzI0csKioqISM5NyQkIjJPJDNfRDFsX0QhIzokIjFtbSJ6XChSKnkqISM5NyQkIjJPTGUqKT5weGcjISM6JCIxbW07L0sjKm8mKiEjOTckJCIyLit2JGY0dC5GISM6JCIxKioqKlxpaDImPSohIzk3JCQiMk5MJGUqR3N0IUchIzokIjFtbW1UM15xKCkhIzk3JCQiK0RSVzlIISIpJCIpVkFVJCkhIic3JCQiLURKRT4+SSEjNSQiK3YlSEsjeiEiKTckJCIuRDFSVTA3JCEjNiQiLHZWSXleKCEiKjckJCItdj1TMkxLISM1JCIrRFJxbnEhIik3JCQiMW5tbSJwKT1NTCEjOSQiMUxMTExfQ2ptISM5NyQkIjIvKyt2PV1AVyQhIzokIjEpKioqKipcIypSSmkhIzk3JCQiMUwkZSpbJHoqUk4hIzkkIjJ3bW1UZyMzU2UhIzo3JCQiMjErK0RZS3BrJCEjOiQiMSkqKioqKlwsRjdhISM5NyQkIjJrbSJIMnFjWlAhIzokIjJYTEwzKD50NF0hIzo3JCQiMjArREo1ZkYmUSEjOiQiMSkqKipcKGVqKillJSEjOTckJCIybG1tVGcuYyZSISM6JCIxTUxMJGUmZXhUISM5NyQkIi5EY0VzSzElISM2JCIxKioqKlxQNCJwdSQhIzk3JCQiMU1MTCQpKnBwOyUhIzkkIjFrbW1tKzdLTCEjOTckJCIyTUwkM3hlLHRVISM6JCIyam1tO1xPeiFIISM6NyQkIjJ1bSJIZE89eVYhIzokIjIuTEwzUGxzWyMhIzo3JCQiMjArK10jPiNbWiUhIzokIjEpKioqKioqSDcyNSMhIzk3JCQiMW5tVCZHIWUmZSUhIzkkIjJETEwkZSl5d2wiISM6NyQkIjFNTEwkKVFrJW8lISM5JCIxbG1tbVdVaDchIzk3JCQiMSxdaVNqRSF6JSEjOSQiMXUqKipcUFkkKlEpISM6NyQkIjEsXVA0ME8iKlshIzkkIjFyKioqXGl6Yk0lISM6NyQkIiQrJiEiIiQiIiEhIiItJSZDT0xPUkc2JiUkUkdCRyQiMidcXydlTSV5Zz4hIzwkIjFpajkuZUBSISkhIzskIjInXF8nZU0leWc+ISM8LSUlVklFV0c2JDskIiIhISIiJCIkKyYhIiIlKERFRkFVTFRHLSUqQVhFU1NUWUxFRzYjJSdOT1JNQUxHLSUoU0NBTElOR0c2IyUuVU5DT05TVFJBSU5FREctJSVST09URzYnLSUpQk9VTkRTX1hHNiMkIiQrJCEiIi0lKUJPVU5EU19ZRzYjJCIjISohIiItJS1CT1VORFNfV0lEVEhHNiMkIiUhZSQhIiItJS5CT1VORFNfSEVJR0hURzYjJCIlIVwkISIiLSUpQ0hJTERSRU5HNiI=

u2 := (x,t,N) -> a(0)/2 + sum(a(n) * exp(-(n*Pi/L)^2*k*t) * cos(n*Pi*x/L),n=1..N);

Zio2JUkieEc2IkkidEdGJUkiTkdGJUYlNiRJKW9wZXJhdG9yR0YlSSZhcnJvd0dGJUYlLCYtSSJhR0YlNiMiIiEjIiIiIiIjLUkkc3VtRzYkJSpwcm90ZWN0ZWRHSShfc3lzbGliR0YlNiQqKC1GLTYjSSJuR0YlRjEtSSRleHBHRjU2IywkKixGPEYySSNQaUdGNkYySSJMR0YlISIjSSJrR0YlRjE5JUYxISIiRjEtSSRjb3NHRjU2IyoqRjxGMUZCRjE5JEYxRkNGR0YxL0Y8O0YxOSZGMUYlRiVGJQ==

plot3d(u2(x,t,50),x=0..L,t=0..2000,color=black,style=wireframe,axes=boxed);

NictJSpBWEVTU1RZTEVHNiMlJEJPWEctJStBWEVTTEFCRUxTRzYlUSJ4NiJRInQ2IlEhNiItJSVHUklERzYmOyQiIiEiIiEkIiNdIiIhOyQiIiEiIiEkIiUrPyIiIVgsSSlhbnl0aGluZ0clKnByb3RlY3RlZEc2IjYiW2dsJyElIiEhI1xibSI6IjozRkU4RURBNkQ1QTAzQUI5NDAyRkVBNTVGMUQ1NUMzQzQwMzY4RkQ0RTcyNzVCRjM0MDNCOEY5QzJGQ0MxRDg4NDAzRjk4NDAyOUI5QzYwNDQwNDE3MjcxQjcyQzYzNEQ0MDQyQ0NEQjRERTk5QzA0NDA0M0U5MkMyOTBBRTg1ODQwNDREMjhEMTg3Q0IxNUI0MDQ1OTIxRjg2RDAyRjFFNDA0NjJGNjBERUNCNTFDQTQwNDZCMDc2REFGMkI4QkM0MDQ3MUE2RDQ0REYxODE4NDA0NzcxNjg3RTQ1MEQ0QzQwNDdCOENFRjYwMjc5Q0E0MDQ3RjM2QjJFRUVEQUNCNDA0ODIzODdBRTFBODI3MDQwNDg0QjA1RTgzMDc2QUE0MDQ4NkI3MTEzNzMxQTMyNDA0ODg2MEQ5QUFCM0UxMDQwNDg5QkU1Q0JBMzVBMzg0MDQ4QURENDQwMTZFNUQ0NDA0OEJDOEM2OTQyMjQ0RDQwNDhDOEExOTM5NTk5MEU0MDQ4RDI4Q0E4QkVFREM2NDAyMDlDMDY1M0VBM0RBRDQwMzE1MkJDQTBBQThCNjU0MDM3ODdCQkUzRTAxMUUzNDAzQzU0Q0E5REU2QUEyNTQwNDAxQzg1QUI0MjFGNjQ0MDQxQjQ1OTY2ODk1RkMzNDA0MzAyRjBENTk2RUJFMDQwNDQxNTkwREM4MjFBNUQ0MDQ0RjZGREU5NEE1NkYyNDA0NUIwMDkzRDk4MDJCNzQwNDY0N0VFRDg0RTJDNTc0MDQ2QzQ5RUQwOEU4MTgxNDA0NzJBRjhFQjBGMEYwRTQwNDc3RUZENjdCNjVFQkE0MDQ3QzNGNTBDOTY4RjYxNDA0N0ZDOTIwM0RBNDRGQzQwNDgyQjBBRDY1RDIxRDA0MDQ4NTEzMDkxMEU4QjhDNDA0ODcwODBGMkMyRkRGNDQwNDg4QTM1NTg2MDQwQzQ0MDQ4OUY0RUZDQjk5QUEyNDA0OEIwQTEwNkIwRjZGNDQwNDhCRUQ4Q0EzQzlGODM0MDQ4Q0E4NDhFRUFDRjMwNDA0OEQ0MTkxRkIwOUIzRjQwMzA5RUI2NzExREQ3NjA0MDM1MzJERkNFNkJFNUY4NDAzQTU5ODREREQ0RTRDMjQwM0U5NjBEMDMxQTM4MEY0MDQxMDgyOTdCQzNENzJGNDA0Mjc1OEY5MkNCNTg1MjQwNDNBMTgxNTk1MkI3QjE0MDQ0OTdCODYzRDRGNUNBNDA0NTYxRDQ5OThCQzYzNjQwNDYwN0JDODRGQjYyM0E0MDQ2OEZFQzYzQzI3MzA0NDA0NkZGQjcwQ0Q0QTY3RDQwNDc1QjdCMzY5NDc3OUE0MDQ3QTZDRjMxRUE0ODVBNDA0N0U0QTRDRkY3NkI2NDQwNDgxNzY2RDk5RjhCNDk0MDQ4NDExMTNGQzk4NDJDNDA0ODYzNDRGNjY2NEZGMDQwNDg3RjU4NDBGMDdCQzg0MDQ4OTY2NDEzN0VEN0FDNDA0OEE5NEYwRTREN0RFMjQwNDhCOEQ2ODFBNDkyMEE0MDQ4QzU5NUQ0NTQyQTAzNDA0OEQwMEM5NkQzQjUzRDQwNDhEOEEzN0ZDRjJGMkQ0MDM4RjU0OTFDQTA4ODA0NDAzQjA1Q0I0RjYyMTY0NDQwM0VDN0UxNzJCMzNEMkE0MDQxMTUwMDdEMjZEOUE2NDA0MjdFRDA0MzgzNTM2OTQwNDNBOEUxRjkzMTE2NjE0MDQ0OURCRDQ0NTNBOTUyNDA0NTY2QzNEQzU2MDQ3NDQwNDYwQkM5Mzg3OTRFQjM0MDQ2OTMzRjU2RTkxOURFNDA0NzAyNzE4RjdBNDc1NjQwNDc1REI4OThFMENDNDM0MDQ3QThBNURFMjM4NDhBNDA0N0U2MjcyQzQwRkZBMzQwNDgxOEE0MDA1NzMzMkE0MDQ4NDIxNTk2QjRGQjFDNDA0ODY0MUFBQUM1NkI2MjQwNDg4MDA3QUQ1NDgzQTE0MDQ4OTZGNDEzNjM3QTZBNDA0OEE5QzU0MkI4MjdBMTQwNDhCOTM3ODk3OEU1RTQ0MDQ4QzVFNTdBOTE1MkMwNDA0OEQwNERGODg5NDZGODQwNDhEOEQ5MkI0NTcwMTI0MDQ4REZEQzkyNTQxQjk5NDA0MEE2QzJDQzM4NkYwOTQwNDEwRjlBRDI4QUFGQUU0MDQyM0NCN0I2QTQwNTFGNDA0MzY4MTdBQ0IyNTEzRTQwNDQ2NkM1OEU1MDM0Rjg0MDQ1Mzk1NzkzMjIzOUQ0NDA0NUU2NzJEOUIxRUQyRjQwNDY3NDk2RjVCRTE4MDM0MDQ2RTk0NkIyNjExMDM2NDA0NzQ5MEZDOUUwRjE2RDQwNDc5N0IwNzA4MUYyNUM0MDQ3RDgzQjZEQUNBRDI2NDA0ODBEMzZBMjdBREQxNzQwNDgzOEI0M0YyNjlBMjQ0MDQ4NUM2NzdCMDNCM0EwNDA0ODc5QjU5Nzc5NENFQzQwNDg5MUMzRDcwRUM0NjE0MDQ4QTU4MkY0MTk3ODBDNDA0OEI1Qjg4OUJBOTBFNDQwNDhDMzA2Q0Q1Njc0NDE0MDQ4Q0RGMkU1RDI1QzIyNDA0OEQ2RUEyMDBDMDI5NjQwNDhERTQ2MzRBMTg4MTY0MDQ4RTQ1MEM5Q0IyRDU2NDA0OEU5NDY1NDVGQzY1QjQwNDREMzQ5OEIzN0UzOUI0MDQ0RjU2MzhCRTUzM0ZENDA0NTgyRjEzMjRFNjM0QTQwNDYxQjUxQkVBMDI1RTM0MDQ2OUVCNjFCNDk1RUFENDA0NzBCQTJERTFCM0MwRjQwNDc2NTNBRUIzQkMzNkM0MDQ3QUVDRTNFQjM3RTZCNDA0N0VCMzRFNkMzNjEzQzQwNDgxQ0M5RUZEOTI3ODc0MDQ4NDU3RDRBNjg3QzE3NDA0ODY2RTYzN0Y4NUVENTQwNDg4MjUzMENGRDQzMDc0MDQ4OThENjNCN0M4QjkwNDA0OEFCNTEwQzQ0MDA1NDQwNDhCQTdDNkQyOEUzMUQ0MDQ4QzZGMDJCOUFBMTgwNDA0OEQxMjhFM0JDNkI5QzQwNDhEOThDREY2MTc5NjY0MDQ4RTA3MDE1QTlCNTBENDA0OEU2MTc3MzQyMDZEQzQwNDhFQUJCOEMyMEI5QzE0MDQ4RUU4QUQxQjQzQzYwNDA0OEYxQUI2M0E2MUEyMzQwNDhGNDNDOEQ1RDE5MkM0MDQ5MDAwMDAwMzBFMkU5NDA0OTAwMDAwMDMwRkMxNDQwNDkwMDAwMDAyOTFDQUE0MDQ5MDAwMDAwMjFFNzRFNDA0OTAwMDAwMDFCREI1NjQwNDkwMDAwMDAxNkRGMDk0MDQ5MDAwMDAwMTJDNjY5NDA0OTAwMDAwMDBGNjk3NzQwNDkwMDAwMDAwQ0E2Qjc0MDQ5MDAwMDAwMEE2MjhGNDA0OTAwMDAwMDA4ODY1NDQwNDkwMDAwMDAwNkZGNjg0MDQ5MDAwMDAwMDVCRTgyNDA0OTAwMDAwMDA0QjcxODQwNDkwMDAwMDAwM0RFREU0MDQ5MDAwMDAwMDMyRDVGNDA0OTAwMDAwMDAyOUJBQzQwNDkwMDAwMDAwMjI0MTI0MDQ5MDAwMDAwMDFDMUU1NDA0OTAwMDAwMDAxNzE0RTQwNDkwMDAwMDAwMTJGMjY0MDQ5MDAwMDAwMDBGOEQ5NDA0OTAwMDAwMDAwQ0M0NTQwNDkwMDAwMDAwMEE3QUU0MDQ5MDAwMDAwMDA4OUE0NDA0RDJDQjY3NTNDRjUxNDQwNEQwQTlDNzQ3QTIwMDU0MDRDN0QwRUNFMDEyODdFNDA0QkU0QUU0MUExNUU5RjQwNEI2MTQ5RTRFQzcyRUI0MDRBRjQ1RDIyMTBGMzI3NDA0QTlBQzUxNEU4ODFFMDQwNEE1MTMxQzE2QTQ3QTM0MDRBMTRDQjE5NTUwRjdDNDA0OUUzMzYxMDNBRTg2QjQwNDlCQTgyQjVBN0ZCRDg0MDQ5OTkxOUM4MTUyNUU1NDA0OTdEQUNGMzBERDVDNzQwNDk2NzI5QzQ4QzkwNUQ0MDQ5NTRBRUYzQzM3OUUxNDA0OTQ1ODM5MkRENDAzMzQwNDkzOTBGRDQ2QTY4NTg0MDQ5MkVENzFDNDdCNzJGNDA0OTI2NzMyMEExRUJCQTQwNDkxRjhGRUE1OTE0NjQ0MDQ5MTlFODhDQzA0MkM4NDA0OTE1NDQ3M0UxMjZGQjQwNDkxMTc1MkU0RDRFM0Y0MDQ5MEU1NDlDNUIyOUNCNDA0OTBCQzM3MkEzRjBCQzQwNTBBQzlFOUExMzY0RDY0MDUwNzgzMjk2RTY0MkNDNDA0RkMzNDg0OUEzOUEzODQwNEU5N0U4NTM4ODc5QkM0MDREOTkzQTcxRTAwREU4NDA0Q0M2QTg2RDA1NjNFNzQwNEMxOThEMjY2RTk3RDg0MDRCOEI2OTBBNUM5OUJFNDA0QjE2Qjk0REI0RDk2ODQwNEFCNkYwMzYzMTBCNTU0MDRBNjg0RjhGOENEMThCNDA0QTI3QzQ5MjVGNzFBNzQwNDlGMkM5NUQ4RjE1RTg0MDQ5Qzc0QkMwRTE5MDlDNDA0OUEzOTg4NTAzMDA5QjQwNDk4NjRBNjg4QzMzRTA0MDQ5NkUzQzI4RjVDMDBGNDA0OTVBN0QwQkVBM0QzRDQwNDk0QTQ3NzY0ODdBNTk0MDQ5M0NGOTMyQUMwQjY2NDA0OTMyMEQxQTJGQjBGMDQwNDkyOTE1REZGNUFDNkU0MDQ5MjFCOUNCNUZEOUI4NDA0OTFCQUYzNjM1RjUxNzQwNDkxNkI5QUJBMTI4MEQ0MDUyQzJBREI5MDY5MEIxNDA1MjNFOEQyQzRDMTRGQjQwNTE0RTA3QTM3MDk5NzY0MDUwNzU3RkMxODQ5QjBENDA0RjgxMkZCQ0E0MTZDQTQwNEU1NzFFMDZFRjQyQkI0MDRENjI0MkJCQzZFNDFDNDA0Qzk5M0MyM0JGQzc0QzQwNEJGNDM2Qzc5ODk1ODg0MDRCNkNDMEE5MjU5NUU3NDA0QUZEOEU3MDkxQzZGMjQwNEFBMjQ3NjcyOTE5MkI0MDRBNTc1QTIxRTQ5QjEzNDA0QTE5RDhEM0M1QUI3NDQwNDlFNzVCRkZBRTQ2MjI0MDQ5QkRFQTY5NEY4MzJDNDA0OTlCRTU1NTNFNDREODQwNDk3RkY4NTJBRTgzNzU0MDQ5NjkwQkVDOUYwMUQ1NDA0OTU2M0FCRDQ5RTJBNTQwNDk0NkM4NzY4OEM2RDM0MDQ5M0ExQTg1NzAwRDJDNDA0OTJGQjIwNzc3RDlFOTQwNDkyNzI2RDRCQjdEMTA0MDQ5MjAyMzZEQUNBNzBGNDA1NEQ4NTI2M0UyNUQ4MTQwNTNCMzQ4MEM3RkE0NTA0MDUyNjk5RUM4OUZCMTI5NDA1MTVBN0NCRjRBNzUzNTQwNTA3QkVCNDIyQzA0QjY0MDRGOEE3MDZENEI4NzlCNDA0RTVFN0VBNkMwMEVERDQwNEQ2ODQ3OUMzQTczQjQ0MDRDOUUyQjY2ODBFMDgyNDA0QkY4NDM3QjBGMDA1NTQwNEI3MDEzOUM0NjEzNTA0MDRCMDA0OEYzMzI1OEVCNDA0QUE0ODRDOTcxNDZFODQwNEE1OTMwQ0UxQTZFQkU0MDRBMUI1QjMwMEM3MzdBNDA0OUU4OTkyNjYzQTIxNjQwNDlCRUVFQzAzOTE3N0Y0MDQ5OUNCQjA5OUJENDIyNDA0OTgwQTdCRjExNDYxQzQwNDk2OTlCRUM4Mjk5QTI0MDQ5NTZCMEYxQjNCMTQ0NDA0OTQ3Mjk3RTVDNjZDRjQwNDkzQTZBMkJBQ0EyNDI0MDQ5MkZGMzY5MkNGMjcxNDA0OTI3NUM4MDMxNUE3NzQwNTZFQzdGMzU5OTg2Qjk0MDU0QUI1MEQ3RTM2RDlDNDA1MzFFMTEwNzEyREFDQzQwNTFFQUNENTg4RjI1REM0MDUwRjFCRDJBNjYyN0JBNDA1MDI1RDM0Q0MxM0JDRDQwNEVGRDBGMkE3MkNDMzQ0MDRERUE2RjIzODVERkY5NDA0RDA5MDIxNkJDMzU4QTQwNEM0RkY2QzI2RDVENzU0MDRCQjgxMTI3QjYzRDUxNDA0QjNCNjEyRjc1MURDQzQwNEFENTA3MTRGM0VBMjM0MDRBODEwMjk4NEMxMjFENDA0QTNDMEFGMzZCNzE4ODQwNEEwMzZERkMyNzYwMEM0MDQ5RDRGNTI5QTQzN0NENDA0OUFFQ0Y2RUYyOTAyODQwNDk4RjdGMEQzREVBRUU0MDQ5NzVDQUE3QTA3RTY3NDA0OTYwQjEwMzQ3MDI0QTQwNDk0RjVFRjk0Rjg5REM0MDQ5NDEyNzM1QzNDQTNBNDA0OTM1N0I3MTE1ODc5QzQwNDkyQkU2RTA0RkFDMDE0MDU4Q0UyNEIyNTRCRjhCNDA1NTAyQjU0MUM1NTQ3OTQwNTM1QzBBQzYzNjI5MDM0MDUyMUMxOEY0MENGODlFNDA1MTE5RUZGNTkxOEU3RjQwNTA0NkM3MjQ2OUNFNUE0MDRGMzMyNEIyMTY2M0ZDNDA0RTE2RDNENkY1MTdBODQwNEQyRDcyRTc4MzRFQTU0MDRDNkRFMDc5MkZEMEUyNDA0QkQwOUYyMTM0QUUzNjQwNEI0Rjg5MjUwRDQ3NDQ0MDRBRTU5MkJCMjBFN0U4NDA0QThFOTc4MUJBRjJCNDQwNEE0NzMxMDlGRDg2MzY0MDRBMEM5NEQxMTEyNTM1NDA0OURDNzg1MUU1N0Q5MDQwNDlCNEZBMTdDRjg5NTY0MDQ5OTQ4RUVDOENFNUNFNDA0OTc5RjI2NTU0QzFGMDQwNDk2NDFBMzQ1Q0E1Qzg0MDQ5NTIyQkJGRTkxQTJDNDA0OTQzNzM5NkJEREJCMzQwNDkzNzVFNkM2QTY2RjI0MDQ5MkQ3MzU3NDExMjNBNDA1NkVDN0YzNTZCRTlEQzQwNTRBQjUwRDdDNzRDQjI0MDUzMUUxMTA2RkQxQzQxNDA1MUVBQ0Q1ODdEODUxMjQwNTBGMUJEMkE1N0I4RTM0MDUwMjVEMzRDQjU2NDcxNDA0RUZEMEYyQTVGNUMwRDQwNERFQTZGMjM3NUVCNEQ0MDREMDkwMjE2QUYxQzkzNDA0QzRGRjZDMjYyOUQxRDQwNEJCODExMjdBRDZBMDI0MDRCM0I2MTJGNkRERjMyNDA0QUQ1MDcxNEVERjdDMjQwNEE4MTAyOTg0NzMwNzA0MDRBM0MwQUYzNjc2RkI3NDA0QTAzNkRGQzI0MTVGQzQwNDlENEY1MjlBMTg0OTM0MDQ5QUVDRjZFRjA1OEMxNDA0OThGN0YwRDNDMTkyQTQwNDk3NUNBQTc5RjAwMTI0MDQ5NjBCMTAzNDVDODcyNDA0OTRGNUVGOTRFODgzQzQwNDk0MTI3MzVDMkY2QzA0MDQ5MzU3QjcxMTREQTA0NDA0OTJCRTZFMDRGMUQ4MTQwNTREODUyNjM4RUI2Q0Y0MDUzQjM0ODBDNEE2OEI1NDA1MjY5OUVDODc1REM3NzQwNTE1QTdDQkYyODZFQzM0MDUwN0JFQjQyMTAyNDFDNDA0RjhBNzA2RDFEQzdDMjQwNEU1RTdFQTY5QTgxQzE0MDRENjg0NzlDMUJBMEJBNDA0QzlFMkI2NjY3OTMxMzQwNEJGODQzN0FGQTNCMzg0MDRCNzAxMzlDMzUwNkE4NDA0QjAwNDhGMzI0NUExQzQwNEFBNDg0Qzk2NUM5RTQ0MDRBNTkzMENFMTEwMDhFNDA0QTFCNUIzMDA0QjVCRjQwNDlFODk5MjY1RDQ3NTg0MDQ5QkVFRUMwMzNFMDI4NDA0OTlDQkIwOTk3OEJGRTQwNDk4MEE3QkYwREMyNTM0MDQ5Njk5QkVDN0ZCNzA2NDA0OTU2QjBGMUIxNTJGNzQwNDk0NzI5N0U1QTc1MUU0MDQ5M0E2QTJCQUIwOUI4NDA0OTJGRjM2OTJCQTMxNTQwNDkyNzVDODAzMDQ3MkY0MDUyQzJBREI4QTkyQjRENDA1MjNFOEQyQzAyREZFNDQwNTE0RTA3QTMzNUM3RjY0MDUwNzU3RkMxNTQ4QjRFNDA0RjgxMkZCQzU1NDI2NjQwNEU1NzFFMDZBRTkwODQ0MDRENjI0MkJCOTFDOTQwNDA0Qzk5M0MyMzk0MkZDQzQwNEJGNDM2Qzc3NENEMTE0MDRCNkNDMEE5MDgzNjVENDA0QUZEOEU3MDc5QUE2NDQwNEFBMjQ3NjcxNTRFNTA0MDRBNTc1QTIxRDQ1QkRBNDA0QTE5RDhEM0I4NTU0NzQwNDlFNzVCRkZBMzUzOEI0MDQ5QkRFQTY5NDY4NjlENDA0OTlCRTU1NTM2RTQ2NDQwNDk3RkY4NTJBODc1NDk0MDQ5NjkwQkVDOUEwOTU3NDA0OTU2M0FCRDQ1Q0UxOTQwNDk0NkM4NzY4NTZENjQ0MDQ5M0ExQTg1NkQ0RDU0NDA0OTJGQjIwNzc1OTgyNjQwNDkyNzI2RDRCOUEyQ0I0MDQ5MjAyMzZEQUIyMUMwNDA1MEFDOUU5OUI0MkMyMjQwNTA3ODMyOTY4RjBEODY0MDRGQzM0ODQ5MTQ1QjhENDA0RTk3RTg1MzEyRTNDQjQwNEQ5OTNBNzE3Rjg4MkE0MDRDQzZBODZDQjYyODczNDA0QzE5OEQyNjJEOERDQjQwNEI4QjY5MEEyNzM2M0M0MDRCMTZCOTREODkwNjJENDA0QUI2RjAzNjBEMTFEMTQwNEE2ODRGOEY2RjQ5QkQ0MDRBMjdDNDkyNDczNDBDNDA0OUYyQzk1RDdCMkZFQjQwNDlDNzRCQzBEMTNCMUQ0MDQ5QTM5ODg0RjU5ODI2NDA0OTg2NEE2ODgxMzI0NzQwNDk2RTNDMjhFQ0I3MkU0MDQ5NUE3RDBCRTJEMkFCNDA0OTRBNDc3NjQyNjNERjQwNDkzQ0Y5MzJBNzBDMTg0MDQ5MzIwRDFBMkI5NkNDNDA0OTI5MTVERkYyNEU2NzQwNDkyMUI5Q0I1RDE2MUM0MDQ5MUJBRjM2MzNCMDNDNDA0OTE2QjlBQjlGNEIzRTQwNEQyQ0I2NzQ1MzQzQkQ0MDREMEE5QzczQkI3ODA3NDA0QzdEMEVDRDYyMTBGMjQwNEJFNEFFNDExRTU1QTA0MDRCNjE0OUU0ODBDRkJGNDA0QUY0NUQyMUI4OTRCRDQwNEE5QUM1MTQ5RkY3NEI0MDRBNTEzMUMxMkVCQjg5NDA0QTE0Q0IxOTI0MkUwRjQwNDlFMzM2MTAxMkM4ODk0MDQ5QkE4MkI1ODcwQkZCNDA0OTk5MTlDN0ZBMUM3MTQwNDk3REFDRjJGN0E0MkM0MDQ5NjcyOUM0N0E1ODgzNDA0OTU0QUVGM0I0ODU3ODQwNDk0NTgzOTJEMEY5OTQ0MDQ5MzkwRkQ0NjA1NEE5NDA0OTJFRDcxQzNGNzE5QTQwNDkyNjczMjA5QjIxNzk0MDQ5MUY4RkVBNTM4MTgzNDA0OTE5RTg4Q0JCQUY4MDQwNDkxNTQ0NzNERDY1ODM0MDQ5MTE3NTJFNEEzOTAyNDA0OTBFNTQ5QzU4QTFFRjQwNDkwQkMzNzJBMURDRUQ0MDQ4RkZGRkZGNkQ1NzQxNDA0OEZGRkZGRjZEMEJDNjQwNDhGRkZGRkY4NEFBMDM0MDQ4RkZGRkZGOUE0QTE3NDA0OEZGRkZGRkFDNkRGRjQwNDhGRkZGRkZCQjYyRTY0MDQ4RkZGRkZGQzdBQ0M3NDA0OEZGRkZGRkQxQzM5RDQwNDhGRkZGRkZEQTBCREQ0MDQ4RkZGRkZGRTBEODUzNDA0OEZGRkZGRkU2NkQwNDQwNDhGRkZGRkZFQjAxQzk0MDQ4RkZGRkZGRUVDNDdBNDA0OEZGRkZGRkYxREFCODQwNDhGRkZGRkZGNDYzNjc0MDQ4RkZGRkZGRjY3N0UzNDA0OEZGRkZGRkY4MkNGRDQwNDhGRkZGRkZGOTkzQ0E0MDQ4RkZGRkZGRkFCQTUyNDA0OEZGRkZGRkZCQUMxNzQwNDhGRkZGRkZGQzcyOEQ0MDQ4RkZGRkZGRkQxNTc2NDA0OEZGRkZGRkZEOUIzMTQwNDhGRkZGRkZGRTA4Rjc0MDQ4RkZGRkZGRkU2MzEzNDA0NEQzNDk4QTRFMzIzRTQwNDRGNTYzOEIyNjhCRkQ0MDQ1ODJGMTMxQUY0QkJENDA0NjFCNTFCRTFEMUNFMTQwNDY5RUI2MUFEREJCN0Y0MDQ3MEJBMkREQzJEREEyNDA0NzY1M0FFQUYzMzhENjQwNDdBRUNFM0U3N0YyNEY0MDQ3RUIzNEU2OTI3RkNGNDA0ODFDQzlFRkIxMDdBNTQwNDg0NTdENEE0NzhDMzk0MDQ4NjZFNjM3REQ1NTYxNDA0ODgyNTMwQ0U3MTE2QjQwNDg5OEQ2M0I2QTUzQjY0MDQ4QUI1MTBDMzUwQkVCNDA0OEJBN0M2RDFDOUM3RDQwNDhDNkYwMkI5MDhERDE0MDQ4RDEyOEUzQjQyNjA3NDA0OEQ5OENERjVBQUYyNTQwNDhFMDcwMTVBNDIyMkM0MDQ4RTYxNzczM0Q3Mzk0NDA0OEVBQkI4QzFDRjg0QTQwNDhFRThBRDFCMTI3MjM0MDQ4RjFBQjYzQTM5MjQ3NDA0OEY0M0M4RDVCMDU1RDQwNDBBNkMyQ0I3OUZEQTA0MDQxMEY5QUQxREM0NTFDNDA0MjNDQjdCNjE0QzY2RjQwNDM2ODE3QUMzQ0JCNEE0MDQ0NjZDNThERUZBRjM4NDA0NTM5NTc5MkQyRkU1RDQwNDVFNjcyRDk3MEUzMjA0MDQ2NzQ5NkY1ODhCNDgwNDA0NkU5NDZCMjM1M0NGQTQwNDc0OTBGQzlCQ0Y3RTk0MDQ3OTdCMDcwNjQ2QThFNDA0N0Q4M0I2RDk0NkY4QjQwNDgwRDM2QTI2NkY3MUE0MDQ4MzhCNDNGMTY0NEE1NDA0ODVDNjc3QUY2NEIyQTQwNDg3OUI1OTc2RTRCNTM0MDQ4OTFDM0Q3MDVCQjgwNDA0OEE1ODJGNDEyMEQ3QTQwNDhCNUI4ODlCNDdBNkE0MDQ4QzMwNkNENTE3NEYzNDA0OENERjJFNUNFNDFGRTQwNDhENkVBMjAwOEE0OEU0MDQ4REU0NjM0OUVDNDc5NDA0OEU0NTBDOUM4RTg3QjQwNDhFOTQ2NTQ1REU5OEM0MDM4RjU0OTFCMkFGMjVENDAzQjA1Q0I0RTNENDFFMTQwM0VDN0UxNzFDN0Y3MjQ0MDQxMTUwMDdDQzZCQTIzNDA0MjdFRDA0MzM0N0YwMjQwNDNBOEUxRjhGMDY0Mjg0MDQ0OURCRDQ0MUU4RTc1NDA0NTY2QzNEQzJBNkNGMzQwNDYwQkM5Mzg1NTg2M0I0MDQ2OTMzRjU2Q0JCQTUzNDA0NzAyNzE4RjYyMkFDNzQwNDc1REI4OThDRDAxNjc0MDQ3QThBNURFMTM0NTUwNDA0N0U2MjcyQzMzQTk3NTQwNDgxOEE0MDA0QzQwOTI0MDQ4NDIxNTk2QUJGRThDNDA0ODY0MUFBQUJFMEFFRDQwNDg4MDA3QUQ0RTc1NzQ0MDQ4OTZGNDEzNUU4MUVDNDA0OEE5QzU0MkI0MTMxNTQwNDhCOTM3ODk3NThDNzU0MDQ4QzVFNTdBOEU5MkU4NDA0OEQwNERGODg3MDUzNTQwNDhEOEQ5MkI0Mzk1Q0U0MDQ4REZEQzkyNTI5NjQ5NDAzMDlFQjY2RkNGM0M4MjQwMzUzMkRGQ0Q5NkY3ODE0MDNBNTk4NEREMkQ5MUVFNDAzRTk2MEQwMjkyMUU0MjQwNDEwODI5N0I4QzE1Rjk0MDQyNzU4RjkyOUQ5ODc3NDA0M0ExODE1OTJEMkE5MjQwNDQ5N0I4NjNCNjIyQ0Y0MDQ1NjFENDk5NzI3OEM3NDA0NjA3QkM4NEU2OUQxQjQwNDY4RkVDNjNCMTY2NUM0MDQ2RkZCNzBDQzZBN0FENDA0NzVCN0IzNjg4RkE5NjQwNDdBNkNGMzFFMERBMjk0MDQ3RTRBNENGRUZBREE4NDA0ODE3NjZEOTk5MzA4QjQwNDg0MTExM0ZDNDRDRDU0MDQ4NjM0NEY2NjIwN0NDNDA0ODdGNTg0MEVDRjdGRjQwNDg5NjY0MTM3QkY1MTE0MDQ4QTk0RjBFNEIxRjk2NDA0OEI4RDY4MUEyQTA1OTQwNDhDNTk1RDQ1MjkxNzk0MDQ4RDAwQzk2RDI2NUUxNDA0OEQ4QTM3RkNFMUJFNDQwMjA5QzA2NTI3RDU2OUM0MDMxNTJCQ0EwM0EwN0I1NDAzNzg3QkJFMzg5MTdCNTQwM0M1NENBOURBMDI2RjY0MDQwMUM4NUFCMjU0MUIzNDA0MUI0NTk2NjcxQjEwOTQwNDMwMkYwRDU4MzdCQjg0MDQ0MTU5MERDNzIyNUIwNDA0NEY2RkRFOTNEM0RGQjQwNDVCMDA5M0Q4RDQyNUY0MDQ2NDdFRUQ4NDU1OTA2NDA0NkM0OUVEMDg3NDJFODQwNDcyQUY4RUIwOTFDQUM0MDQ3N0VGRDY3QjE3RDBENDA0N0MzRjUwQzkyOEQ4RjQwNDdGQzkyMDNENkZBRUM0MDQ4MkIwQUQ2NUE2RTk3NDA0ODUxMzA5MTBDNTQyNDQwNDg3MDgwRjJDMTJDMzA0MDQ4OEEzNTU4NUVDMjZGNDA0ODlGNEVGQ0I4NjBDQTQwNDhCMEExMDZBRkY1NTQ0MDQ4QkVEOENBM0JDQzA5NDA0OENBODQ4RUVBMjE5ODQwNDhENDE5MUZCMDBDQzAzRkU4RURBNkQ1QTAzQUJDNDAyRkVBNTVGMUQ1NUMzQzQwMzY4RkQ0RTcyNzVCRjM0MDNCOEY5QzJGQ0MxRDg4NDAzRjk4NDAyOUI5QzYwNDQwNDE3MjcxQjcyQzYzNEQ0MDQyQ0NEQjRERTk5QzA0NDA0M0U5MkMyOTBBRTg1ODQwNDREMjhEMTg3Q0IxNUI0MDQ1OTIxRjg2RDAyRjFFNDA0NjJGNjBERUNCNTFDQTQwNDZCMDc2REFGMkI4QkM0MDQ3MUE2RDQ0REYxODE4NDA0NzcxNjg3RTQ1MEQ0QzQwNDdCOENFRjYwMjc5Q0E0MDQ3RjM2QjJFRUVEQUNCNDA0ODIzODdBRTFBODI3MDQwNDg0QjA1RTgzMDc2QUE0MDQ4NkI3MTEzNzMxQTMyNDA0ODg2MEQ5QUFCM0UxMDQwNDg5QkU1Q0JBMzVBMzg0MDQ4QURENDQwMTZFNUQ0NDA0OEJDOEM2OTQyMjQ0RDQwNDhDOEExOTM5NTk5MEU0MDQ4RDI4Q0E4QkVFREM2LSUmQ09MT1JHNiYlJFJHQkckIiIhISIiJCIiISEiIiQiIiEhIiItJSxPUklFTlRBVElPTkc2JCQiJEklISIiJCIkIWUhIiItJSZTVFlMRUc2IyUlTElORUc=