tidying
changing deimensionless variable s=o call to individual variables uses ltot and nabase. Make ntot more iterative