RosettaCodeData/Task/Matrix-exponentiation-operator/Jq/matrix-exponentiation-operator-2.jq
2023-07-01 13:44:08 -04:00

10 lines
268 B
Text

def pi: 4 * (1|atan);
def rotation_matrix(theta):
[[(theta|cos), (theta|sin)], [-(theta|sin), (theta|cos)]];
def demo_matrix_exp(n):
rotation_matrix( pi / 4 ) | matrix_exp(n) ;
def demo_direct_matrix_exp(n):
rotation_matrix( pi / 4 ) | direct_matrix_exp(n) ;