mtesseracted

'''
=====================================
Rotating 3D voxel animation of PYPLOT
=====================================

1. Demonstrates using ``ax.voxels`` with uneven coordinates
2. Demonstrates rotating a 3D plot
3. Uses a MovieWriter directly to grab individual frames and 
   write them to a file
'''

mtesseracted

'''
=====================================
Rotating 3D voxel animation of PYTHON
=====================================

Demonstrates using ``ax.voxels`` with uneven coordinates
'''
import matplotlib.pyplot as plt
import numpy as np
from mpl_toolkits.mplot3d import Axes3D

mtesseracted

Export Gnome Terminal Profile

List profiles

dconf dump /org/gnome/terminal/legacy/profiles:/

Determine the terminal profile string for the profile you will need. This is the terminal profile that I will export:

mtesseracted

#!/bin/bash

THISDIR=$(pwd)

if [ -z "$1" ]; then
    mode='s' #serial
else
    mode='p' #parallel
fi

mtesseracted

module kinds
  save
  integer, parameter :: dp = selected_real_kind(15, 307)
end module kinds


program am_timed

    use kinds, only : dp

mtesseracted

'''
matplotlib must be developer release for voxel support
  install instructions:
https://matplotlib.org/devdocs/users/installing.html
'''

import matplotlib.pyplot as plt
import numpy as np
from mpl_toolkits.mplot3d import Axes3D
import matplotlib.animation as manimation

mtesseracted

'''
=====================================
    Rotating 3D voxel animation
=====================================

Demonstrates using ``ax.voxels`` with uneven coordinates
'''
import matplotlib.pyplot as plt
import numpy as np
from mpl_toolkits.mplot3d import Axes3D

mtesseracted

! Test program for dgesvx
! compile command used: 
!ifort dgesvx_tester.f90 -L/opt/intel/composer2018/mkl/lib/intel64 -lmkl_core -lmkl_intel_lp64 -lmkl_sequential -lpthread
program main
  implicit none
  external :: dgemv
  external :: dgesv
  external :: dgesvx
  integer,  parameter   :: dp = selected_real_kind(15,300)

mtesseracted

#!/usr/bin/env python3
# Find chemical symbols and surround them with \ce{ Symbol }
# Problem words: I, HOW, In, degrees K. Add words to exlist to ignore them.
# Also find lines of the type: '(a) .*' and surround them with '\wrongchoice{ (a) .*}'

import re, sys

if len(sys.argv) < 2 :
  print('Usage:> {} <filename>'.format(sys.argv[0]))
  sys.exit(1)

mtesseracted

(* found at https://community.wolfram.com/groups/-/m/t/1313893 *)
(* \
modified as per reddit user u/wxehtexw to integrate from -inf instead \
of 0 *)
FractionalD[\[Alpha]_, f_, x_, opts___] := 
 Integrate[(x - t)^(-\[Alpha] - 1) (f /. x -> t), {t, -Infinity, x}, 
   opts, GenerateConditions -> False]/Gamma[-\[Alpha]]
FractionalD[\[Alpha]_?Positive, f_, x_, opts___] := 
 Module[{m = Ceiling[\[Alpha]]}, 
  If[\[Alpha] \[Element] Integers, D[f, {x, \[Alpha]}],