|
Ich habe Probleme Mathematica die Diffusionsgleichung loesen zu lassen. Ist es ueberhaupt moeglich, dieses mit einem Schritt zu evaluieren? dT/dt = k (d^T/dz^2) + S, mit den Bedingungen T = 0 zum Zeitpunkt t = 0 im Halbraum z > 0 fuer alle t > 0 ist 0<z<z* S konstant fuer alle t > 0 bleibt dT/dz = 0 an der Stelle z = 0 an den Punkten z = +/- unendlich ist T = 0 Ich habe keine Ahnung wie die Syntax ist und die Hilfen die ich in Mathematica gefunden habe, beziehen sich auf einfachere Diffusionsgleichungen. Tatsaechlich habe ich eine Loesung fuer die obrige Aufgabe, was ich allerdings erreichen moechte ist bei aenderung der Bedingungen und eine schnelle Loesung. DSolve[{dT/dt = = k (d^T/dz^2) + S, T(0,z>0) = = 0, Ich nehme mal an das diese Aufgabe nicht mit einem einzigen Befehl zu loesen ist, kann mir jemand helfen oder mich zu einer Seite linken, die dieses erklaert. Danke |